Slette tomme rækker i excel med AND
Hej eksperter!Jeg har skrevet følgende stykke kode, med det virker ikke. Er hernogen som kan fortælle mig, hvorfor jeg ikke kan bruge AND i nedenstående eller om syntaxen er helt hen i skoven :o)
Sub ClearLines()
Range("E1").Select
Do
If Selection.Value = 0 And Selection.ColorIndex = 34 Then
Selection.EntireRow.Delete
Else
Selection.Offset(1, 0).Select
End If
Loop Until Selection.Row = 200
Range("E1").Select
End Sub
Koden virker fint uden følgende tilføjelse:
And Selection.ColorIndex = 34
Det er denne linje som driller mig.
If Selection.Value = 0 And Selection.ColorIndex = 34
I C# ville det se sådan ud (syntax):
if (Selection.Value = 0 && Selection.ColorIndex = 34)
{
Kode ......
}
Håbe i kan hjælpe! :)
Mvh
Martin
