Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Werte aus Tabelle1 in Tabelle2 eintragen

Forumthread: Werte aus Tabelle1 in Tabelle2 eintragen

Werte aus Tabelle1 in Tabelle2 eintragen
07.08.2002 15:30:59
Mario
Hallo Ihr Spazialisten,

kann mir jemand folgende VBA-Lösung geben?

Wenn B5 <>"", dann A3 in Blatt2-SpalteC und B5 in Blatt2-SpalteE in die nächste freie Zeile eintragen.

Danke

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Werte aus Tabelle1 in Tabelle2 eintragen
07.08.2002 19:58:18
Daniel R.
Hallo Mario
Das funktioniert in etwa so:
Sub test()
Sheets("Tabelle1").Select
wert1 = Range("B5").Value
If wert1 <> "" Then
wert2 = Range("A3").Value
Sheets("Tabelle2").Select
Range("C1").End(xlDown).Offset(rowOffset:=1).Activate
ActiveCell.Value = wert2
Range("E1").End(xlDown).Offset(rowOffset:=1).Activate
ActiveCell.Value = wert1
End If
End Sub

Gruss Daniel R.

Anzeige
Re: Werte aus Tabelle1 in Tabelle2 eintragen
07.08.2002 21:28:02
Mario
Hallo Daniel,

zunächst vielen Dank, aber es klappt nicht ganz.

Bei mir kommt Laufzeitfehler 1004.
Die Zeile 7
Range("A1").End(xlDown).Offset(rowOffset:=1).Activate

ist gelb.

Hab ich was falsch gemacht?

Re: Werte aus Tabelle1 in Tabelle2 eintragen
08.08.2002 12:07:36
Daniel R.
Hallo Mario
In der Spalte, in der die Werte übertragen werden sollen, muss mind. ein Wert stehen. Dann funktionierts.

Gruss Daniel

Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige