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仕事

執筆者:

関連記事

LimeSurverのEM機能

仕事で使えるかもと思いつつ、まとまって勉強する時間がなかったLimeSurverのEM機能について、調べてみた。 以下のWEB資料を読みながら実際に使ってみた。 EM/HowEnhanced | Li …

no image

WordPress + DreamWeaverの環境設定で参考にしたリンク先

DreamweaverとWordPressを連携させてテーマを編集する方法 │ Design Spice DreamWeaverで「このサーバのサイト定義が正しくないため、動的関連ファイルは解決されま …

no image

来週やるExcelVBAセミナーの準備をしていて、

同じ「飛び物」でもロケットが好きな人とラジコンが好きな人がいるよな、とふと思った。 ロケットの好きな人は、 準備をきちんと整えて、万全を期して発射スイッチを押す・・・飛んだ!あんなに高く。感動! 飛ん …

no image

情報セキュリティアドミニストレータ試験

セキュアド試験、受験。 午前の試験、結構簡単だった。 今年から50問->55問になったので内容も変わったのかと心配していたのだが、過去4年で一番やさしかったのではないか。 苦手な計算問題が少なかったよ …

no image

トップページに「新着一覧」としてカスタム投稿を日付つきで出したく、以下のページを参考にして(コピペして)作ってみたのだが、うまくいかない。 WordPress カスタム投稿の一覧をトップページ表示する …