Excel VBA質問箱 IV

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

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


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

53676 / 76738

←次へ　｜　前へ→


	【27871】Re:計算根拠を表示したまま別のセルへ答えを出す。

Kein - 05/8/22(月) 18:00 -


	引用なし

	パスワード

>マクロを実行しても良いと言う事だからFalseのみ設定すればよい
の意味がよく分かりません。IsEmpty関数は、対象が空白の場合 True になります。
この戻り値が False の場合なら、空白セルではないと判断できるのでマクロを実行
することになりますが、そうすると処理のコードを全部
If IsEmpty(Target.Value) Then
　ここへ入れる
End If
ことになり、処理部分のコードが長くなると可読性が悪くなります。なので
"マクロの処理を継続させる条件" を判定するより、中止する条件を冒頭に持ってきて
それにひっかかった時点で終わらせてしまう、という書き方の方が分かりやすいのです。
分かりますか・・?

>A,C,Eの列を計算式にB,D,Fをする場合
その場合は、入力したセルの列を Select Case で判定します。つまり
If IsEmpty(.Value) Then Exit Sub の下に

Select Case .Column
　 Case 1, 3, 5
　 Case Else: Exit Sub
End Select

を、追加しておけば良いのです。

0 hits

▼

【27852】計算根拠を表示したまま別のセルへ答えを出す。 tsumori 05/8/22(月) 13:03