【ExcelVBAマクロ講座入門編2024版 】7回 ブックにシートを追加する。前に追加、後ろに追加、枚数を指定して名前をつけて追加するマクロ。7回
動画で紹介しているマクロコード
‘ ****************************************
Sub シートの挿入()
‘ シ-ト を追加
Worksheets.Add
End Sub
Sub シートの挿入前と後ろ()
‘ シ-ト を追加 指定したワークシート”Sheet2″の前(左側)に追加
Worksheets.Add Before:=Sheets(“Sheet2”)
‘ シ-ト を追加 指定したワークシートSheets(Sheets.Count)の後ろ(右側)に追加
Worksheets.Add After:=Sheets(Sheets.Count)
End Sub
Sub ワークシートを挿入し名前をつける()
‘ 戻り値を使用してそれに名前をつける
Worksheets.Add.Name = “集計”
End Sub
Sub ワークシートを挿入し名前をつけるVer2()
‘ 新しいワークシートを挿入
Dim 新しいシート As Worksheet ‘ 新しいワークシート用の変数を宣言
Set 新しいシート = Worksheets.Add ‘ 新しいワークシートを挿入し、変数に格納
‘ 挿入したワークシートの名前を”集計”に設定
新しいシート.Name = “集計2”
‘ 処理完了のメッセージを表示
MsgBox “ワークシートを挿入し、’集計2’と名前を付けました。”, vbInformation, “完了”
End Sub
‘ ****************************************
VBAの初心者や過去に挑戦して挫折を経験した人にもおすすめの講座です。
丁寧な解説をしていきます。
このチャンネルのメンバーになると、優先的なサンプルファイルダウンロードなどの特典があります。ぜひ参加してください。
https://www.youtube.com/channel/UCQXH9pL5Pa5YP13qB2FPe_Q/join
【目次】
00:00 – Excel塾動画始まり
00:20 – 動画の内容紹介
16:07 – メンバーシップのお知らせとコードタイム
18:03 – お疲れ様 END
エクセル・Excelなんだ!カンタン!Excel塾で紹介しているExcel技や関数、マクロなどの動画版です。
「マクロ講座 再生リスト」
【特訓配列 配列の基礎から上級の応用までExcelVBA】
【連想配列】
【2019Excel塾のマクロ講座 入門編 1~20】
【2019Excel塾のマクロ講座 入門編 21~40】
【Excel塾のマクロ講座 中級編 41~60】
【Excel塾のマクロ講座 中級編 61~80】
【Excel塾のマクロ講座 中級編 81~100】
【Excel VBA 3行マクロ~すぐに使えるミニマクロ Season1】
【Excel VBA 3行マクロ~すぐに使えるミニマクロ Season2】
【Excel VBA 3行マクロ~すぐに使えるミニマクロ Season3】
【シフト表を作成】
#マクロ初心者
#Excelマクロ入門
#Excelマクロ中級
#ExcelVBA 連想配列
#ExcelVBA クラスモジュール
#ExcelVBA ユーザーフォーム
#Excel関数の使い方
詳しい解説もあるので、サイトもぜひご覧ください。
サンプルファイルはなんだ!カンタン!Excel塾のページからダウンロードできます。
https://kokodane.com/index.htm
【Meta】
https://www.facebook.com/kokodanecom
コメント
最初の方で音声が途切れていました。申し訳ありません。
動画で紹介しているマクロコード
‘ ****************************************
Sub シートの挿入()
‘ シ-ト を追加
Worksheets.Add
End Sub
Sub シートの挿入前と後ろ()
‘ シ-ト を追加 指定したワークシート”Sheet2″の前(左側)に追加
Worksheets.Add Before:=Sheets(“Sheet2”)
‘ シ-ト を追加 指定したワークシートSheets(Sheets.Count)の後ろ(右側)に追加
Worksheets.Add After:=Sheets(Sheets.Count)
End Sub
Sub ワークシートを挿入し名前をつける()
‘ 戻り値を使用してそれに名前をつける
Worksheets.Add.Name = “集計”
End Sub
Sub ワークシートを挿入し名前をつけるVer2()
‘ 新しいワークシートを挿入
Dim 新しいシート As Worksheet ‘ 新しいワークシート用の変数を宣言
Set 新しいシート = Worksheets.Add ‘ 新しいワークシートを挿入し、変数に格納
‘ 挿入したワークシートの名前を”集計”に設定
新しいシート.Name = “集計2”
‘ 処理完了のメッセージを表示
MsgBox “ワークシートを挿入し、’集計2’と名前を付けました。”, vbInformation, “完了”
End Sub
‘ ****************************************