VBA-Forum - Das Forum zu Microsoft VBA

Ansicht des Beitrags:

Von: Norman	Datum: 14.09.2006 10:14:40	Views: 2291	Rating:	Antwort:
Thema: For...Next
Hallo... Ich möchte in die erste freie Zelle in Spalte C bestimmte Daten aus einer anderen Tabelle untereinander schreiben...das klappt wunderbar. Nur möchte ich jetzt die Daten zwischen 2 Zellen mit bestimmten Namen herausholen. z.B. A5 - heißt "START" und A20 "ENDE" ---> also alle Werte von A6-A19 in die andere Tabelle ab der ersten freien Zelle in Spalte C schreiben mein jetziger Code heißt: Dim i As Integer For i = 1 To 14 Workbooks("VORLAGE.xls").Worksheets("Liste").Range("C65536").End(xlUp).Offset (1, 0).Value = Worksheets("Typ").Cells(i, 7).Value Next i End If Danke schonmal im Voraus

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen