Variablenproblem bei Markro
06.04.2006 10:36:28
Daniel
Habe wahrscheinlich ein simples Problemchen aber es will mir nicht gelingen.
Habe folgendes Makro:
Sub Zellen_autom_zusammenfuehren()
eingabe1 = InputBox("Wo befindet sich benötigte Spalte 1 ?")
eingabe2 = InputBox("Wo befindet sich benötigte Spalte 2 ?")
Columns("A:A").Select
Selection.Insert Shift:=xlToRight
Range("A2").Select
ActiveCell.FormulaR1C1 = "=CONCATENATE(RC[eingabe1],RC[eingabe2])"
Range("A2").Select
Selection.AutoFill Destination:=Range("A2:A81"), Type:=xlFillDefault
Range("A2:A81").Select
Range("A2").Select
End Sub
Dieses Makro soll die Inhalte 2 bestimmter Spalten zusammenführen in einer neuen Spalte ganz links; dabei soll vorher festgelegt werden, um welche beiden Spalten es sich handeln soll. Hab einen großen Teil mit dem Recorder aufgezeichnet und wollte die Übergabe manuell reinbringen, an dieser Stelle:
ActiveCell.FormulaR1C1 = "=CONCATENATE(RC[eingabe1],RC[eingabe2])"
normalerweise würde dort (bei eingabe1 u eingabe2) ja Zahlen stehen;
diese sollen durch die Eingabe bestimmt werden.
Wenn ich es so lasse, dann kommt eine Fehlermeldung; habe es schon mit Hochkommas, "Und"-Zeichen sowie Dollarzeichen probiert.. nix klappt. Kann einer helfen?
Danke schon mal!