Excel VBA質問箱 IV

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

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


19641 / 76732 ←次へ | 前へ→

【62520】Re:IF文でBLANKセルを選択し、その条件次第でそのセルに着色したいです
お礼  T-K  - 09/7/28(火) 15:09 -

引用なし
パスワード
   ▼つん さん:
>▼T-K さん
>こんにちは
>
>>ご提案いただいたmougにもアクセスしたりして。
>???私、モーグ提案した覚えないでっせ。
>
>>r=任意の数値(か文字列)とすれば、プロシージャ実行時、
>>セルに何か入っているので、それを飛ばし、
>>次のプロシージャが実行できるのでは?と考えた次第です。
>
>
>Dim r As Range
>
>と、宣言した時点で、「r」に入れらるのはセルそのものだけです。
>
>Range(任意の数値(か文字列))
>こういう形はありえません。
>「Range」についても、基本的なことをもうちっと調べられた方がいいように主今する。
>
>>On Error Resume Nextステートメントも、On Error GoTo 0も調べました。
>>(出典:Excel VBA 逆引き大全600の極意 秀和システム 他)
>>そこでエラー無視によるプログラム非正常動作を覚悟でやってみよう、
>>と思います。
>>(できればそのリスクは回避したいので、上のプロシージャを考えました)
>
>
>On Error Resume Nexをどうしても使いたくなかったら、
>対象セル範囲もそう多くないようですし、
>
>Sub test()
>
>  Dim r As Range
>  Dim blnFlag As Boolean
>  
>  blnFlag = False
>  
>  For Each r In Worksheets("Sheet1").Range("a1:c3")
>    If r.Value = "" Then
>      r.Interior.ColorIndex = 3
>      ’一回一回メッセ^時ボックス出すのもうざいので、
>      ’↓で、判定用の変数使って、最後にメッセージ出す♪
>      blnFlag = True
>    End If
>  Next r
>  
>  If blnFlag = True Then
>    MsgBox "空白セルがありまっせ・・云々"
>  End If
>  
>
>End Sub
>
>一つ一つセルをチェックして処理するやり方もありかも。
>
>
>>また、SpecialCells(xlCellTypeComments)のCommentsとは、
>>セルに挿入される「コメント挿入」でしょうか?
>>恥ずかしいのですが分かりません。
>
>SpecialCellsで検索かけたら、説明してるサイトとか簡単に見つかりそうですよ^^
108 hits

【62397】IF文でBLANKセルを選択し、その条件次第でそのセルに着色したいです T-K 09/7/16(木) 15:45 質問
【62398】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/16(木) 16:56 回答
【62401】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/17(金) 12:06 質問
【62402】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/17(金) 12:45 回答
【62403】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/17(金) 15:06 お礼
【62449】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/22(水) 17:28 質問
【62450】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/22(水) 17:46 発言
【62468】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/23(木) 9:35 お礼
【62484】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/24(金) 15:32 質問
【62488】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/24(金) 23:59 回答
【62508】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/27(月) 17:24 質問
【62509】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/27(月) 17:45 発言
【62512】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/27(月) 19:13 発言
【62520】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/28(火) 15:09 お礼
【62535】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/29(水) 10:55 質問
【62536】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/29(水) 11:31 発言
【62540】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/29(水) 13:00 質問
【62541】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/29(水) 13:21 発言
【62546】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/29(水) 16:00 質問
【62547】Re:IF文でBLANKセルを選択し、その条件次第... もも 09/7/29(水) 16:42 発言
【62549】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/29(水) 16:54 発言
【62550】私なにかぼけぼけな誤解してるのかなあ つん 09/7/29(水) 16:59 発言
【62552】Re:IF文でBLANKセルを選択し、その条件次第... もも 09/7/29(水) 17:54 発言
【62556】Re:IF文でBLANKセルを選択し、その条件次第... bykin 09/7/29(水) 22:33 発言
【62558】Re:IF文でBLANKセルを選択し、その条件次第... もも 09/7/30(木) 8:52 発言
【62559】Re:IF文でBLANKセルを選択し、その条件次第... つん 09/7/30(木) 9:53 発言
【62561】Re:IF文でBLANKセルを選択し、その条件次第... T-K 09/7/30(木) 17:24 お礼

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