FAQ
全てのレイヤを非表示に設定する方法

ナレッジ番号:5519 | 登録日:2023/07/27 | 更新日:2024/11/21

【概要】

ArcMapのTOCにある全てのレイヤを非表示に設定する方法を示します。


【手順】

  1. ArcMapを起動します。

  2. Visual Basic Editorを開きます。

  3. プロジェクト・エクスプローラ・ウィンドウで、Projectの下にあるArcMap Objects > ThisDocumentをダブルクリックし、コード・ウィンドウを開きます。

  4. コード・モジュールに次のコードをペーストします。

    
    
    Sub VibleOff_AllLayer()
      
    
    
    
    
    Dim pMxDoc As IMxDocument
      Dim pMap As IMap
      Dim pFeatureLayer As IFeatureLayer
      Dim i As Integer
    
      'アクティブなデータフレームを取得します。
      Set pMxDoc = ThisDocument
      Set pMap = pMxDoc.FocusMap
    
      '全てのレイヤをループ処理し、非表示に設定します。
      For i = 0 To pMap.LayerCount - 1
        Set pFeatureLayer = pMap.Layer(i)
        pFeatureLayer.Visible = FALSE
      Next i
    
      'ビューを再描画します。
      pMxDoc.ActiveView.Refresh
    
      'TOCを再描画します。
      pMxDoc.UpdateContents
    End Sub
    
    
    
  5. Visual Basic Editorを閉じます。

  6. マクロを実行します。

    A:ArcMapで、ツール > マクロ > マクロと選択し、マクロ・ダイアログを表示します。

    B:マクロを選択し、実行をクリックします。

メタデータ

機能

種類

製品