Private Sub Worksheet_Change(ByVal Target As Range)
If Target = "" Then
MsgBox "空欄です"
End If
End Sub
上記コードで、セルにカーソルを合わせてDeleteキーを押すと正常にメッセージが表示されます。
ただし、カーソルを合わせたセルが結合されていた場合、
「型が一致しません」というエラーで停止してしまいます。
結合されているセルに対しても同じ処理をするには、
If Target = "" Then
の部分をどのように指定すればよいでしょうか。
No.5
- 回答日時:
Private Sub Worksheet_Change(ByVal Target As Range)
If Application.CountA(Target) = 0 Then
MsgBox "空欄です"
End If
End Sub
はどうですか?
回答ありがとうございます。
解決したのに締め切るのを忘れていました、
申し訳ありません。
提示していただいたコードも正常動作しました。
なにやら他とは毛色が違うのでとっつきにくい印象がありますが、
使わせていただこうと思います。
ありがとうございました。
No.4
- 回答日時:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.MergeCells = True Then
MsgBox "セル結合"
End If
End Sub
が参考になれば。
回答ありがとうございます。
「Target.MergeCells = True 」を組み込むことで正常に動作しました。
if文の階層を1つ増やすか、orを入れないと空白の判断はできませんけど、
動作的に問題ないです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Excel(エクセル) エクセルのイベントプロシージャーでF列の最終行のセルの入力をトリガーにしたいのですが 1 2022/10/14 09:36
- Visual Basic(VBA) 【VBA】Excelで罫線を引きたい 3 2022/07/14 12:04
- Visual Basic(VBA) エクセルのVBAでダブルクリックでチェックを入れたあと 1 2022/10/26 20:30
- Excel(エクセル) B列に文字がはいったらA列に数字が入るマクロードを完成させたい 4 2023/04/21 01:58
- Visual Basic(VBA) エクセルVBA ダブルクリックしたら色反転を指定したセルのみにしたい 2 2022/04/06 12:52
- Visual Basic(VBA) エクセル VBAで複数セル選択時エラーになる問題 3 2022/10/04 02:40
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2022/05/26 17:19
- Visual Basic(VBA) VBAで重複した値のセルに色付けをしたい 1 2022/11/02 16:12
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
Excel Vbaを使って 結合セルをダブルクリックでチェックマークしたいのですが手順を教えてくださ
Excel(エクセル)
-
エクセル イベントマクロ Changeイベントを複数作りたい
Access(アクセス)
-
Excel VBAでのWorksheet_Changeが動作しない原因
Excel(エクセル)
-
-
4
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
5
エクセルVBAでTargetのセルに設定された「名前の定義」の取得方法は?
Excel(エクセル)
-
6
excelで結合セルの場合にエラーが出てしまう
Visual Basic(VBA)
-
7
Changeイベントでの複数セルのクリアの処理について
Visual Basic(VBA)
-
8
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
9
エクセルマクロで結合されたセルをダブルクリックで指定文字を入力
Excel(エクセル)
-
10
エクセルvba (ByVal Target As Range)について
Excel(エクセル)
-
11
エクセルのマクロで結合セルに値を貼り付けたい
Excel(エクセル)
-
12
メッセージボックスに表示する文字を大きくしたい
Excel(エクセル)
-
13
ExcelのVBAでエラー13が出てしまいます。(泣き)
Excel(エクセル)
-
14
Excel VBA あるセルでENTERを押すと特定のセルへ移動したい
Excel(エクセル)
-
15
VBA target.offset セル結合
Excel(エクセル)
-
16
VBAでの結合セルのコピー&ペースト
Excel(エクセル)
-
17
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
18
VBA エンターキーでイベントに入りたい。
PowerPoint(パワーポイント)
-
19
targetをA列のセルに限定するには?
Visual Basic(VBA)
-
20
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル: セルの枠を超えて表示
-
Excel入力で勝手にエンター押さ...
-
Excel countif関数で取り消し線...
-
SDプロフィールについて
-
エクセルで文字列の結合したと...
-
マウスポインターが白十字のまま
-
エクセルで画像を透過させて画...
-
エクセルでセルの中の色分け
-
セルは大きくさせず、中の文字...
-
エクセルでセルを上下に結合し...
-
エクセルで1つのセルにスクロ...
-
VBA:結合されたセルに対する「...
-
エクセルでセルの余白を作りたい
-
エクセルで挿入ー改行できない
-
エクセルのセル外改行は可能で...
-
エクセルのセルの網かけ
-
エクセルでセルの結合を一部だ...
-
エクセルでの書類作成
-
文章の整形について
-
エクセルのセル内の語句がはみ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセル: セルの枠を超えて表示
-
Excel countif関数で取り消し線...
-
セル内の一部の文字だけをハイ...
-
エクセルの白黒の反転で困って...
-
セルは大きくさせず、中の文字...
-
マウスポインターが白十字のまま
-
エクセルファイルに _x000D_ と...
-
Excelでcsvやtxtで保存する時に...
-
エクセルで画像を透過させて画...
-
エクセルで1つのセルにスクロ...
-
エクセルでセルを上下に結合し...
-
エクセルの2つのセルを内容も消...
-
エクセルで特定の列のセルだけ...
-
セルを結合しても、文字をセル...
-
エクセルの入力規則プルダウン...
-
VBA:結合されたセルに対する「...
-
エクセルで右隣のセルより優先...
-
Excel入力で勝手にエンター押さ...
-
エクセル 折り返して全体を表...
-
エクセル2013で英単語を折り返...
おすすめ情報