Makro Programmierung Excel - VB

[Der.Kaktus]

Zitat von atgis:

Hi,

Ich hab ein ganz simples Problemchen...und da ich schon zulange mich nicht mehr mit dem proggen befasst habe, fehlt mir der Ansatz.

Also mein Problem:

Ich habe hier eine Excel Tabelle, in der sollen per Formular einpaar sachen bequem eingetragen werden.
Nun soll aber jedesmal, der neue Eintrag in der nächsten Zeile darunter stehen...

http://s7.directupload.net/images/080704/agtouyd9.jpg

Code:

Private Sub CommandButton1_Click()
If TextBox1.Value + TextBox2.Value + TextBox2.Value = "" Then
 GoTo nix
End If

' i = i +1

Sheets("Tabelle1").Cells(i, 1).Value = Date
Sheets("tabelle1").Cells(i, 2).Value = TextBox1
Sheets("tabelle1").Cells(i, 3).Value = TextBox2
Sheets("tabelle1").Cells(i, 4).Value = Time$
Sheets("tabelle1").Cells(i, 5).Value = TextBox3



nix:
End Sub

Dafür habe ich hier schon das i - als zähler, aber mir fehlt jetzt der Ansatz wie ich eine Schleife realisiere, dass ein neuer Eintrag immer eine Zeile nach unten rutscht -.-

Hallo, da gibt es genug Tools..schau mal z.B. XLSREADWRITE_II oder OLE mit Hand..findest Du sicher hier im Forum viele Anregungen.