Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

32892 / 76734

←次へ　｜　前へ→


	【49071】Re:シートを選ぶのに

Blue - 07/5/22(火) 14:11 -


	引用なし

	パスワード

▼dansyaku03 さん： >ブックの中で例えばtargetColor = 5 'の見出しを全部アクティブにするには全部をアクティブにする？出来ないのでは？ (アクティブなシート→最善面に来るシート→唯一) アクティブではなく選択(Select)なら出来ると思うけど。 Sheet1～Sheet3を選択状態にするのを「マクロの記録」したもの Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select Arrayのところを動的配列でFro Eachの中で作成すれば出来るでしょう。ヒント) 　　Dim shts() As String 　　　　ReDim shts(0) 　　shts(0) = "Sheet1" 　　ReDim shts(1) 　　shts(1) = "Sheet2" 　　ReDim shts(2) 　　shts(2) = "Sheet3" 　　Sheets(shts).Select