Excel VBA質問箱 IV

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

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


56163 / 76732 ←次へ | 前へ→

【25328】Re:空白セルの検索
発言  akiuma  - 05/5/28(土) 18:37 -

引用なし
パスワード
   ▼kazu さん:
>>Sub B()
>  A = Application.WorksheetFunction.CountIf(Range("A1:A10"), "")
>  If A <> 0 Then
>    For Each C In ActiveSheet.Range("A1:A10").SpecialCells(xlCellTypeBlanks)
>      MsgBox C.Address
>    Next
>  End If
>End Sub

失礼ですが、このプログラムだとデータ丸ごと10件入力したら、数値以外の入力エラーが発見できないと思います。

0 hits

【25299】空白セルの検索 kouka 05/5/27(金) 12:01 質問
【25301】Re:空白セルの検索 kazu 05/5/27(金) 13:24 発言
【25303】Re:空白セルの検索 ichinose 05/5/27(金) 13:47 発言
【25307】Re:空白セルの検索 kouka 05/5/27(金) 14:30 お礼
【25311】Re:空白セルの検索 ichinose 05/5/27(金) 20:05 発言
【25371】Re:空白セルの検索 kouka 05/5/30(月) 10:00 お礼
【25328】Re:空白セルの検索 akiuma 05/5/28(土) 18:37 発言
【25317】Re:空白セルの検索 [名前なし] 05/5/27(金) 22:42 回答
【25329】Re:空白セルの検索 akiuma 05/5/28(土) 18:40 発言
【25372】Re:空白セルの検索 kouka 05/5/30(月) 10:11 お礼

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