本文へスキップ

別館:エクセルQC館 別館:エクセル株式館

  1. トップページ>
  2. VBA>
  3. VBA応用、シート操作

VBAvba

VBA関係の情報を色々を記載して行きます。


VBA応用、シート操作

(項目1)
 ・エクセルでは、ブックに複数のシートを作成できます。
 ・本ページでは、シート操作を説明します。
 ・以下、Excel2016で説明して行きます。

(項目2)
 ・代表的なシート操作は、以下の通りです。
  選択する   : Select、Activate
  名前を変更する: Name
  挿入する   : Add
  削除する   : Delete
  コピーする  : Copy
  移動する   : Move
  非表示/表示 : Visible
  保護する   : Protect
  解除する   : Unprotect
  印刷する   : PrintOut
  見出し色の設定: Tab.ColorIndex

 ・Select、Activateの違いは、以下の通りです。
  Select    : 複数のシートを選択できる
  Activate   : 一つのシートしか選択できない

(項目3)
 ・VBAコードは、以下の記述となります。

  Sub test()
    Worksheets("Sheet1").Select
    Worksheets("Sheet2").Activate
    WorkSheets("Sheet3").Name = "エクセル将棋館"
    Worksheets.Add After:=Worksheets("Sheet4") '後に挿入する
    Worksheets.Add Before:=Worksheets("Sheet4") '前に挿入する
    Activesheet.Delete
    Application.DisplayAlerts = False '確認メーセージを非表示
    ActiveSheet.Delete       'シートを削除する
    Application.DisplayAlerts = True '確認メーセージを表示
    Worksheets("Sheet5").Copy After:=Worksheets("Sheet1") '後にコピーする
    Worksheets("Sheet6").Copy Before:=Worksheets("Sheet1") '前にコピーする
    Worksheets("Sheet7").Move After:=Worksheets("Sheet1") '後に移動する
    Worksheets("Sheet8").Move Before:=Worksheets("Sheet1") '前に移動する
    Worksheets("Sheet9").Visible = False '非表示にする
    Worksheets("Sheet9").Visible = True '表示にする
    Worksheets("Sheet10").Protect  '保護する
    Worksheets("Sheet10").Unprotect '解除する
    Worksheets("Sheet11").PrintOut
    Worksheets("Sheet12").Tab.ColorIndex = 3 '見出し色を赤にする
  End Sub

(項目4)
 ・以上で、VBA応用、シート操作は終了です。



contents

エクセル将棋館

日本国

地方都市


スポンサード リンク