引用For Each函数中的单元格时发生错误

Question

我一直在尝试编写一个函数，该函数为列中填充的每个单元格打开google搜索。由于某种原因，我收到“找不到方法或数据成员的错误”。如果我输入的不是ws.cel.value而是ws.range（“ C2”）。value之类的特定范围，则它像一个符咒一样工作，但它赢了'不在列下执行Google搜索搜索。我对excel还是很陌生，这可能是我犯的愚蠢错误-谢谢您的耐心配合。

Sub Googlesearch()

Dim lastrow As Long
Dim IE As Object
Dim cel As Range
Dim ws As Worksheet

Set ws = Sheets("sheet1")
lastrow = ws.Cells(ws.Rows.Count, "C").End(xlUp).Row

For Each cel In ws.Range("C2:C" & lastrow)

Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate2 "www.google.ca/search?q=" & "[" & ws.cel.Value & "]"
    Do While IE.Busy
    DoEvents
Loop

Next cel

End Sub

一如既往，在此先谢谢您！！ >>

我一直在尝试编写一个函数，该函数为列中填充的每个单元格打开google搜索。由于某种原因，我收到“找不到方法或数据成员的错误”。如果不是ws.cel.value，我会... ...>