Sub HTMLファイル内の文字列検索() Dim フォルダパス As String Dim 対象ファイル As String Dim ファイル内容 As String Dim ファイル番号 As Integer Dim 行番号 As Long ' フォルダパスを設定 フォルダパス = "C:\Path\To\Your\Folder" ' 対象のフォルダ…

Sub 検索() Dim ファイルパス As String Dim 検索ワード As String Dim テキスト行 As String Dim 行番号 As Long ' ファイルパスと検索ワードを設定 ファイルパス = "C:\Path\To\Your\File.txt" ' ファイルの実際のパスに置き換えてください 検索ワード = "…