There's an option to read a revision number of the workbook with:

MsgBox ThisWorkbook.BuiltinDocumentProperties("Revision number")

-...but how to set this 'Revision number'???

If I use...

ThisWorkbook.BuiltinDocumentProperties("Revision number") = "v1.00"

....I get an error???


CE

Hi Charlotte,

Am Mon, 27 May 2013 14:42:17 +0200 schrieb Charlotte E.:

ThisWorkbook.BuiltinDocumentProperties("Revision number") = "v1.00"

this property doesn't accept strings
Try:
Dim ObjBDP As Object

Set ObjBDP = ThisWorkbook.BuiltinDocumentProperties
ObjBDP("Revision number") = 1#

or:

ThisWorkbook.BuiltinDocumentProperties(8) = 1


Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2

Charlotte E. wrote:
There's an option to read a revision number of the workbook with:

MsgBox ThisWorkbook.BuiltinDocumentProperties("Revision number")

-...but how to set this 'Revision number'???

If I use...

ThisWorkbook.BuiltinDocumentProperties("Revision number") = "v1.00"

...I get an error???


CE




You can set it to number but not string even if property type says it is
msoPropertyTypeString

That is Microsoft.

You can set it to number but not string even if property type says
it is msoPropertyTypeString


Thanks - that explains it ...


CE



Den 27.05.2013 15:28, witek skrev:
Charlotte E. wrote:
There's an option to read a revision number of the workbook with:

MsgBox ThisWorkbook.BuiltinDocumentProperties("Revision number")

-...but how to set this 'Revision number'???

If I use...

ThisWorkbook.BuiltinDocumentProperties("Revision number") = "v1.00"

...I get an error???


CE




You can set it to number but not string even if property type says it is
msoPropertyTypeString

That is Microsoft.

On Mon, 27 May 2013 08:28:46 -0500, witek
wrote:

Charlotte E. wrote:
There's an option to read a revision number of the workbook with:

MsgBox ThisWorkbook.BuiltinDocumentProperties("Revision number")

-...but how to set this 'Revision number'???

If I use...

ThisWorkbook.BuiltinDocumentProperties("Revision number") = "v1.00"

...I get an error???


CE




You can set it to number but not string even if property type says it is
msoPropertyTypeString

That is Microsoft.

One can manually set a 'version number' as one of the extended file
properties from within file manager (right click on the file name). so
that property, once set, should show up somewhere within one of the
property dialog/listings within the document itself, providing knowledge
of the location. I currently do not know where it resides within the
document. Only from the file level..

CellShocked wrote:
On Mon, 27 May 2013 08:28:46 -0500, witek
wrote:

Charlotte E. wrote:
There's an option to read a revision number of the workbook with:

MsgBox ThisWorkbook.BuiltinDocumentProperties("Revision number")

-...but how to set this 'Revision number'???

If I use...

ThisWorkbook.BuiltinDocumentProperties("Revision number") = "v1.00"

...I get an error???


CE




You can set it to number but not string even if property type says it is
msoPropertyTypeString

That is Microsoft.

One can manually set a 'version number' as one of the extended file
properties from within file manager (right click on the file name).

Excel will not read it if you set it to something else than number.
It will show it as damaged file.



so
that property, once set, should show up somewhere within one of the
property dialog/listings within the document itself, providing knowledge
of the location. I currently do not know where it resides within the
document. Only from the file level..



it is in core.xml file in unzipped doc.

The standard say it is string

<xs:element name="revision" minOccurs="0" maxOccurs="1" type="xs:string"/

Microsoft knows better what it should be.