次の方法で共有

SmartDocument.PickSolution メソッド (Office)

  • [アーティクル]

ユーザーが使用可能な XML 拡張パックを選択して、Microsoft Word の作業中の文書または Microsoft Excel のブックに添付できるダイアログ ボックスを表示します。

構文

式。PickSolution (ConsiderAllSchemas)

式SmartDocument オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
ConsiderAllSchemas 省略可能 ブール型 (Boolean) True を指定 すると、ユーザーのコンピューターにインストールされているすべての利用可能な XML 拡張パックが表示されます。 False を指定 すると、作業中の文書に適用できる XML 拡張パックのみが表示されます。 既定値は、 false を指定 します。

注釈

PickSolution メソッドを使用して、ユーザーが XML 拡張パックを一覧から選択できるようにします。 作業中の文書またはブックに添付されたスキーマでは、どの XML 拡張パックは、適用を判断します。

PickSolution メソッドは、ユーザーが XML 拡張パックを選択したか、ダイアログ ボックスで [キャンセル] を選択したかを示す値を返しません。 XML 拡張パックが添付されているかどうかを判断するのには、 PickSolution を呼び出した後は、 SolutionID プロパティを確認してください。

スマート ドキュメントの開発者が XML 拡張パック マニフェスト ファイル、 PickSolution によって表示される一覧に"targetApplication"を指定するのに失敗した場合は、作業中のアプリケーションを対象としない XML 拡張パックを含めることがなど、Excel のユーザーは、Word にのみ対象として、XML 拡張パックを参照してください可能性があります。 このような場合は、ユーザーがアクティブなアプリケーションの不適切な XML 拡張パックを選択できます。

スマート ドキュメントのスマート ドキュメントまたは XML 拡張パックの詳細については、 スマート ドキュメント ソフトウェア開発キット (SDK) を参照してください。

例

次の例では 、SolutionID プロパティをチェックして、作業中の Microsoft Word 文書に既に XML 拡張パックが添付されているかどうかを確認します。そうでない場合は、ユーザーが使用可能な XML 拡張パックを選択できるダイアログ ボックスが表示されます。 スマート ドキュメントのプロパティが表示されます。

 Dim objSmartDoc As Office.SmartDocument 
 Dim strSmartDocInfo As String 
 Set objSmartDoc = ActiveDocument.SmartDocument 
 If objSmartDoc.SolutionID = "None" Or objSmartDoc.SolutionID = "" Then 
 objSmartDoc.PickSolution True 
 End If 
 If objSmartDoc.SolutionID > "None" And objSmartDoc.SolutionID > "" Then 
 strSmartDocInfo = "SolutionID: " & objSmartDoc.SolutionID & vbCrLf & _ 
 "SolutionURL: " & objSmartDoc.SolutionURL 
 MsgBox strSmartDocInfo, vbInformation + vbOKOnly, "Smart Doc Properties" 
 Else 
 MsgBox "The user clicked Cancel." 
 End If 
 Set objSmartDoc = Nothing

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。