本帖最後由 VBALearner 於 2016-8-15 16:55 編輯
小弟我想要找兩個目標儲存格十字交錯的儲存格值
但不知道錯在哪裡...還請高手賜教除錯，感激不盡!
(提醒一下:非VBA程式碼的回答，例如用直接在worksheet上面的儲存格打index...都不是我想要的答案，大概的目的是要能在多個工作表中的資料裡查多個不同儲存格的值，感謝各位!)- Sub test()
- Dim rng1, rng2 As Range
- 號碼 = CStr(Cells(3, 17).Value)
- 日期 = CStr(Cells(2, 18).Text)
-
- With Sheets(1)
- .Activate
- Set rng1 = .Range("A:A").Find(號碼)
- Set rng2 = .Range("A1:A20").Find(日期)
- Cells(3, 18).Value = Cells(rng1.Row, rng2.Column).Value
- End With
-
- End Sub
 感謝您的協助!.zip (14.26 KB)
|
發表於 2016-8-15 16:41
| 
