When saving add automatically contents of a specified cell in document properties

  • Thread starter Thread starter Nadia
  • Start date Start date
N

Nadia

Hello,

Looking for help on the following:

When I save my worksheet, I would like the contents of a specified cel
to be copied in the document properties. More specifically in the fiel
'key words' in the properties.

I tried to create a macro but it does not record to copy text from
cell in the field 'key words' in the document properties.

Thanks in advance for any help.

Regards, Nadi
 
Hi Nadia

You can try this

Sub Fill_in_DocProperties()
With ActiveWorkbook.BuiltinDocumentProperties
..Item("Title") = ActiveWorkbook.Name
..Item("Subject") = " Bestand info"
..Item("Manager") = "Ron de Bruin"
..Item("Author") = "R de Bruin"
..Item("Keywords") = Sheets("Sheet1").Range("A1").Value
..Item("Comments") = ""
..Item("Company") = ""
End With
End Sub
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Clear a cell's contents when document is saved 2
insert document properties text in a cell 2
Automatically showing the document's properties when it is opened 1
Macro to automatically save document with cell reference as filena 1
Pasting cell contents into a macro 1
Need to bold a cell based on keyword in another cell... 3
Selecting all cells with content using a variable 3
Macro to save file with Active Document Name 4

Back
Top