Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Daten aus Eingabemaske in Monatstabelle eintragen

Gruppe

Bearbeiten

Problem

Die Daten aus dem Bereich B6:C6 sollen in der Monatstabelle gem. Datum in Zelle F16 eingetragen werden.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub Eintragen()
   Dim iRow As Integer
   With Worksheets(Format(Range("C7").Value, "mmmm"))
      iRow = .Cells(Rows.Count, 1).End(xlUp).Row + 1
      .Cells(iRow, 1) = Range("B6").Value
      .Cells(iRow, 2) = Range("C6").Value
   End With
End Sub