Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
144to148
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
144to148
144to148
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Werte aus Tabelle1 in Tabelle2 eintragen

Werte aus Tabelle1 in Tabelle2 eintragen
07.08.2002 13: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

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

Betreff
Datum
Anwender
Anzeige
Re: Werte aus Tabelle1 in Tabelle2 eintragen
07.08.2002 17: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.

Re: Werte aus Tabelle1 in Tabelle2 eintragen
07.08.2002 19: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?

Anzeige
Re: Werte aus Tabelle1 in Tabelle2 eintragen
08.08.2002 10: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

315 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige