Excel VBA質問箱 IV

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

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


66527 / 76738 ←次へ | 前へ→

【14774】Re:エラー処理に関して
質問  123  - 04/6/7(月) 21:22 -

引用なし
パスワード
   つん さん

返信ありがとうございます。
早速ためしてみたのですが、

まず、
>  Dim r As Range
>
>  Set r = Selection.Find(What:="AA", After:=ActiveCell, LookIn:=xlFormulas, _
>   LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext _
>   , MatchCase:=False, MatchByte:=False)
>  
>  If Not r Is Nothing Then
>    r= ActiveCell.Row
     特定のセルに色をつけたい・・・
>  End If
としたいのですが、うまくいきません。
rには、検索行が入っているのでしょうか?

それと、
>「xlValues」にしたほうがいいかと・・・     

これも、あとで気づきました。ありがとうございます。
0 hits

【14755】エラー処理に関して 123 04/6/7(月) 6:46 質問
【14758】Re:エラー処理に関して つん 04/6/7(月) 9:30 回答
【14774】Re:エラー処理に関して 123 04/6/7(月) 21:22 質問
【14776】Re:エラー処理に関して つん 04/6/7(月) 22:43 回答
【14780】Re:エラー処理に関して 123 04/6/7(月) 23:03 質問
【14784】Re:エラー処理に関して つん 04/6/7(月) 23:35 発言
【14789】Re:エラー処理に関して Asaki 04/6/8(火) 0:37 回答
【14834】Re:エラー処理に関して 123 04/6/8(火) 19:10 お礼
【14792】Re:エラー処理に関して kein 04/6/8(火) 0:59 回答

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