轉換無效

-1

Dim i As Integer 
    For i = int_start To 1 Step -1 
     If InStr(rng_delete.Cells(i), "VALUE") > 0 Then 
      rng_delete.Cells(i).EntireRow.Delete() 
     End If 
    Next i

「」類型的未處理的異常出現在Microsoft.VisualBasic.dll中。
附加信息：從「範圍」類型到「字符串」類型的轉換無效。轉換無效

來源

2015-05-28 HudsonWY

這不是VBA，是嗎？錯誤表明，這是更多的VB.Net。 – PaulFrancis

如果rng_delete的類型爲Range，如錯誤消息所示，您應該在if語句中使用'rng_delete.Cells（i）.Value.ToString（）'。 –

您需要指定傳遞給InStr的單元的哪個屬性（通常是.Value或.Text）。

If InStr(rng_delete.Cells(i).Text, "VALUE") > 0 Then

來源

2015-05-28 14:23:00 Josh

回答

相關問題