Excel VBA質問箱 IV

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

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


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

69458 / 76732

←次へ　｜　前へ→


	【11792】For Each i In Selectionの使い方

カド

- 04/3/16(火) 15:00 -


	引用なし

	パスワード

過去ログの下記コードを例にお尋ねしますが、

１．現在のｉと一つ前のｉを比較するにはどうすれば良いのでしょうか？
　　以下だとエラーが出ます。
　　If i.Value = （i-1）.Value　Then

２．ｉを逆方から処理することは出来ないのでしょうか？
　　　（例えば、Ａ１０からＡ１に向かって処理する）

Sub DataFill()

　　Dim i As Range, j As Integer

　　For Each i In Selection
　　
　　　　If i.Value = "" Then ' 対象セルが空白だったら
　　　　
　　　　　　i.Value = j
　　　　　　
　　　　Else　　　　　　　　 ' 対象セルが空白ではなかったら
　　　　
　　　　　　j = i.Value
　　　　　　
　　　　End If
　　　　
　　Next

End Sub

2 hits

▼

【11792】For Each i In Selectionの使い方 カド 04/3/16(火) 15:00

≪