Excel VBA質問箱 IV

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

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


53309 / 76732 ←次へ | 前へ→

【28239】Re:空白のセルを飛ばして処理したい
回答  かみちゃん  - 05/9/1(木) 0:10 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>以下のような記述で動作させたのですが空白のセルが2〜3行以上あると
>動作が止まってしまいます。また1番最初の時もうまく処理してくれません。

動作がよく理解できないのですが、
特定のセル範囲の「数値」または「文字」が入っているセル範囲のみ処理する場合は、
一般操作の「編集」−「ジャンプ」の「セル選択」で「定数」を選択し、「数値」と「文字」にチェックを入れる
という操作を「マクロの記録」で記録して、少し変えると次のようなコードでできると思います。

Sub Macro1()
 Dim MyRange As Range
 For Each MyRange In Range("A1:B100").SpecialCells(xlCellTypeConstants, 3)
  MsgBox MyRange.Address(0, 0) & " の値は " & MyRange.Value
 Next
End Sub

0 hits

【28237】空白のセルを飛ばして処理したい あさか 05/9/1(木) 0:00 質問
【28239】Re:空白のセルを飛ばして処理したい かみちゃん 05/9/1(木) 0:10 回答
【28271】Re:空白のセルを飛ばして処理したい あさか 05/9/1(木) 20:30 質問
【28276】Re:空白のセルを飛ばして処理したい nossori 05/9/1(木) 21:53 回答
【28277】Re:空白のセルを飛ばして処理したい [名前なし] 05/9/1(木) 21:59 回答
【28278】Re:空白のセルを飛ばして処理したい [名前なし] 05/9/1(木) 22:02 発言
【28280】Re:空白のセルを飛ばして処理したい あさか 05/9/1(木) 23:20 お礼
【28283】Re:空白のセルを飛ばして処理したい かみちゃん 05/9/1(木) 23:35 発言
【28284】Re:空白のセルを飛ばして処理したい [名前なし] 05/9/1(木) 23:44 回答
【28285】Re:空白のセルを飛ばして処理したい あさか 05/9/2(金) 7:38 お礼

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