Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5611 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【49989】シートを変数で指定する方法 むぅ 07/7/2(月) 13:36 質問[未読]
【49991】Re:シートを変数で指定する方法 通りすがり 07/7/2(月) 14:17 回答[未読]
【49992】Re:シートを変数で指定する方法 むぅ 07/7/2(月) 15:58 お礼[未読]
【49989】シートを変数で指定する方法
質問  むぅ  - 07/7/2(月) 13:36 -
引用なし
パスワード
   数値でシート名がついているシートを変数で指定する良い方法はないでしょうか？
計算の結果で特定シートを選択したいのですが...

例）シート名：100,200,300
　　Dim SheetNane As Integer
　　SheetName = Sheet1.Range("A1").Value
　　Worksheets("SheetName").Activate

のような感じで、Sheet1のセルA1の値が「100」の場合にWorksheets("100")が
アクティブになるみたいな...
どなたかよろしくお願いします
【49991】Re:シートを変数で指定する方法
回答  通りすがり  - 07/7/2(月) 14:17 -
引用なし
パスワード
   ▼むぅ さん：

>　　Dim SheetNane As Integer
　　Dim SheetNane As String

>　　SheetName = Sheet1.Range("A1").Value
>　　Worksheets("SheetName").Activate
　　Worksheets(SheetName).Activate

こんな感じで出来るかと思います。
【49992】Re:シートを変数で指定する方法
お礼  むぅ  - 07/7/2(月) 15:58 -
引用なし
パスワード
   なるほど。文字列型にしてやるといい訳ですね。
助かりました。
どうもありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5611 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free