Speicherplatz durch VBA-Codes
19.04.2005 16:49:46
Demian
Sub Ausw()
Sheets("Master").Select
Range("A7:H100").Select
Selection.Copy
Sheets("Ausw16").Select
Range("A6").Select
ActiveSheet.Paste
Range("A5:H100").Select
Selection.AutoFilter
Selection.AutoFilter Field:=5, Criteria1:="<25000", Operator:=xlAnd
Selection.AutoFilter Field:=8, Criteria1:="latent"
Selection.AutoFilter Field:=7, Criteria1:="5"
Selection.Sort Key1:=Range("A6"), Order1:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
Also wirklich nichts weltbewegendes... Das Programm ist nun aber über 28MB gross! hat jemand eine Ahnung, wie das kommen kann? Sollten die Codes besser in ein Modul?
Grüße