WkbExp.Sheets(WS.Name).Range("K2") <> 0 ...
Peter
In einem Workbook möchte ich die Tabellen bestimmen, welche bestimmte Kriterien erfüllen, wie im Code nachstehend enthalten.
Nun möchte ich die Bedingung
WkbExp.Sheets(WS.Name).Range("K2") 0
abändern und stattdessen abfragen, ob die Summe des Bereiches K2:K10 nicht Null ergibt.
Ich komme da leider mit der Syntax nicht klar.
Wer kann mir helfen?
Gruss, Peter
For Each WS In WkbExp.Worksheets
If IsNumeric(WS.Name) And WS.Name "1" And WkbExp.Sheets(WS.Name).Range("K2") 0 Then
Debug.Print WS.Name
Next