エクセルVBA Select Caseステートメントで3つの選択肢にてSheet2「B,C,D列」の各「3-6行目」をsheet1「U20」に貼り付けようとしていますがうまくいきません
コードは以下の通りですが修正点を教えて頂けませんでしょうか
○コード
Dim 地名 As String
Select Case Range("U19").Value
Case A = "東京*"
Sheets("Sheet2").Range("B3:B6").Select
Selection.Copy
Sheets("Sheet1").Range("U20").Select
ActiveSheet.Paste
Case B = "名古屋*"
Sheets("Sheet2").Range("C3:C6").Select
Selection.Copy
Sheets("Sheet1").Range("U20").Select
ActiveSheet.Paste
Case C = "大阪*"
Sheets("Sheet2").Range("D3:D6").Select
Selection.Copy
Sheets("Sheet1").Range("U20").Select
ActiveSheet.Paste
No.1ベストアンサー
- 回答日時:
Case のあとの A=”東京*” がおかしい
Case ”東京”
Case ”大阪”
とか書きます。
Select Case ではワイルドカードを使うなら以下を参照ください。
https://www.sejuku.net/blog/30642
以下は余談ですが、Selectしなくても済むならしないほうが早いですよ。
http://officetanaka.net/excel/vba/speed/s2.htm
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセル VBAでシートのコピーを作りたい 1 2023/05/18 07:42
- Visual Basic(VBA) 【変更】ファイルを閉じてダイアログで保存した時、更新したシートだけの処理の実行をする 5 2022/03/26 18:31
- Excel(エクセル) ②Excel 簡単にシートコピーしたら前日の残高と日付を変更させたい→マクロの記録でエラーが出ます 8 2022/07/16 20:40
- Visual Basic(VBA) いつもお世話になります 下記のコード実行すると エラーになります わかるかた教えてくれませんでしょう 6 2022/12/17 15:01
- Visual Basic(VBA) データのある範囲を選択するVBAについて 2 2022/09/03 00:20
- Visual Basic(VBA) エクセルのVBAでダブルクリックでチェックを入れたあと 1 2022/10/26 20:30
- Visual Basic(VBA) 動きっぱなしです。止め方とプロシージャの間違いを教えて下さい! 5 2022/08/15 23:08
- Visual Basic(VBA) excelVBAについて。 4 2022/11/21 16:15
- Visual Basic(VBA) excelVBAについて。 1 2022/11/30 06:16
- Excel(エクセル) エクセルのマクロでコピー後の貼り付け先を毎回指定したところにしたい 5 2022/08/12 10:47
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ギターのTAB譜の記号 N.C....
-
VBA ダブルクリックするたびに...
-
マイクロソフト 一時使用コード...
-
USBが固くて外れません
-
JANコード、ITFコードの作成
-
電気コードだけ買うことって可...
-
[やさしさとして想い出として ...
-
楽譜のコードについている「a...
-
サイトによってコード譜が違う...
-
【マクロ】PasteSpecialメソッ...
-
Em7onA 。GonB。 GonAのおさ...
-
JAN コードとITFコードの違い...
-
エクセルにおいて品名コードを...
-
輸入盤CDの見分け方
-
JISコードがわからない
-
【EXCEL-VBA】PDFファイルを開...
-
ギターで2弦2フレットと3弦2フ...
-
ピアノのコードについて…
-
ギター コードの名前
-
JOBコードってなんでしょうか?
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
V7/Iというコードはありますか...
-
ギターのTAB譜の記号 N.C....
-
VBA ダブルクリックするたびに...
-
JANコード、ITFコードの作成
-
JAN コードとITFコードの違い...
-
マイナーの裏コードは存在する?
-
【EXCEL-VBA】PDFファイルを開...
-
◎PPMのコードをお教えいただ...
-
ドライアーのコードから煙が出...
-
マイクロソフト 一時使用コード...
-
Dadd11というコードについて
-
onって何ですか?
-
実行時エラー3251対応処理方法
-
ギターで2弦2フレットと3弦2フ...
-
電気製品のコードが溶けました
-
【マクロ】PasteSpecialメソッ...
-
【HULFT】 utllist とutladmin
-
Excel VBA Tabコードの出力
-
D7alt
-
『車の中でかくれてキスをしよ...
おすすめ情報