類型不匹配（運行時錯誤13）？

Question

我試圖找到某月某日另一個工作表

我在這一行

dateFound = .Find(chosenDate, LookIn = xlValues) 

我宣佈我的變量如下得到一個不匹配的錯誤：

Dim chosenDate As String 
Dim dateFound As String 

任何幫助不勝感激，

謝謝。

Answer 1

你可能缺少一個冒號那裏... dateFound = .Find(chosenDate, LookIn := xlValues)

此外，在參數傳遞到一個名爲參數（使用:=即），還必須提供chosenDate參數名稱是What:=

因此正確完整語法

dateFound = .Find(What:=chosenDate, LookIn:=xlValues) 

這意味着你要麼提供所有的參數名;或省略所有和使用逗號放置這樣的輸入作爲

datefound = .Find(choosenDate,,,xlValues) 

參考： https://msdn.microsoft.com/en-us/library/aa263527(v=vs.60).aspx