Question

我不确定这是否可行，但我在excel vba中尝试做什么：
使用列标题搜索列（例如：查找列名称，可能是此表中的A1，另一列中的B2等）然后在找到该列后，开始在该列的行中搜索预定值我希望你明白我想说的是什么

Answer 1

此代码应足以满足您的需求。只是用一个小样本测试它，在名为“Test1”的列下查找数字“3”，循环遍历工作簿中的所有工作表

Sub test()
Dim ws As Worksheet
Dim FindHeader, FindInHeader As String
Dim col, rw As Long

FindHeader = "Test1"
FindInHeader = "3"

For Each ws In ThisWorkbook.Worksheets
    col = ws.Rows(1).Find(FindHeader).Column
    rw = ws.Columns(col).Find(FindInHeader).Row
    MsgBox "Your data appears in " & ws.Name & " in Column " & col & " and Row " & rw

'do what you want with your data here

Next ws

End Sub

找到一列然后在其中搜索（Excel vba）

1 个答案: