Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
348to352
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
348to352
348to352
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

variable Bereiche in Tabellenblätter kopieren

variable Bereiche in Tabellenblätter kopieren
13.12.2003 11:43:45
Gernot
da ich selbst kaum über programmierkenntnisse verfüge und mit meinem problem nicht weiter komme, habe ich mich entschlossen meine frage mal hier im forum zu stellen.

das problem ist folgendes:

im ersten tabellenblatt ("liste")habe ich eine liste, welche 5 spalten und 100 zeilen besitzt. (a1-e1; a2-e2, a3-e3, ....., a100-e100).

weiters habe ich zusätzlich 100 tabellenblätter mit den namen HA1-HA100.

mein ziel ist es aus dem ersten tabellenblatt "liste" jeweils eine zeile in das
entsprechende "HA"-Tabellenblatt an die stelle a1-e1 zu kopieren.

also: a1-e1 aus "Liste" nach HA1
a2-a2 aus "Liste" nach HA2
usw.

hört sich eigentlich gar nicht so kompliziert an, aber irgendwie sind meine bisherigen versuche immer gescheitert.
wenn mir jemand helfen könnte wäre ich dafür sehr dankbar!!!

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

Betreff
Datum
Anwender
Anzeige
AW: variable Bereiche in Tabellenblätter kopieren
13.12.2003 11:52:44
Nepumuk
geht so:


Option Explicit
Public Sub Gernot()
Dim bytZeile As Byte
For bytZeile = 1 To 100
Worksheets("HA" & CStr(bytZeile)).Range("A1:E1") = Range(Cells(bytZeile, 1), Cells(bytZeile, 5)).Value
Next
End Sub



Code eingefügt mit: Excel Code Jeanie
Anzeige
ohne VBA
13.12.2003 12:52:25
Josef Ehrensberger
Hallo Gernot,

nach Nepumuks lösung, noch eine möglichkeit
ohne VBA

schreib in die Blätter "HA1 - HA100"
in die Zellen "A1 - E1" diese Formel.

=INDIREKT(ADRESSE(TEIL(ZELLE("dateiname";$A$1);FINDEN("]";ZELLE("dateiname";$A$1))+3;255);SPALTE();;;"Liste"))

Gruß Sepp
AW: variable Bereiche in Tabellenblätter kopieren
13.12.2003 13:16:08
Gernot
vielen dank für die schnellen antworten!!!!
habs schon probiert! funktioniert perfekt!
ihr habt mir damit sehr geholfen!

mfG Gernot

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige