Kann man eine MSGBox einfügen ?
19.05.2006 08:54:06
WalterMB
ich habe folgendes Makro:
Sub Filtern_Prozente()
Range("B7").Select
Range("A2:K2").Select
Selection.AutoFilter
Selection.AutoFilter Field:=11, Criteria1:="8.0"
Range("B3").Select
End Sub
Es werden jetzt die Daten gefiltert die mit 8,0 in der Spalte"K" hinterlegt sind.
Kann man eine Msgbox einfügen und ich die % auswählen kann, anstelle 8 jetzt 5 oder so ?
Da ich die Sheet geschützt habe müßte ich jedesmal Schutz aufheben und dann Daten/Filter etc. auswählen.
Gibt es so ein Möglichkeit ?
Gruß WalterMB