Excel VBA質問箱 IV

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

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


7146 / 76732 ←次へ | 前へ→

【75177】Re:VLOOKUPのセルを含むとエラーが出ます。
回答  ウッシ  - 13/12/26(木) 13:35 -

引用なし
パスワード
   ▼しずか さん:

こんにちは

本当にそのコードのままですか?
そのエラーは、
Set t = .Find(What:=m, LookIn:=xlValues)
で目的のセルが見つかっていないという事です。

Range("A1:N10")の最大値で、Range("A1:N10")を検索しているので
tがNothingのはずは無いと思います。

ひょっとしてセルの書式設定で表示桁数とかセットしてないですか?


>うっしさん
>お世話になっております。
>
>早速試してみましたが、
>今度は、エラーが出るようになってしまいました。
>
>
>整数ですと、エラーはでません。
>
>何か他に処理をしなければいけないことがあるのでしょうか?
>
>
>エラーは以下のとおりです。
>
>----------------------
>
>実行時エラー 91
>オブジェクト変数またはWithブロック変数が設定されていません。
>
>と、出ます。
>
>----------------------
>デバックを押すと、
>
>.BorderAround Weight:=xlMedium, ColorIndex:=3
>
>のコードに黄色のラインがあります。
>
>----------------------
>
>
>Sub てすと()
>
>  Dim m As Double
>  Dim t As Range
>  With Range("A1:N10")
>    m = Application.WorksheetFunction.Max(.Cells)
>    Set t = .Find(What:=m, LookIn:=xlValues)
>  End With
>  With t
>    .BorderAround Weight:=xlMedium, ColorIndex:=3
>    .Font.Bold = True
>  End With 
>  
>  
>End Sub

368 hits

【75169】VLOOKUPのセルを含むとエラーが出ます。 しずか 13/12/25(水) 15:52 質問
【75170】Re:VLOOKUPのセルを含むとエラーが出ます。 ウッシ 13/12/25(水) 16:31 回答
【75174】Re:VLOOKUPのセルを含むとエラーが出ます。 しずか 13/12/26(木) 9:46 質問
【75175】Re:VLOOKUPのセルを含むとエラーが出ます。 ウッシ 13/12/26(木) 10:16 回答
【75176】Re:VLOOKUPのセルを含むとエラーが出ます。 しずか 13/12/26(木) 12:54 質問
【75177】Re:VLOOKUPのセルを含むとエラーが出ます。 ウッシ 13/12/26(木) 13:35 回答
【75178】Re:VLOOKUPのセルを含むとエラーが出ます。 しずか 13/12/26(木) 19:49 質問
【75179】Re:VLOOKUPのセルを含むとエラーが出ます。 ウッシ 13/12/27(金) 9:49 回答
【75180】Re:VLOOKUPのセルを含むとエラーが出ます。 しずか 13/12/27(金) 11:03 お礼
【75181】Re:VLOOKUPのセルを含むとエラーが出ます。 ウッシ 13/12/27(金) 11:41 回答
【75182】Re:VLOOKUPのセルを含むとエラーが出ます。 しずか 13/12/27(金) 13:02 お礼
【75183】余談ですが・・・ しずか 13/12/27(金) 13:58 発言
【75184】Re:余談ですが・・・ ウッシ 13/12/27(金) 14:17 回答
【75185】Re:余談ですが・・・ しずか 13/12/27(金) 15:11 お礼

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