Hallo Zusammen
Ich habe hier ein Macro:
If ActiveSheet.Cells(9, 1) = "" And _
ActiveSheet.Cells(8, 2) = "" And _
ActiveSheet.Cells(8, 3) = "" And _
ActiveSheet.Cells(8, 4) = "" Then
If ActiveSheet.AutoFilterMode Then ActiveSheet.Range("A26:D26").AutoFilter
ActiveSheet.Range("A26:D26").AutoFilter
End If
If ActiveSheet.Cells(9, 1) "" Then
ActiveSheet.Range("A26").AutoFilter Field:=1, Criteria1:=ActiveSheet.Cells(9, 1).Value
Exit Sub
End If
If ActiveSheet.Cells(8, 2) "" Then
ActiveSheet.Range("B26").AutoFilter Field:=2, Criteria1:=ActiveSheet.Cells(8, 2).Value
Exit Sub
End If
If ActiveSheet.Cells(8, 3) "" Then
ActiveSheet.Range("C26").AutoFilter Field:=3, Criteria1:=ActiveSheet.Cells(8, 3).Value
Exit Sub
End If
If ActiveSheet.Cells(8, 4) "" Then
ActiveSheet.Range("D26").AutoFilter Field:=4, Criteria1:=ActiveSheet.Cells(8, 4).Value
Exit Sub
End If
dieses Macro funktioniert nur wenn ich es nur auf die Spalten A und B beziehe, wenn ich aber noch die Spalten C und D mit in das MAcro aufnehme, funktioniert es nicht mehr!
kann mir jemand sagen wieso net?
(Das ist ein Teil eines Macros das Abläuft wenn ich auf meiner UserFrom den CommandButtom1 Drücke.)
Danke
MFG
rapahel