よろしくご教授ください。
VisualBasicで、マクロを組む初心者です。
以下のようにダブルクリックを対象の行で行うと、"通常"と自動表示され、再度ダブルクリックをすると空白になる、と組みました。
そこを、2回目のダブルクリックで"特別"、3回目で空白にもどるようにしたいのですが、うまくできません。
どなたか、ご存知でしたらよろしくご指導くださいませ。
Case 1
If IsEmpty(Target) Then
Target.Value = "通常"
Else
Target.Value = Empty
End If
Cancel = True
No.2ベストアンサー
- 回答日時:
こんにちは。
Select Case 構文で、カウントを取ろうとしたけれども、それが出来ないから、という質問のようですが、もう一度、組み立てをしてみてください。
ダブルクリックを対象の行(以下のコードでは、省略します)
1回目のダブルクリックで"通常"
2回目のダブルクリックで"特別"、
3回目で空白にもどる
もし、これが、"通常"と入った後に、空白にして、また、次にダブルクリックの時に、"特別" と入るようなら、これは、なかなか難しいです。配列なんていう方法もあるかもしれませんが、それは、Excelの考え方ではありませんからね。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
With Target
If IsEmpty(.Value) Then
.Value = "通常"
ElseIf .Value Like "通常*" Then
.Value = "特別"
Else
.ClearContents
End If
End With
Cancel = True
End Sub
なお、私は、.Value ="通常" とは、なんとなくですが、していません。
この回答への補足
ありがとうございます。
空白 → ”通常” → ”特別” → 空白 ...となってくれるのが理想ですので、きっとお教えくださった方法ですね。月曜に会社で早速やってみます。ご親切に教えて下さりありがとうございました。
No.1
- 回答日時:
> Case 1
> If IsEmpty(Target) Then
> Target.Value = "通常"
> Else
> Target.Value = Empty
> End If
> Cancel = True
このコードはご自分で組まれたんですよね?
これを組めるのに、なぜご質問されていることが解らないのかが不思議です。
ご自分で組まれたコードをちゃんとご理解なさっていますか?
この回答への補足
すみません、しっかりは理解してません。教えてもらいながら、本を見ながらやってみたものです。教えてくれた方が中々捕まらず、困ってしまいご質問させて頂きました。ありがとうございました。
補足日時:2008/03/08 12:02お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのVBAでダブルクリックでチェックを入れたあと 1 2022/10/26 20:30
- Visual Basic(VBA) エクセルVBA ダブルクリックしたら色反転を指定したセルのみにしたい 2 2022/04/06 12:52
- Visual Basic(VBA) Excelにて、シート1の行を削除するとシート2のシート1と同じ番号の行も削除したい 3 2022/05/08 04:24
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) excel2021で実行できないマクロ。どこを直したらいいのか 2 2022/03/28 03:40
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Excel(エクセル) Excel2019 マクロを使用し画像を貼り付けした際のリンク切れについて 2 2022/11/15 16:14
- Excel(エクセル) B列に文字がはいったらA列に数字が入るマクロードを完成させたい 4 2023/04/21 01:58
- Visual Basic(VBA) VBAのトグルボタンでのマクロについて質問です 3 2022/10/10 17:23
- Visual Basic(VBA) エクセル VBAについて 2 2022/05/16 16:33
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
LINEのこの空白ってどんな意味...
-
Wordの差し込み印刷で空白行が...
-
INDEXとMATCH関数で#N/Aが出る...
-
Word ○(まる)で表示される空白
-
bashでの空白と空文字の判断
-
Excel計算式が入ってるセルを空...
-
VBA ""が認識されないのはなぜ...
-
リンク貼り付けで空白セルが0表...
-
IE7左端に空白 グーグル検索時...
-
「 - 」と「 _ 」 の違い
-
マクロ 空白セルまで繰り返す
-
PowerPointの表内のカンマ
-
EXCELでタイトル行と一番下の行...
-
【VBA】PDF出力に任意のファイ...
-
エクセルでセル内改行の1行目...
-
名簿の漢字名を関数で半角カナ...
-
セル上に表示された見かけ上の...
-
エクセルでエンターを押すと隣...
-
エクセルでleft関数の結果が表...
-
エクセルの計算式でコンマを付...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
LINEのこの空白ってどんな意味...
-
Wordの差し込み印刷で空白行が...
-
INDEXとMATCH関数で#N/Aが出る...
-
Word ○(まる)で表示される空白
-
bashでの空白と空文字の判断
-
Excel計算式が入ってるセルを空...
-
エクセルでフッターに空白を入れる
-
空白行があると #DIV/0なる?...
-
「 - 」と「 _ 」 の違い
-
ちょっと特殊な連続印刷のマク...
-
latexで、行の先頭に空白を入れ...
-
Excel関数で90%から110%の間を◎...
-
エクセルで1つでも×か空白があ...
-
アクセスのクエリで空白を0と...
-
VBA ""が認識されないのはなぜ...
-
マクロ 空白セルまで繰り返す
-
仕事で使う数式を自分で作成で...
-
VBAでの配列について
-
ニックネームが無い!
-
メモ帳のスクロールバーを変更...
おすすめ情報