IsPartDocument

From scripting
Revision as of 07:02, 22 April 2017 by Nickpisca (talk | contribs) (Created page with " Function IsPartDocument(CurObj As Variant) As Boolean On Error GoTo Blast Dim CurPD As PartDocument Set CurPD = CurObj IsPartDocument = True Exit Function Blast: IsPar...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search
Function IsPartDocument(CurObj As Variant) As Boolean
On Error GoTo Blast
Dim CurPD As PartDocument
Set CurPD = CurObj
IsPartDocument = True
Exit Function
Blast:
IsPartDocument = False
End Function