[[20230317124958]] 『プルダウンメニューで選択時に特定のセルの文字削』(春) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『プルダウンメニューで選択時に特定のセルの文字削除』(春)

A4にプルダウンメニューで下記の名前が入っていて

山田
山本
田中

例えば田中を選択すると、D7やE2からE10といった特定のセルに入力されている文字が削除されるようにすることは可能ですか?

D7やE2にはカタカナや数字(日付)、アルファベットが入力されています。

よろしくお願いします。

< 使用 Excel:unknown、使用 OS:Windows 11、Windows 10 >


 Private Sub Worksheet_Change(ByVal Target As Range)
     Application.EnableEvents = False
     With Target
         If .Address = "$A$4" Then
             If .Value = "田中" Then
                 Range("D7").ClearContents
                 Range("E2").ClearContents
                 Range("E10").ClearContents
             End If
         End If
     End With
     Application.EnableEvents = True
 End Sub

(てきとうなやつ) 2023/03/17(金) 13:04:24


シートのモジュールに書いてくださいね
(てきとうなやつ) 2023/03/17(金) 13:09:18

>D7やE2からE10といった

   Range("D7").ClearContents
   Range("E2:E10").ClearContents

or

  Range("D7", "E2:E10").ClearContents

(訂正) 2023/03/17(金) 14:23:07


(てきとうなやつ)さま

ご返信ありがとうございます。

Alt+F11でVBAを表示させて「挿入」→「標準モジュール」から教えていただいた内容をコピペして保存したのですが、何も起こらないです。
不足している工程がありますか?

すごく初心者で申し訳ございません。
(春) 2023/03/17(金) 16:03:03


 >シートのモジュールに書いてくださいね
 って書いてあるよ
https://excel-ubara.com/excelvba4/EXCEL251.html
(稲葉) 2023/03/17(金) 16:03:46

 >シートのモジュールに書いてくださいね
 シート名を右クリックでコードの表示。

 あと、田中を選び直さないと消えません。

(檸檬) 2023/03/18(土) 12:39:21


(稲葉)さま

参考にさせていただきました。
ありがとうございます。

(檸檬)さま

ありがとうございます。
そこは気付きませんでした。
教えていただいた通りにやってみたらできました。
本当に感謝いたします。
(春) 2023/03/20(月) 16:36:30


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.