Eingabefenster
31.01.2005 13:18:27
MarryJo
ich habe eine Frage:
Mein Makro bezieht sich immer auf ganz bestimmte Spalten (diese werden erst gesucht und dann quasi markiert und gemerkt). Jetzt möchte ich es aber so haben, dass der Anwender sich quasi aussuchen kann auf welche Spalte er das Makro anwendet. Also irgendwie über eine User Form!? Hier ein Code-Schnipsel:
Set rgCell = rgHd.Find("Gross weight", LookIn:=xlValues, LookAt:=xlWhole)
If rgCell Is Nothing Then
MsgBox "Fehler, Spalte ""Gross weight"" fehlt"
Exit Sub
Else
iColNoGw = rgCell.Column
End If
In diesem Fall wird nach "Gross weight" gesucht. Dem Anwender soll sich also ein Eingabefenster öffnen, bei diesem er dann den Namen der beliebigen Spalte angeben kann. Auf diese Spalte wird dann das Makro angewendet. Der Spaltenname muss dann natürlich auch irgendwie automatisch im Makro hinterlegt werden.
Wie macht man das? Ich habe nämlich keine Ahnung!!
Vielen Dank vorab.
Gruss MarryJo