Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1620to1624
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
Inhaltsverzeichnis

Mehrfachübertrag (12 mal) per VBA

Mehrfachübertrag (12 mal) per VBA
26.04.2018 13:45:27
Janesch
Hallo Zusammen,
ich komme beim folgendem Problem nicht weiter.
Ich habe in einer Spalte eindeutige Einträge zu den Abteilungen untereinander stehen.
Abt. A
Abt. B
Abt. C
...
Diese möchte ich jetzt in der anderen Spalte hintereinander 12 mal schreiben. Angefangen bei Abt. A mit 12 mal hintereinander und dann die nächsten 12 Einträge der Abt. B usw.
Da ich vorab nicht weiß, wie groß die Anzahl der Abteilungen sein wird, ist es wahrscheinlich sinnvoll es über VBA zu machen.
Leider fehlen mir hierzu die Kenntnisse..
Vorab Vielen Dank für die Ideen und eure Unterstützung
Gruß
Schen

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

Betreff
Datum
Anwender
Anzeige
AW: Mehrfachübertrag (12 mal) per VBA
26.04.2018 13:59:32
Matthias
Hallo
Sub Mal_12()
Dim x&, i&, y&
y = 1
For i = 1 To 3 'die Endzeile kann ermittelt werden
For x = 1 To 12
Cells(y, 3) = Cells(i, 1)
y = y + 1
Next
Next
End Sub

Gruß Matthias
AW: Mehrfachübertrag (12 mal) per VBA
26.04.2018 14:50:58
Janesch
Hallo Matthias,
danke für die Unterstützung.
Funktioniert prima
Beste Grüße
Schen
AW: Mehrfachübertrag (12 mal) per VBA
26.04.2018 14:50:58
Janesch
Hallo Matthias,
danke für die Unterstützung.
Funktioniert prima
Beste Grüße
Schen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige