07-06-2023
04:06 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
07-06-2023
04:06 AM
I would probably update all the physical properties of the document by adding this line :
Dim rDoc As Document
rDoc = ThisDoc.Document
Dim docPropertySet As PropertySet
docPropertySet = rDoc.PropertySets.Item("Design Tracking Properties")
Dim test As Double
ThisApplication.CommandManager.ControlDefinitions.Item("AppUpdateMassPropertiesCmd").Execute
test = docPropertySet.Item("Density").Value
MsgBox(test)
Maybe you can find what you are looking for here :
Kind regards,
FINET L.
If this post solved your question, please kindly mark it as "Solution"
If this post helped out in any way to solve your question, please drop a "Like"