< návrat zpět
MS Excel
Téma: VBA filter
Zaslal/a misocko 30.1.2019 18:42
ahojte
v prilozenom subore mam export zo SAPu v ktorom by som potreboval v stlpci Z nahodit filter na "20121*" , makrom. Ak makro nahram , spravi my to v makre pole ktore obsahuje vsetky mozne kombinacie "20121*" ktore tam su. Avsak v kazdom exporte tych kombinacii moze byt iny pocet takze cez nahrane makro s polom to nepojde. Skusal som nieco z netu ( Criteria1:="20121*" ) ale bez sance, vyzera to tak ze to ma problem s tym ze je to retazec cisel a obcas znak. Excel 2010. vie mi niekto s tym pomoct? Vopred dakujem
elninoslov(30.1.2019 23:55)#042608 Skúste toto
Sub FilterVBA()
Dim Radku As Long, Pole()
With wsSAP.UsedRange
Radku = .Rows.Count - 1
With .Columns(2).Offset(1, 0).Resize(Radku)
ReDim Pole(1 To Radku, 1 To 1)
Pole = .Value2
.NumberFormat = "@"
For i = 1 To Radku
Pole(i, 1) = CStr(Pole(i, 1))
Next i
.Value2 = Pole
End With
.AutoFilter 2, "=20121*", Operator:=xlAnd
End With
End Subcitovat
misocko(31.1.2019 22:07)#042617