[解決済み] エクセルVBAの検索文字列 : エラー2015
2022-02-27 07:56:25
質問
私は次のコードスニペットを持っている...
Public Sub FindText(path As String, file As String)
Dim Found As Range
myText = "test("
MacroBook = ActiveWorkbook.Name
' Open the File
Workbooks.Open path & file, ReadOnly:=True, UpdateLinks:=False
For Each ws In Workbooks(file).Worksheets
With ws
Set Found = .UsedRange.Find(What:=myText, LookIn:=xlFormulas, _
LookAt:=xlPart, MatchCase:=False)
If Not Found Is Nothing Then
' do stuff
' ...
デバッガで見ると、Found contains Error 2015! このシートには、数式に必要なテキストが含まれています。
なぜこのようなエラーが発生するのか、何か心当たりはありますか?
ありがとうございます
解決方法は?
Qへのコメントからのフォローとして。
Error 2015
が発生するのは、シート内の数式が
#VALUE!
というエラーが発生します。を使用して処理することができます。
IsError
:
If Not Found Is Nothing Then
If Not IsError(Found) Then
' do sth
End If
End If
関連
-
[解決済み】Excel VBAのByRef引数の型の不一致
-
[解決済み] Redimを使用して配列のデータ型を設定する
-
[解決済み] VBA:マクロでMSXML2.DOMDocumentがMSXML2.DOMDocument40に変更された。
-
[解決済み] どのようにvbaコードCells.FindによってExcelの列で値を見つけるために
-
[解決済み] Linuxで特定のテキストを含むすべてのファイルを検索するにはどうすればよいですか?
-
[解決済み] Microsoft Officeをインストールせずに、C#でExcel(.XLSおよび.XLSX)ファイルを作成するにはどうすればよいですか?
-
[解決済み] find .コマンドでディレクトリを除外する方法
-
[解決済み] Pythonです。リスト内検索
-
[解決済み] Excel VBA Projectのパスワードを解読する方法はありますか?
-
[解決済み】Excel VBAでSelectを使用しないようにする方法
最新
-
nginxです。[emerg] 0.0.0.0:80 への bind() に失敗しました (98: アドレスは既に使用中です)
-
htmlページでギリシャ文字を使うには
-
ピュアhtml+cssでの要素読み込み効果
-
純粋なhtml + cssで五輪を実現するサンプルコード
-
ナビゲーションバー・ドロップダウンメニューのHTML+CSSサンプルコード
-
タイピング効果を実現するピュアhtml+css
-
htmlの選択ボックスのプレースホルダー作成に関する質問
-
html css3 伸縮しない 画像表示効果
-
トップナビゲーションバーメニュー作成用HTML+CSS
-
html+css 実装 サイバーパンク風ボタン
おすすめ
-
[解決済み】エクセルVBA。一致しない、エラー "WorksheetFunctionクラスのMatchプロパティを取得できない"
-
[解決済み] OutlookでVBAスクリプトを実行しようとすると、「SubまたはFunction not defined」と表示される。
-
[解決済み] オートメーションエラー - 大惨事 EXCEL VBA
-
[解決済み] コンパイルエラーです。Forがない場合は次へ|VBA
-
[解決済み] <>とはどういう意味ですか?
-
[解決済み] VBAを使用してtxtファイルを作成し、書き込む方法
-
[解決済み] VBAでファイルを削除する
-
[解決済み] FormulaR1C1 の機能は何ですか?
-
[解決済み] VBAで関数から配列を返す
-
[解決済み] VBAでエラー時のGOTOステートメント