Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


17495 / 76738 ←次へ | 前へ→

【64696】Re:シート内の特定のセル(条件が一致)の値とコメントをクリアする方法
発言  初心者  - 10/3/8(月) 17:43 -

引用なし
パスワード
   ▼超初心者 さん:

>
>> For Each セル In [A1:CZ1500]
>  If セル.Interior.Pattern = 10 Then
>>     If セル.Value Like "*OK*" Then
>>      セル.ClearComments
>>      セル.ClearContents
>>     ElseIf セル.Value Like "*NG*" Then
>>      セル.ClearComments
>>      セル.ClearContents
>>     ElseIf セル.Value Like "*保留*" Then
>>      セル.ClearComments
>>      セル.ClearContents
>>     ElseIf セル.Value Like "*割愛*" Then
>>      セル.ClearComments
>>      セル.ClearContents
>>     End If
>  End If
>> Next
>
>こんな感じでいかがでしょう。

早速のアドバイスありがとうございます!
上記構文を取り入れて動作チェックしてみました。
エラーはでないのですが、
網掛けセルを含むすべての指定文字&コメントが削除されなくなりました><
これを元に試行錯誤してみます。
また、良い方法やアドバイスありましたらお願いいたします。

0 hits

【64651】シート内の特定のセル(条件が一致)の値とコメントをクリアする方法 初心者 10/3/1(月) 19:39 質問
【64653】Re:シート内の特定のセル(条件が一致)の... 超初心者 10/3/2(火) 9:08 発言
【64691】Re:シート内の特定のセル(条件が一致)の... 初心者 10/3/8(月) 16:04 質問
【64693】Re:シート内の特定のセル(条件が一致)の... 超初心者 10/3/8(月) 16:49 発言
【64696】Re:シート内の特定のセル(条件が一致)の... 初心者 10/3/8(月) 17:43 発言
【64699】Re:シート内の特定のセル(条件が一致)の... 超初心者 10/3/8(月) 21:23 発言
【64716】Re:シート内の特定のセル(条件が一致)の... 初心者 10/3/10(水) 9:44 質問
【64718】Re:シート内の特定のセル(条件が一致)の... 初心者 10/3/10(水) 12:12 お礼

17495 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free