開いているExcelファイルがあり、VBスクリプトを使用している場合、Excelシートの列「A」のみをテキスト文字列と一致するまで検索する必要があります。スクリプトで一致するものが見つかると、その一致が見つかったセルの行番号が表示されます。 事前にお手伝いいただきありがとうございます!vbscriptを使用してExcelで特定の値の行番号を見つける方法
答えて
これは、アクティベートシートのA列にある「test2」の最初のインスタンスを見つけるためのVBAです。必要に応じて文字列とワークシートを調整できます。セル全体が一致した場合にのみ一致としてカウントされます。たとえば、「test2222」は一致しません。あなたはそれが、削除したい場合は、lookat:=xlWhole
ビット:サンプルのため
Sub FindFirstInstance()
Const WHAT_TO_FIND As String = "test2"
Dim ws As Excel.Worksheet
Dim FoundCell As Excel.Range
Set ws = ActiveSheet
Set FoundCell = ws.Range("A:A").Find(what:=WHAT_TO_FIND, lookat:=xlWhole)
If Not FoundCell Is Nothing Then
MsgBox (WHAT_TO_FIND & " found in row: " & FoundCell.Row)
Else
MsgBox (WHAT_TO_FIND & " not found")
End If
End Sub
同じフォーマットをvbscriptに使用できますか? –
私は分かりません。あなたのタグには 'excel-vba'が含まれているので、私はそのコードをあなたに与えました。時々、人々は "vbscript"と "vba"を同じ意味で使用します。 –
@buri kuriコードは、 'vbscript'に重大な変更が必要です。つまり、Excelを自動化し、変数の明示的な次元を削除し、' xlWhole'などの定数を追加する必要があります。 – brettdj
感謝。 VBScriptの下にあります。
Dim FSO, oExcel, oData, FoundCell, WHAT_TO_FIND, File_Path
WHAT_TO_FIND = "Report Summary"
File_Path = "\\[Server]\[Drive$]\[Folder]\Data.xls"
Set FSO = CreateObject("Scripting.FileSystemObject")
Set oExcel = CreateObject("Excel.Application")
Set oData = oExcel.Workbooks.Open(File_Path)
Set FoundCell = oData.Worksheets("Sheet1").Range("A4:A20000").Find(WHAT_TO_FIND)
If Not FoundCell Is Nothing Then
MsgBox (WHAT_TO_FIND & " found in row: " & FoundCell.Row)
Else
MsgBox (WHAT_TO_FIND & " not found")
End If
Set File_Path = nothing
Set WHAT_TO_FIND = nothing
Set FoundCell = nothing
Set oData = Nothing
Set oExcel = Nothing
Set FSO = Nothing
-1 for:未使用のFSO、()MsgBoxをSubとして呼び出すときは、文字列File_PathとWHAT_TO_FINDにSetを使用します。 –
- 1. MATLAB:find関数を使用して大きなベクトルの特定の値の行番号を見つける
- 2. Luceneを使って行番号やページ番号を見つける方法
- 3. Mysqlの行番号を使用してmysqlの中央値を見つける
- 4. vbscriptを使用してExcelの一番上の行をフリーズする方法
- 5. SQL(MySQL)で特定のデータの番号を見つける方法
- 6. CSVで特定の番号を見つけるためのRegEx
- 7. 行の最初の要素を使用して行番号を見つける
- 8. 特定の行の中で最小の番号を見つける方法を教えてください。
- 9. テーブル内のセルの行番号と列番号を見つける方法
- 10. 特定のフォーマットの番号を見つける
- 11. 特定の月と年の週番号を見つける
- 12. 特定の半径の郵便番号を見つける
- 13. 文字列内の特定の番号を見つけるか?
- 14. SQL:特定の値の最大値を持つ行を見つける方法
- 15. Array.collectから特定の番号を見つける
- 16. 配列から特定の番号を見つけるには?
- 17. IMEI番号を使用してモバイルロケーションを見つける方法は?
- 18. selenium webdriverを使用してテーブルの行番号を見つける
- 19. ファイル内に特定の文字列を含む行番号を見つける
- 20. devツールを使用して特定のコードソースを見つけてFTTPで見つける方法
- 21. Excel VBA - 特定の値を持つすべての行を検索し、行番号を取得します。
- 22. コマンドプロンプトを使用してWindowsで特定のファイルを見つける方法
- 23. pyvmomiを使用して特定のフォルダでVMを見つける方法
- 24. 列aから特定の番号を見つけ、
- 25. emacsを使って行番号を見つける
- 26. データテーブルに特定の列の値を持つ行を見つける方法は?
- 27. 右のサブツリーで最小の番号を見つける方法
- 28. ディレクトリ内の特定の行番号で特定の文字列を見つける
- 29. 特定のカーネルモジュールを使用してプロセスのリストを見つける方法は?
- 30. pythonを使用してExcelシートの行番号を取得する方法は?
VBAまたはVBScriptを実際に使用しているかどうかを推測するよりも、これまでに追加したコードを表示してください。 Dougが言及しているように、同じことを意味することもあります。 –