Excel VBA質問箱 IV

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

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


15068 / 76734 ←次へ | 前へ→

【67151】ブランクセル群のすぐ左隣にあるセル群の数値を合計した値が欲しい。
質問  リス  - 10/11/10(水) 19:26 -

引用なし
パスワード
   環境:Windows XP Home Edition EXCEL 2003

お世話になります。

A列には、任意の数字が入っており、列中にブランクはありません。
B列には、任意の数字が入っており、かつ列中にブランクがあります。

  |A| |B |
1  | 2||15 |
2  | 5||10 |
3  | 3||20 |
4  | 1||" "| →ブランク
5  | 2||" "| →ブランク
6  | 4||10 |
7  | 6||25 |

B列に1個、又は1個以上で且つ連続したブランクセル""が存在する場合
ブランクセル(連続している行の全て)の
1.すぐ左隣のセル(群)の値
2.すぐ左隣のセル(群)の一つ上のセルの値 
  を合計した値を取得したいです。

例えば、表ですと

B4とB5が1個以上の連続したブランクセルなので
すぐ左隣のセル群=A4とA5 →値は 1 と 2
すぐ左隣のセル群(=A4とA5)の一つ上のセル=A3 →値は  3
で 1+2+3 = 6 という値を取得したいのです。

(条件)ここまでのコードの流れで、出現した1個目の
ブランクセルの列数を変数:j に代入している状態です。
例えば、表ではB4セルが1個目のブランクセルなので 
変数:j に 4 が格納されています。

よって、変数 j から参照する形で、上記の欲しい値を
取得できればと考えています。

下記まで書いて、行き詰まりました。

Range("B" & j), Range("B" & j).End(xldown))              .SpecialCells(xlCellTypeBlanks).Offset(0,-1)


恐れ入りますが、どなたかご指導頂けないでしょうか。
1 hits

【67151】ブランクセル群のすぐ左隣にあるセル群の数値を合計した値が欲しい。 リス 10/11/10(水) 19:26 質問
【67152】Re:ブランクセル群のすぐ左隣にあるセル群... Hirofumi 10/11/10(水) 19:50 発言
【67153】Re:ブランクセル群のすぐ左隣にあるセル群... リス 10/11/10(水) 20:43 発言
【67154】Re:ブランクセル群のすぐ左隣にあるセル群... Hirofumi 10/11/10(水) 22:32 発言
【67156】お礼 リス 10/11/11(木) 19:05 お礼
【67155】Re:ブランクセル群のすぐ左隣にあるセル群... ichinose 10/11/11(木) 7:16 発言
【67157】お礼 リス 10/11/11(木) 19:07 お礼

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