Changing document properties with VBA

Question

I can change the version number of an Excel file by using the file's Properties panel.  I would like to be able to set this from a VBA module.  Is it possible?

Answer 1

Sub Test() With ThisWorkbook With .BuiltinDocumentProperties .Item("Document version") = 123 End With .Save End With End Sub

Note: You must close the file to see the changes within the Windows Explorer!

Andreas.

Answer 2

Hi Dave

Thanks for your reply.

I couldn't get the code working, but since I only need it for Excel I used this (courtesy of Andreas Killer):

Sub Test() With ThisWorkbook With .BuiltinDocumentProperties .Item("Document version") = 123 End With .Save End With End SubCheersAlan

Answer 3

Hi Andreas

That's exactly what I wanted.  I'm not sure why I didn't find it myself, but I do find the MS site extremely difficult to navigate.

Many thanks

Alan

Answer 4

Hi Alan, this code should do that for you . ..

With .Add(Name:="UFVersion", LinkToContent:=False, _

    Type:=msoPropertyTypeString, Value:="UserFormVersion1.2.1a")

End With