ようこそ ゲスト さん、新規登録（無料）して気になる疑問を解決しませんか？
はじめての方へ｜ヘルプ｜FAQ
スポンサーサイト（詳細）

質問
質問者：yousukei VBA：ワークシート名の変数格納
困り度：
  • 困っています
 ユーザーフォームを使用して、ワークシート名を表示しまして、選択したワークシート名を変数に収めて、Workshees(変数）みたいな感じで処理の対象にしていきたいと考えています。
何が適切な方法かわからない状態です。　もしよろしければコードも教えてください。よろしくお願いします。
質問投稿日時：08/04/20 02:54
質問番号：3961392
この質問に対する回答は締め切られました。

回答

良回答20pt
回答者：onlyrom ＞ユーザーフォームを使用して、ワークシート名を表示しまして、選択したワークシート名を変数に収めて

どこに表示したシート名を選択するのかが定かではないのでなんですが、
選択とあるので、ComboBoxかListBoxでしょうから。
　
'-------------------------------------------------

　　Dim mySheet

'コンボボックスの場合

　　mySheet = ComboBox1.List(ComboBox1.ListIndex)

'リストボックスの場合

　　mySheet = ListBox1.List(ListBox1.ListIndex)

'選択したシートのセルＢ７に"７７７"を代入する

　　Sheets(mySheet).Range("B7").Value = 777

'-----------------------------------------------

以上。
　
種類：回答
どんな人：一般人
自信：自信あり
回答日時：08/04/20 13:49
回答番号：No.1
この回答へのお礼ありがとうございました。
お蔭様で解決しました。
 
スポンサーサイト（詳細）
このページのトップへ