Excel VBAにてシート移動について

質問

初心者なのでわかりやすくお願いいたします、
Ｅｘｃｅｌ　でワークシートを次のシート移動したときににマクロの記述にてｓｈｅｅｔ（１）からｓｈｅｅｔ（２）に移るときにはこのように数字を書けばよろしいのですが、ある任意のシートから次シートに移動したいときには任意のシート、次のシートはどのように記述すればいいかわかりません、どなたかお教えください　　ルークといいます宜しくお願いいたします。

回答No.3

imogasi

シートタブの見えている順序番号は「インデックス」というものでとらえられる
Sub test02()
MsgBox Worksheets("Sheet2").Index
MsgBox Worksheets(3).Name
End Sub
を色々中身をかえてやってみること。感じがつかめるだろう。
ーー
Ｓｈｅｅｔ１、Ｓｈｅｅｔ２、Ｓｈｅｅｔ３、Ｓｈｅｅｔ４の例と順序で下記コードの実行をやってみて
シートの捕らえ方は、
（１）名前で
（２）インデックス番号で
のほかに
.Ｎｅｘｔや.Ｐｒｅｖｉｏｕｓ　　が゛有り
Sub test03()
MsgBox Worksheets("Sheet2").Next.Name
MsgBox Worksheets("Sheet2").Next.Next.Name
End Sub
をやってみて。
おなじみのＡｃｔｉｖｅｓｈｅｅｔという指定の仕方も在る。
ほかには無いように思うが。
ーー
これらは、ＶＢＡの「いろは」の「い」に学ぶべきことだよ。エクセルのオブジェクトはブックー＞シートー＞Ｒａｎｇｅ，セルの構成でそのように見てくると、学習の早期に知るべきことだ。

お礼

imogasiさん
ありがとうございました。
VBAは勉強をはじめたばかりなので…
より学習していきます。
ありがとうございます
ルーク

回答No.2

doara_2011

＞ある任意のシートから次シートに移動したいときには
WorksheetオブジェクトのNextプロパティを使用します。
例：Activesheet.Next.Select
ちなみに前のシートへの移動はPreviousプロパティ。

回答No.1

hallo-2007

＞ある任意のシートから次シートに移動したいときには任意のシート、次のシートはどのように記述すればいいかわかりません
意味を取り違えていなければ
Sub ボタン1_Click()
MsgBox ActiveSheet.Index
Sheets(ActiveSheet.Index + 1).Select
End Sub
今のシートのシート番号をとりあえず表示
次のシート番号へ移動　といったような感じです。