IT仕事

ExcelVBAのコメント操作で色々手間取ったので備忘録

投稿日:

フォーム上のコントロールの値を特定のセルにセットするのと、コメントの背景色をセットするには:
例えば、こんな感じに。

If TextBox8.Value <> "" Then
ActiveCell.Offset(, 5).AddComment TextBox8.Value '着日
ActiveCell.Offset(, 5).Comment.Shape.Fill.ForeColor.SchemeColor = 42
End If

特定のセルにコメントがついている/ついていないをチェックする:
例えば、こんな感じに。

If Cells(actrow, actcol + 5).Comment Is Nothing Then
Else
TextBox8.Value = Cells(actrow, actcol + 5).Comment.Text '金額欄のコメントを使う
End If

‘色番号の参考:http://park11.wakwak.com/~miko/Excel_Note/19-01_keisen.htm
‘コメント存在判定の参考:http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/vba_comment.html

-IT仕事

執筆者:

関連記事

no image

モバイルでも見れます

FireFoxに FireMobileSimulator を入れたので、 携帯向けのサイトも作れるようになったかも・・・ってことで、当サイトにWordPress Mobile Editionを入れた …

no image

難解なAPIを使わずにShopifyの注文データをAccessに取り込む

Shopify側 ・Matrixfyアプリをインストールする。・Matrixfyはデモプランでも最大10件ダウンロードできる。スケジュールタスクは何個でも作成できるので、例えば、コンビニ知らはい、銀行 …

no image

Googleマーチャントの送料設定に苦労

商品をGoogleマーチャントに登録しているのだが、いつしかエラー(警告)が出ていた。 エラー内容は、「送料の副属性が少なすぎます」。 ヘルプを見ながら、 表見出し:送料(国:地域:サービス:価格) …

no image

ContactForm7プラグイン-チェックしたチェックボックスの背景色を変える

本日やったこと。 ContactForm7プラグインを使っているが、チェックボックスのクリックが小さくて、なかなかクリックできないので、ホットスポットというか、クリック感知の範囲を広げたかった。 こん …

OneDriveに不安

最近、マイクロソフトのOffice365のサービスを使ってみている。 定額でOfficeを5台までの自分のPCにインストールできるし、期待以上に使い勝手はいい。 しかし今日、OneDriveを使ってみ …