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

紙2001 長い間お世話になりました。

身辺整理をしております。 (といっても、辞表を出したとかそういうのではなく、単に、新年度に入ったので、スッキリしたく) まずは、IT環境からということで、いらないデータを削除したり、移動したり。 ソフ …

no image

CSSメニューとその下のFlashムービーが重なって見えない

WordPressのTwenty-elevenのテンプレートを元にして、新たなテーマを作っている。 メニューの下にFlashアニメーションを配置したのだが、サブメニューがすっと表示されるときに、アニメ …

Word2013で「内容に問題があるため開くことができません」エラー、なんとか生還

昼休み前に保存して閉じたWord文書を、昼休み開けに開くと、上記エラー発生。 午前中いっぱいかかって作った仕事がパー! ・・・ということにしたくなかったので、あれこれもがいてみたら、何とか開くことがで …

no image

AutoHotkeyでNumLockキーをBackSpaceに入れ替え

会社で使っている、HP ProBook470のキーボードが使いにくい。 BackSpaceが小さく、隣のNumLockを間違えて押してしまう。 以下のリンクを参考に、AutoHotkeyというソフトで …

no image

hostingrails.com

知り合いがHPを作ってくれというので、どこかのサーバを借りることにした。 いろいろ検討した結果、hostingrails.comというところにした。 このレンサバはその名の通り、Railsで作ったWe …