2016-08-17 3 views
2

Beispiel:Excel-VBA-Syntax für numerische Platzhalter in AutoFilter Criteria?

ActiveSheet.UsedRange.AutoFilter Field:=1, Criteria1:=12345678 
ActiveSheet.UsedRange.AutoFilter Field:=1, Criteria1:=1234 & "*" 
ActiveSheet.UsedRange.AutoFilter Field:=1, Criteria1:=Array(12345678, 12345679, 12345670, ...) 

Meine Beispielkriterien achtstellige Werte mit 1234. Die erste Zeile arbeitet beginnend sind, aber die zweite und dritte Zeile zurückgeben ein leeres Blatt. Ich habe scheinbar unzählige Variationen der letzten beiden Linien versucht, von denen keine zum Tragen kam. Vielen Dank!

Antwort

2

können Sie versuchen, die folgende Problemumgehung, solange Sie eine gleichmäßige 8-stellige Struktur haben, können Sie überprüfen, ob es innerhalb der Wertebereich von 12.340.000 und 12.349.999 ist, wie in der Zeile unter:

ActiveSheet.UsedRange.AutoFilter Field:=1, Criteria1:=">=12340000", Operator:=xlAnd, Criteria2:="<=12349999"