ry.itohさん、はじめまして
解釈があっているか分かりませんが、回答します

「アクティブでない部品のプロパティ」を取得するとなると、PDMかDocument ManagerのAPIを利用することと成ると思います。
ただ、PDF出力は見たところDocument Manage APIに機能は無いため、PDMのAPIかSolidWorks本体で図面を開いてPDF出力をする他なさそうです…
APIヘルプを参考にしたサンプルのコードを提示しますので、試してみて下さい

※sLicenseKey , sSearchPath , sTargetFileName は、適宜指定の上実行してください。
SolidWorks Document Managerのライセンスキーは、販売代理店から入手可能です。
Option Explicit
Const sLicenseKey As String = "" ' SolidWorks Document Managerのライセンスキー
Const sSearchPath As String = "" ' 検索するフォルダ
Const sTargetFileName As String = "" ' 対象のファイル
Sub main()
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swDraw As SldWorks.DrawingDoc
Dim swExportPdfData As SldWorks.ExportPdfData
Dim dmClassFact As SwDMClassFactory
Dim dmDocMgr As SwDMApplication4
Dim dmDoc As SwDMDocument20
Dim nRetVal As SwDmDocumentOpenError
Dim dmSearchOpt As SwDMSearchOption
Dim sSavePath As String
Dim sSaveFileName As String
Dim sPropVal As String
Dim vRet As Variant
Dim bRet As Boolean
Dim lErrors As Long
Dim lWarnings As Long
Dim i As Long
' SolidWorks接続
Set swApp = Application.SldWorks
' SolidWorks Document Managerの各種準備
Set dmClassFact = CreateObject("SwDocumentMgr.SwDMClassFactory.1")
Set dmDocMgr = dmClassFact.GetApplication(sLicenseKey)
Set dmSearchOpt = dmDocMgr.GetSearchOptionObject
' 検索先パスを追加
dmSearchOpt.AddSearchPath (sSearchPath)
' ターゲットファイル(sTargetFileName)のドキュメントを取得
Set dmDoc = dmDocMgr.GetDocument(sTargetFileName, GetDocType(sTargetFileName), True, nRetVal)
' 取得できなかったら終了
If dmDoc Is Nothing Then Exit Sub
' ターゲットファイルのプロパティからファイル名を生成
sPropVal = dmDoc.GetCustomPropertyValues("REV", swDmCustomInfoNumber, "")
sSaveFileName = sPropVal
sPropVal = dmDoc.GetCustomPropertyValues("品名", swDmCustomInfoNumber, "")
sSaveFileName = sSaveFileName & "_" & sPropVal & ".PDF"
' WhereUsedメソッドでターゲットファイルを参照しているドキュメントを検索
vRet = dmDoc.WhereUsed(dmSearchOpt)
' 参照しているドキュメントが見つかればPDF作成
' (Document ManagerではPDF出力できないので、SolidWorks本体で出力)
If Not IsEmpty(vRet) Then
For i = 0 To UBound(vRet)
' 参照しているファイルが図面か確認
If GetDocType(vRet(i)) = swDmDocumentDrawing Then
' SolidWorksで図面を開く
Set swDraw = swApp.OpenDoc6(vRet(i), swDocDRAWING, swOpenDocOptions_Silent, "", lErrors, lWarnings)
' PDF出力準備
Set swExportPdfData = swApp.GetExportFileData(1)
bRet = swExportPdfData.SetSheets(swExportData_ExportSpecifiedSheets, swDraw.GetSheetNames)
' 参照している図面の保存フォルダを取得
sSavePath = Left(swDraw.GetPathName, InStrRev(swDraw.GetPathName, "\"))
' PDF保存
bRet = swDraw.Extension.SaveAs(sSavePath & "\" & sSaveFileName, 0, 0, swExportPdfData, lErrors, lWarnings)
' 図面ファイルを閉じる
swApp.CloseDoc swDraw.GetPathName
End If
Next
End If
End Sub
' ファイル名の拡張子からドキュメントタイプを取得する処理
Private Function GetDocType(ByVal sPath As String) As SwDmDocumentType
Dim nDocType As SwDmDocumentType
nDocType = SwDmDocumentType.swDmDocumentUnknown
Select Case Right(UCase(sPath), 6)
Case "SLDPRT"
nDocType = SwDmDocumentType.swDmDocumentPart
Case "SLDASM"
nDocType = SwDmDocumentType.swDmDocumentAssembly
Case "SLDDRW"
nDocType = SwDmDocumentType.swDmDocumentDrawing
End Select
GetDocType = nDocType
End Function