No.2ベストアンサー
- 回答日時:
サンプル
コメントがそのセルに既にある場合
Sheets("Sheet1").Range("A1").Comment.Text " commented at " & Format(Time, "hh:mm:ss")
コメントが無い場合
Sheets("Sheet1").Range("A1").AddComment " commented at " & Format(Time, "hh:mm:ss")
No.6
- 回答日時:
1つ書き忘れました。
(余計なことかもしれませんが)#3さんの方法では、C3セルに値が入っていなかったり、数字が入っている場合、
Range("A3").Comment.Text Text:=Cells(3, "c").Value
でエラーになります。
Range("A3").Comment.Text Text:=cstr(Cells(3, "c").Value)
とするか
#4さんのように一旦文字列変数に格納するか
私の様に.Valueでなく.Textを使うかしないとだめだと思います。
(絶対文字が入っていれば、気にすることもないかもしれませんが)
EXCEL2000なので、それ以降のバージョンではうまくいくのかな?
確認してみてください。
No.5
- 回答日時:
私もサンプルです。
コメントがあるかないかを判断しています。
Sub Macro1()
Dim Msg As String
Msg = "TEST"
With Worksheets("Sheet1").Range("A2")
If (.Comment Is Nothing) Then 'コメントがない場合
.AddComment Worksheets("Sheet1").Range("B2").Text 'B2セルの値を入れる
Else
.Comment.Text Msg '変数を入れる
End If
End With
End Sub
No.4
- 回答日時:
こちらもサンプルです。
セルA1の値を B1に「セルのコメント」として設定させています。Sub Macro1()
Dim Mytext As String
Mytext = Range("A1").Value
Range("B1").Select
Range("B1").AddComment Text:=Mytext
End Sub
No.3
- 回答日時:
C3セルに、例えば「東京管轄」と入れて下記を実行すると
A3のコメントに「東京管轄」と入りましたが。
Cells(3, "c").ValueとValueが必要のようです。
Sub test01()
Range("A3").AddComment
Range("A3").Comment.Visible = False
Range("A3").Comment.Text _
Text:=Cells(3, "c").Value
End Sub
#1のご回答のような問題でしょうか。それならごめんなさい。
No.1
- 回答日時:
コメントというのは
「'」
で始まる一行のことでしょうか。その行内はすべてコメントアウトされるので、その行内に何を書いても実行はされないと思います。
' 変数宣言しまーす! Dim i as Integer どうですか?
とか
' iに値を格納しますよー! i = 1 どうだ!
と書いても、そのInteger大のメモリ領域確保は行われませんし当然思うところの「1」という値もどこにも保持されません。
そして、そのようなことをする必要もないのではないのでしょうか。
' 変数宣言
Dim i as Integer
' 値格納
i = 1
これが普通のやり方です。コードがどれほど複雑になっても、コメント行はコメント行として使うしかないと思います。
間違っていたら誰か正してください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/02/02 13:13
- Visual Basic(VBA) 昨日、質問した件『VBA にて、条件付き書式で背景色を設定しているセルの範囲で、背景色付きのセルをカ 4 2022/04/07 14:39
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2022/06/22 11:19
- Visual Basic(VBA) Excel(VBA) 特定の条件に該当する行の値、書式を同じセルにコピ&ペーストしたいです 1 2022/05/21 18:18
- 会計ソフト・業務用ソフト エクセル 背景色のついたセル位置を参考にして固定の数値を取得する 4 2022/07/11 08:44
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 3 2022/06/10 09:24
- Visual Basic(VBA) VBAで自動集計(特定セルコピー月ごとに値貼り付け)したい。 6 2023/06/25 11:37
- Excel(エクセル) エクセル バーコード作成で他のシートを参照するには? 2 2023/05/03 16:57
- Visual Basic(VBA) VBA にて、条件付き書式で背景色を設定しているセルの範囲で、背景色付きのセルをカウントできる、VB 2 2022/04/06 21:33
- Visual Basic(VBA) VBA ドロップダウンリストを残して値のみクリア 2 2022/10/27 05:42
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
VBAでファイルを開くときにファイル名でワイルドカードを使用したいです
その他(プログラミング・Web制作)
-
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
-
4
エクセルVBAでコメントのコピー
Excel(エクセル)
-
5
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
6
ExcelVBAでBookを開く時にファイル名の一部だけを指定で
Access(アクセス)
-
7
エクセルのコメントで自動サイズ調整
Excel(エクセル)
-
8
VBAでワークブックの名前を変数にして開かせる?
Excel(エクセル)
-
9
Excel2003 の『コメント』の編集位置が、あらぬ位置に勝手に移動してしまう件で教えて下さい。
Excel(エクセル)
-
10
ExcelVBAで質問です。Workbook_openイベントが発生し
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
首吊りどこ締めるの
-
至急!尿検査前日にオナニーし...
-
勃起する時って痛いんですか? ...
-
彼女のことが好きすぎて彼女の...
-
検便についてです。 便は取れた...
-
白血球が多いとどんな心配があ...
-
尿検査前日に自慰行為した時の...
-
尿検査の前日は自慰控えたほう...
-
腕を見たら黄色くなってる部分...
-
中出しをするとお腹が痛い・・・。
-
これって喉仏ですか? 私は女性...
-
EXCELで式からグラフを描くには?
-
口の中に黒い血の塊
-
精子が黄色?
-
納豆食べた後の尿の納豆臭は何故?
-
舌の裏の痛みのないプツプツの...
-
excelでsin二乗のやり方を教え...
-
エクセル指定した範囲からラン...
-
甲状腺腫れ
-
2つの数値のうち、数値が小さい...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
至急!尿検査前日にオナニーし...
-
首吊りどこ締めるの
-
尿検査の前日は自慰控えたほう...
-
尿検査前日に自慰行為した時の...
-
検便についてです。 便は取れた...
-
白血球が多いとどんな心配があ...
-
中出しをするとお腹が痛い・・・。
-
射精をして1週間以内に尿検査を...
-
彼女のことが好きすぎて彼女の...
-
腕を見たら黄色くなってる部分...
-
勃起する時って痛いんですか? ...
-
変な話しになります。尿検査で...
-
これって喉仏ですか? 私は女性...
-
EXCELで条件付き書式で空白セル...
-
男です。昨日の午後3時くらいに...
-
今朝、毎朝の習慣でオナニーし...
-
納豆食べた後の尿の納豆臭は何故?
-
1日前の検尿
-
値が入っているときだけ計算結...
-
精子が黄色?
おすすめ情報