Zelleneinträge über Combobox + VBA
27.06.2005 00:06:16
Dario
Über eine Combobox aus der Format Symbolleiste und einem dazugehörenden Makro
kann ich die Einträge der Combobox in die nächste Leere Zelle eintragen.
Zelle A5 hat einen festen Eintrag "Nr."
Hier der Makrocode:
Sub AuswahlMassnahmen()
Dim Variable As String
Application.ScreenUpdating = False
Range("B4").Select
Selection.End(xlDown).Select
Selection.Offset(1, 0).Select
Variable = Range("b35").Value
If ActiveCell.Row < 31 Then
ActiveCell.Value = Variable
Range("a35") = 1
Application.ScreenUpdating = True
Else
Range("a35") = 1
MsgBox "Es können maximal 25 Massnahmen erfasst werden."
End If
End Sub
Das Problem ist dass die Auswahl ab Zelle A6 eingetragen wird.
Wie schafe ich es dass ab Zelle B6 eingetragen wird?
Vielen Dankfür Eure Hilfe
Gruess Dario