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

Zellen kopieren ohne zu überschreiben

Forumthread: Zellen kopieren ohne zu überschreiben

Zellen kopieren ohne zu überschreiben
23.06.2003 21:16:36
Daniela
Hallo !!!

Hab mal wieder eine Frage an die Profis unter euch.

Ich möchte über eine Schaltfläche die Zelle D6 vom Tabellenblatt1 nach D38 im Tabellenblatt5 kopieren, dabei soll geprüft werden ob da schon Daten stehen, wennja soll automatisch mit D39 fortgesetzt werden, wenn die auch schon belegt ist mit D40 usw.
Ist so etwas möglich ?

Bin dankbar für jede Hilfe.

Mfg

Daniela


Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zellen kopieren ohne zu überschreiben
23.06.2003 21:33:28
Willie

Ich hoffe das hilft!

Sub übernehmen()
x = 38
Do
x = x + 1
Loop Until Sheets("Tabelle5").Cells(x, 4) = ""
MsgBox x
var1 = Sheets("Tabelle1").Cells(6, 4)
Sheets("Tabelle5").Cells(x, 4) = var1
End Sub

Gruß

Willie

Re: Zellen kopieren ohne zu überschreiben
23.06.2003 21:38:08
Nepumuk

Hallo Daniela,
klar, so:

Gruß
Nepumuk

Anzeige
Re: Zellen kopieren ohne zu überschreiben
23.06.2003 21:46:53
PeterW

Hallo Daniela,

und noch ne Alternative für den Fall, dass in der Zieltabelle in D38 noch nichts steht:

Gruß
Peter

Re: Zellen kopieren ohne zu überschreiben
23.06.2003 22:07:47
Daniela

Danke, wart mir eine große Hilfe

Mfg
Dani

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige