Realize,Inc.

ネットワークの教科書
Network Textbook
ネットワークの教科書

ネットワークの基礎から実務まで、順番に学べるメニューです。

ネットワークの教科書 ＞ IPアドレス管理表を自動作成する

VBAコラム

IPアドレス管理表を自動作成する

ExcelでIPアドレス管理を整理しましょう

IPアドレス、機器名、用途、備考などをExcelで管理すると、 ネットワーク構成を整理しやすくなります。 VBAを使うことで、管理表の作成や更新を効率化できます。

VBAでIPアドレス管理表を作成するイメージ

できること

  • IPアドレス管理表のひな形を作成する
  • 機器情報をExcelで整理する
  • 管理台帳の更新作業を効率化する

処理の流れ

flowchart TB
	Start[Excel VBA]
	Run[ネットワーク帯を指定して実行]
	Generate[IPアドレス一覧を自動生成]
	Format[見出しや書式を整える]
	Result[管理表のひな形が完成]

	Start --> Run
	Run --> Generate
	Generate --> Format
	Format --> Result

VBAコード

Sub CreateIPManagementTable()

    Dim ws As Worksheet
    Dim baseIP As String
    Dim i As Integer

    Set ws = ActiveSheet

    ' ネットワークのベース部分を指定（実運用に合わせて変更可能にする）
    baseIP = "192.168.1."

    ' 見出しの作成
    ws.Range("A1").Value = "IPアドレス"
    ws.Range("B1").Value = "機器名"
    ws.Range("C1").Value = "用途"
    ws.Range("D1").Value = "備考"

    ' 見出しの背景色と太字設定（表を見やすくするため）
    ws.Range("A1:D1").Interior.Color = RGB(220, 230, 241)
    ws.Range("A1:D1").Font.Bold = True

    ' IPアドレスを1〜254まで自動入力
    For i = 1 To 254
        ws.Cells(i + 1, 1).Value = baseIP & i
    Next i

    ' 列幅の自動調整
    ws.Columns("A:D").AutoFit

    MsgBox "IPアドレス管理表のひな形を作成しました。", vbInformation

End Sub

コードの解説

  1. シートを取得する

    現在開いているExcelシートを取得し、管理表の出力先として使用します。

  2. 見出しを作成する

    IPアドレスや機器情報を整理しやすいように、項目名を設定します。

  3. IPアドレス一覧を生成する

    ネットワーク機器や用途など、必要な情報を管理表へ記録できるようにします。

  4. 管理台帳として活用する

    IPアドレス管理表を残しておくことで、障害対応や機器更新時の確認に役立ちます。

出力例

IPアドレス 機器名 用途 備考
192.168.1.1 ルーター ゲートウェイ
192.168.1.2 L3スイッチ コアスイッチ
192.168.1.3 空き

注意点

IPアドレス管理表は、更新されずに古くなると逆に混乱の原因になります。 機器追加や設定変更の際は、管理表も合わせて更新してください。

まとめ

  • VBAを使うとIPアドレス管理表を効率よく整理できます
  • 管理台帳を残すことで、障害対応や保守がしやすくなります
  • 機器追加や変更時は管理表も更新してください

ネットワーク設計・トラブル対応でお困りではありませんか？

株式会社リアライズがサポートいたします。

  • ネットワーク設計・構築
  • トラブル調査・改善
  • 業務効率化・自動化
お問い合わせはこちら