作業シートに
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("$C$23")) Is Nothing Then
If Range("$C$23").Value = "増築" Then
Call 増築建物規模コピー
End If
End If
End Sub
を設定してます。
指定セル値に「増築」と表示された場合にマクロ「増築建物規模コピー」
が実行されます、
このコードを
指定セルC23に不特定の半角英数字が表示された場合に
マクロ「増築建物規模コピー」が実行できる方法を教えてください。
セルC23の書式設定は
(0.00"㎡";@)としております。
よろしくお願いいたします。
No.2ベストアンサー
- 回答日時:
以下のようにしてください。
Private Sub Worksheet_Change(ByVal Target As Range)
Dim RE As Object
Set RE = CreateObject("VBScript.RegExp")
RE.Pattern = "^\d+$"
If Not Intersect(Target, Range("$C$23")) Is Nothing Then
If RE.test(Range("$C$23").Value) = True Then
Call 増築建物規模コピー
End If
End If
End Sub
No.1
- 回答日時:
半角英数字とは、以下の何れかであってますか。
①0~9の数字
②a~zの文字(小文字)
③A~Zの文字(大文字)
念のためですが、
C23セルに30が設定された場合(数字のみの場合)、「増築建物規模コピー」が実行されますが、あってますか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2024/12/04 13:24
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2024/07/02 08:51
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 4 2024/12/05 16:25
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2024/04/02 16:12
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 4 2023/05/26 10:43
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/02/02 09:25
- Visual Basic(VBA) Excelのマクロについて教えてください。 1 2024/06/18 09:20
- Visual Basic(VBA) Excelのマクロについて教えてください。 1 2024/11/27 15:06
- Visual Basic(VBA) エクセルのVBAコードについて教えてください。 6 2024/06/28 11:33
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2024/04/06 10:16
このQ&Aを見た人はこんなQ&Aも見ています
-


VBA Application.Matchについての質問です
Visual Basic(VBA)
-


ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-


Excel VBAについて。こんな動作をさせるためにはどう書けばよいでしょうか。
Visual Basic(VBA)
-
-
4

pythonでAmazonのほしいものリストをローカル保存するスクリプト書いたら一部しか保存できぬ!
その他(プログラミング・Web制作)
-
5

エクセル タブの下のメニューを選択 実行するコード
Visual Basic(VBA)
-
6

[Excel VBA]特定の条件で文字を削除&残す処理をするファイルを作成したいです
Visual Basic(VBA)
-
7

VBAでセルの書式を変えずに文字列を置換する方法をご教示ください
Visual Basic(VBA)
-
8

【再投稿】レイアウトが異なる別のワークブックからデータを転記する方法を教えてください
Excel(エクセル)
-
9

条件付き書式の効率的な設定の仕方について
Excel(エクセル)
-
10

excelVBAについて。
Excel(エクセル)
-
11

excelVBAについて。
Excel(エクセル)
-
12

excelVBAについて。
Excel(エクセル)
-
13

Visualbasicの現状について教えてください
Visual Basic(VBA)
-
14

Excelのマクロについて教えてください。
Visual Basic(VBA)
-
15

excelVBAについて。
Excel(エクセル)
-
16

Excelのマクロについて教えてください。
Visual Basic(VBA)
-
17

修正依頼:【VBA】 結合セルに複数画像とファイル名一括挿入する方法
Visual Basic(VBA)
-
18

エクセルの数式が分かりません
Excel(エクセル)
-
19

Excelのマクロについて教えてください。
Visual Basic(VBA)
-
20

excelVBAについて。
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAでCOPYを繰り返すと、処理が...
-
【マクロ】並び替えの範囲が、...
-
【マクロ】オートフィルター を...
-
Vba Array関数について教えてく...
-
Vba 型が一致しません(エラー1...
-
【ExcelVBA】値を変更しながら...
-
vbsでのwebフォームへの入力制限?
-
エクセルのマクロについて教え...
-
【ExcelVBA】5万行以上のデー...
-
VBAでセルの書式を変えずに文字...
-
【マクロ】開いているブックの...
-
Vba セルの4辺について罫線が有...
-
vb.net(vs2022)のtextboxのデザ...
-
Excel VBA 選択範囲の罫線色の...
-
【マクロ】売上一覧YYYYMMDDHHS...
-
エクセルの改行について
-
VBAで特定の文字が入った行をコ...
-
WindowsのOutlook を VBA から...
-
Excel 範囲指定スクショについ...
-
【マクロ】シートの変数へ入れ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Vba セルの4辺について罫線が有...
-
vbsでのwebフォームへの入力制限?
-
【ExcelVBA】5万行以上のデー...
-
【マクロ】売上一覧YYYYMMDDHHS...
-
【マクロ】開いているブックの...
-
【マクロ】並び替えの範囲が、...
-
エクセルの改行について
-
エクセルのマクロについて教え...
-
vb.net(vs2022)のtextboxのデザ...
-
VBAでCOPYを繰り返すと、処理が...
-
VBA ユーザーフォーム ボタンク...
-
エクセルのVBAコードと数式につ...
-
エクセルのVBAコードについて教...
-
[VB.net] ボタン(Flat)のEnable...
-
【マクロ】変数を使った、文字...
-
改行文字「vbCrLf」とは
-
質問58753 このコードでうまく...
-
【マクロ】シートの変数へ入れ...
-
ワードの図形にマクロを登録で...
-
算術演算子「¥」の意味について
おすすめ情報















回答ありがとうございます。
半角英数字とは、ですが、
①0~9の数字のみの数字になります。
試しに下記のコードを設定し
セルC23に「30」と表示させると
マクロ「増築建物規模コピー」
が実行されました。
If Not Intersect(Target, Range("$C$23")) Is Nothing Then
If Range("$C$23").Value = "30" Then
Call 増築建物規模コピー
End If
End If
尚、セルC23の画面上の表示は「30.00㎡」と表示されております。
よろしくお願いいたします。