Excel VBA質問箱 IV

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

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


43479 / 76732 ←次へ | 前へ→

【38300】Re:同一名で始まるシートをすべて選択するには?
回答  Kein  - 06/5/31(水) 3:24 -

引用なし
パスワード
   こんな感じでも出来ます。

Sub MySheets_Select()
  Dim WS As Worksheet
  Dim Flg As Boolean
 
  For Each WS In Worksheets
   If Left$(WS.Name, 6) = "データベース" Then
     If Flg = False Then
      WS.Activate: Flg = True
     Else
      WS.Select False
     End If
   End If
  Next
End Sub

0 hits

【38282】同一名で始まるシートをすべて選択するには? Cuore=Tane 06/5/30(火) 22:24 質問
【38284】Re:同一名で始まるシートをすべて選択する... MARBIN 06/5/30(火) 22:32 発言
【38300】Re:同一名で始まるシートをすべて選択する... Kein 06/5/31(水) 3:24 回答
【38359】Re:同一名で始まるシートをすべて選択する... ToshiyoriB 06/5/31(水) 21:58 質問
【38364】Re:同一名で始まるシートをすべて選択する... Kein 06/5/31(水) 22:20 回答
【38399】Re:同一名で始まるシートをすべて選択する... ToshiyoriB 06/6/1(木) 21:59 質問
【38400】Re:同一名で始まるシートをすべて選択する... Kein 06/6/1(木) 22:19 回答
【38477】Re:同一名で始まるシートをすべて選択する... Cuore=Tane 06/6/3(土) 21:28 お礼

43479 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free