|
▼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")の""を忘れておりました。
実行しましたら出来ました。ありがとうございます。
さらに、シート名指定から、左から3番目のシートから最後のシートまでの
選択に挑戦しましたが自分の力では出来ませんでした。
シート名ではなく、左から3番目から最後のシートまで、の選択についても
教えていただければありがたいのですが。よろしくお願いいたします。
|
|