2014-09-19 90 views
1

我試圖做一個If語句來檢查給定的單元格是否存在(有些被合併)並且具有不同值的' - ',一個語句被執行,在這個查詢一個案例。 如果條件不具備,不執行查詢如果語句來檢查宏中的Excel單元格

CellStr = Range("C3").Text 
If CellStr <> "-" Then 
Set rs = conn.Execute("QUERY") 
End If 

目前我的作品當細胞具有價值的代碼「 - 」(查詢不執行),但是當細胞確實不起作用不存在(查詢執行並返回0)

如何保護If語句來解決此問題?

+0

嘗試'如果CellStr <>「 - 」和CBool​​(Len(CellStr))然後' – Jeeped 2014-09-19 11:24:26

+0

工作。謝謝 – 2014-09-19 11:28:27

回答

0

檢查電池是否存在(即未覆蓋合併單元格),你檢查單元格中的數值/文字之前

Sub test() 

    Dim c As Range 
    Set c = Range("C3") 'Set the cell 

    'Check if the cell exists, i.e. is not covered by merged cells 
    If c.MergeArea.Cells(1, 1).Address = c.Address Then 

     'Check if the cell text is different from "-" 
     If c.Text <> "-" Then 

      'Execute something 
      MsgBox "Put your statement here" 

     End If 

    End If 

End Sub 

最好的問候,

西蒙

相關問題