| |
▼ichinose さん：
>▼カンジ さん：
>おはようございます。
>
>>複数シートの選択について教えてください
>>シート数が毎回変化する時に対応できるマクロを組みたいのですが
>>最後のシートを選択する指示が分かりません
>>複数シート選択は
>>
>>Sheets(Array(Sheet3,Sheet4)).Select
>これ↑
>
>Sheets(Array("Sheet3","Sheet4")).Select
>
>こうですよね！！
>
>
>>
>>で出来ますが
>>Sheet3から最後のシート（シート数は変化する）までを全て選択する
>>場合はどうすればいいか教えていただきたいのですが。よろしくお願いします
>
>Sub sample()
> Dim sht As Object
> Set sht = Sheets("sheet3")
> Do
> sht.Select False
> Set sht = sht.Next
> Loop Until sht Is Nothing
>End Sub
>
>では？
ichinoseさん ありがとうございます。
("sheet3")の""を忘れておりました。
実行しましたら出来ました。ありがとうございます。
さらに、シート名指定から、左から３番目のシートから最後のシートまでの
選択に挑戦しましたが自分の力では出来ませんでした。
シート名ではなく、左から３番目から最後のシートまで、の選択についても
教えていただければありがたいのですが。よろしくお願いいたします。
|
|
カンジ
- 08/1/6(日) 11:58 -
