title image


Smiley Re: Probleme mit BuiltInDocumentProperties
Hi,



wie Du geschrieben hast, nicht alle Properties haben auch Values, z.B. werden einige nur von Powerpoint nur benutzt.

Die Properties können überdies veschschieden Typen haben, deshalb darfst Du nicht auf Nullstring prüfen, weil Du damit ja den Typ vorwegnimmst.



Eine Möglichkeit ist z.B., den Typ des Objekts zu prüfen, bevor Du auf dessen Value Eigenschaft zugreifst.



Beispiel:

Sub testdp1()

Dim vDoc As Document, i As Long, vMaxProps As Long

Set vDoc = ActiveDocument

vMaxProps = vDoc.BuiltInDocumentProperties.Count

For i = 1 To vMaxProps

If Not VarType(vDoc.BuiltInDocumentProperties(i)) = vbObject Then

Debug.Print vDoc.BuiltInDocumentProperties(i)

Else

Debug.Print "Property #" & i & " not assigned"

End If

Next i

End SubGrüße

Wolfram

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: