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

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

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

Amazonへ出品している商品の、商品名だけを一括で変更したいときの手順

1.以下のページを参考に、出品レポートをダウンロード。商品名を一括で変更・編集する方法 – Amazon出品サービス / 出品に関する一般的な質問 – Amazonセラーフォー …

no image

MDTM対応FTPクライアント

Webサーバにあるファイルをほとんど全て上書きしたい。 しかし、その中に最近お客様が書き換えたファイルが2・3あり、それは対象外。 しかししかし、量に埋もれているのでファイル名で探すのが骨。更新日で探 …

Googleドキュメントの共有したスプレッドシートが表示できない

困った現象: ・ウェブに一般公開設定したスプレッドシートが、ログアウトした状態で、共有できない。 ・共有設定をしているにもかかわらず、共有リンクを開こうしようとするとログイン画面に転送される。 ・スプ …

no image

イーサネットコンバーターを使ったプリンタの無線化で手間取った件

会社で、BuffaloeのイーサネットコンバータWLI3-TX1-G54を使って、CanonのLPB6300を無線化しようとしたのだが、結果1日半かかってナントカできたもののヘトヘトになってしまったの …