|
Hallo liebe Leute
Ich möchte in einem VBA über eine MsgBox oder Inputbox Folgenden Text anzeigen:
"Bitte wählen sie einen Zellbereich in Spalte Bemerkung aus."
Dann möchte ich mit der Maus eine Zellbereich auswählen, der mit "OK" (oder so) übernommen wird.
Hintergrund:
Ich habe per Autofilter die Tabelle gefiltert und bekomme jetzt als Ergebnis z.B. die Zeilen 6,55,66,72,74,95,96,209 angezeigt.
Per VBA möchte ich diesen jetzt in der Spalte "Bemerkung" mit "Reserve" füllen.
Da ich dies nicht mit z.B."K3" addressieren kann, möchte ich es einfach mit der Maus markieren und nach OK mit dem Text füllen.
Hier noch wie ich den Autofilter ausgeführt habe:
ActiveSheet.Range("$A$2:$L$500").AutoFilter Field:=SGefundenName, Criteria1:="=*xxxxx*", Operator:=xlAnd
Wenn ihr eine andere unkomplizierte Lösung habt, die ich als Anfänger verstehen kann, gerne her damit.
Sonst bitte einen Vorschlag mit einer Box.
Danke
|