FAQ
テーブル結合されたテーブルの一覧を取得する方法
ナレッジ番号：5498 | 登録日：2023/07/27 | 更新日：2024/11/21
- 【概要】
結合されたテーブルの一覧を取得する方法を以下に示します。
【手順】
1.ArcMapを起動します。
2.Visual Basic Editorを開きます。
3.プロジェクト･エクスプローラ･ウィンドウで、Projectの下にあるArcMap Objects > ThisDocumentをダブルクリックし、コード･ウィンドウを開きます。
4.コード･モジュールに次のコードをペーストします。
Sub ListJoinedTables() Dim pMxDoc As IMxDocument Set pMxDoc = ThisDocument Dim pFLayer As IFeatureLayer Set pFLayer = pMxDoc.FocusMap.Layer(0) ListJoins pFLayer End Sub
Private Sub ListJoins(pFLayer As IFeatureLayer) ' ++ レイヤからディスプレイテーブルを取得します Dim pTable As ITable Dim pDisplayTable As IDisplayTable Set pDisplayTable = pFLayer Set pTable = pDisplayTable.DisplayTable If pTable Is Nothing Then MsgBox "The Layer is not joined" End If ' ++ 結合されたテーブルのリストを取得します Dim pRelQueryTable As IRelQueryTable Dim pDestTable As ITable Dim pDataSet As IDataset Dim strOut As String Do While TypeOf pTable Is IRelQueryTable Set pRelQueryTable = pTable Set pDestTable = pRelQueryTable.DestinationTable Set pDataSet = pDestTable strOut = strOut & pDataSet.Name & vbNewLine Set pTable = pRelQueryTable.SourceTable Loop MsgBox "結合されたテーブル:" & vbNewLine & strOut End Sub
5.Visual Basic Editorを閉じます。
6.ArcMapにフィーチャクラスとテーブルを追加し、任意のキーフィールドを使用してフィーチャクラスにテーブルを結合します。
7.ListJoinedTablesマクロを実行します。
A：ArcMapで、ツール > マクロ > マクロと選択し、マクロ･ダイアログを表示します。
B：マクロを選択し、実行をクリックします。
メタデータ
機能
種類
製品