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

ColorMeShopの独自ドメインで作成したメールが受信できないトラブルに遭遇

現象は、ColorMeShopの注文フォームからのメール(フォームからメール)は届くが、それ以外(メールソフトからメールソフト)が届かない。 いろいろ調べてわかったのは、管理画面の、オーナー情報-メー …

no image

WordPressでOpenIDにチャレンジ、半分成功

例えば、YahooIDを持っている人なら誰でも、投稿者としてコメントできるようにするといいなあ、それができたら、ああいう使い道やこういう使い道があるなあ・・・ということで、やってみた。 ・まず普通の要 …

no image

PSPでスライスツール

以前に覚えたのだがいざ使う段になると忘れていた昨日。なのでメモ。 1.Photoshopでガイドラインを引く。 2.スライスツールを選択し、ガイドラインの角から対角線を引くように選択。 3.続けて切り …

no image

LimeSurvey2.00+(131009) インストールでトラブル

たまたま使っていたLimeSurveyの管理画面右上に、 「利用可能なアップデート: 2.00+(131009) または 2.05RC2(131011)」 とあったので、 「しばらくアップデートしてい …

秀丸エクスプローラClassicをブックマークが開いた状態で起動したい

Googleを検索したら、誰もブログにやり方を書いていないみたい。 中途半端に面倒で、かつ中途半端に簡易だからだろう。 よって私が。 1.秀丸エクスプローラClassicのパスを調べておく。私の場合は …