Macro to set file properties

[fizzy]

Hi,

Is it possible to code a macro to set a file's properties in Excel 2010? I want the Macro to change the file's "Title" field to the contents of cell A1.

Thanks in advance for any help.

[JosephP]

Please Login or Register  to view this content.

for instance

[tehneXus]

Hi,

in general:

Please Login or Register  to view this content.

and for the title to be the value in cell A1 of worksheet "Sheet1"

Please Login or Register  to view this content.

[fizzy]

thank you both for the help, I appreciate it!

[fizzy]

Hi,

This worked fine for me: activeworkbook.BuiltinDocumentProperties("Title") = "your title"

However when I try to use a specific cell in my workbook it doesn't seem to do anything (no error is returned, but the title remains blank. Can anyone confirm whether "ThisWorkbook.BuiltinDocumentProperties("title") = Worksheets("Sheet1").Range("A1").Value" is correct? I've tried replacing "ThisWorkbook" with "ActiveWorkbook" instead, but still no luck.

If it makes any difference the text I want to use is merged across A1-D1, I've tried the range as "A1" and also "A1:D1" but no luck.

[JosephP]

the code is correct-activeworkbook is the active workbook whereas thisworkbook is the workbook containing the code