Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8408 / 76732 ←次へ　｜　前へ→
【73899】Re:IF文教えてください。
回答  nonoka  - 13/3/18(月) 22:21 -
引用なし
パスワード
   ▼kanabun さん：
説明不足で申し訳ありません。
ADからARにランダムに0か1が入力されています。
NからAAにはADからARの数字を読み取って
0が入っていれば空白、1が入っていれは足すという式にしたいです。

NはADが1ならK+AD、0ならKを表示。
OはAEが0なら空白、1ならN+AE
PはAFが0なら空白、1ならO+AF
ここでOが空白の場合が出てきます。その時はOの代わりに左隣のNを足す。
QはAGが0なら空白、1ならP+AG
ここも、Pが空白の場合がでてきて、その時はPの代わりにO、Oが空白ならN。
このように左隣が空白ならさらに左としたいです。
これを出来ればAAまでつなげたいです。

空白がなければ先ほどのコードを繰り返せば可能だったのですが。
コードで計算して値を代入して行きたいです。
238 hits
▼ 【73895】IF文教えてください。 nonoka 13/3/18(月) 19:21 質問
【73896】Re:IF文教えてください。 kanabun 13/3/18(月) 19:39 発言
【73897】Re:IF文教えてください。 nonoka 13/3/18(月) 20:24 質問
【73898】Re:IF文教えてください。 kanabun 13/3/18(月) 21:36 発言
【73899】Re:IF文教えてください。 nonoka 13/3/18(月) 22:21 回答≪
【73900】Re:IF文教えてください。 nonoka 13/3/18(月) 23:37 お礼
【73901】Re:IF文教えてください。 kanabun 13/3/19(火) 0:05 発言
【73902】Re:IF文教えてください。 kanabun 13/3/19(火) 0:16 発言
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8408 / 76732 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free