| 投稿日 | ： 2004/08/04(Wed) 17:17 |
| 投稿者 | ： EXEC |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： シート名の取得について |
はじめまして。
Dim Src As Object 'オブジェクト型
Dim SheetNo As Integer
For SheetNo = 18 To 25
Set Src = Worksheets(SheetNo).Name
中略
Next
上記コードの実行時に、「オブジェクトが必要です。」のメッセージが出ます。
コード上にシート名を記述せずにオブジェクト型のSrcにシート名を代入する方法をご教授頂きたく投稿しました。
よろしくお願いします。