質問:
エクセル５回目の質問です。
関数式の結果が空白””になっているセルを、ジャンプ機能で上方向に詰めるために、一旦数式を無効にし値のみを残すためのマクロ式を教えていただき、コピーして実行したのですが、マクロ自体実行されないのか空白になりません。そのワークシートに標準モジュールを設置し、コピーした後マクロ実行したのですが。
Sub Sample()
Dim c As Variant
For Each c In Range("A1:B100")
If c.Value = "" Then c.ClearContents
Next
End Sub
答え:
こんにちは
範囲はあってますか？
IFでどういった結果を返していますか？
マクロでは "" 空白なしにしていますが " " 半角空白、全角空白なら
それなりに変える必要があります。
ワークシートに設置？ Bookです
VBEの[挿入]→[標準モジュール]にコピーしましたか？
EXCELの該当シートを表示して
[Alt]+[F8]からSampleを実行してみてください
補足の質問:
おかげで無事問題を解決することができました。
答えを求めるのではなく、ヒントをいただいた後自分の力で解決しようとする事が大事ですね。本当に有り難うございました。この質問・回答は役に立ちましたか？
エクセル５回目の質問です。
関数式の結果が空白””になっているセルを、ジャンプ機能で上方向に詰めるために、一旦数式を無効にし値のみを残すためのマクロ式を教えていただき、コピーして実行したのですが、マクロ自体実行されないのか空白になりません。そのワークシートに標準モジュールを設置し、コピーした後マクロ実行したのですが。
Sub Sample()
Dim c As Variant
For Each c In Range("A1:B100")
If c.Value = "" Then c.ClearContents
Next
End Sub
答え:
こんにちは
範囲はあってますか？
IFでどういった結果を返していますか？
マクロでは "" 空白なしにしていますが " " 半角空白、全角空白なら
それなりに変える必要があります。
ワークシートに設置？ Bookです
VBEの[挿入]→[標準モジュール]にコピーしましたか？
EXCELの該当シートを表示して
[Alt]+[F8]からSampleを実行してみてください
補足の質問:
おかげで無事問題を解決することができました。
答えを求めるのではなく、ヒントをいただいた後自分の力で解決しようとする事が大事ですね。本当に有り難うございました。この質問・回答は役に立ちましたか？
ウェブサイトのユーザーによる情報ポスト、JPQA.comのない保証の正しさ.