Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeilen kopieren

Forumthread: Zeilen kopieren

Zeilen kopieren
23.04.2003 16:55:17
Remo
Hallo

Mein Problem: Habe eine Liste mit
Produkten. Momentan sieht es so aus:
Anlage Anzahl
Tische 3
Stühle 2
Computer 1
Fahrzeuge 2


So sollte es sein, wenn möglich mit Makro:

Anlage Anzahl

Tische 3
Tische 3
Tische 3
Stühle 2
Stühle 2
Computer 1
Fahrzeuge 2
Fahrzeuge 2

Besten Dank im Voraus

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zeilen kopieren
23.04.2003 17:05:43
ChrisL

Hallo Remo

Anlage und Anzahl stehen in Spalte A + B, Ausgabe in Spalte C + D.

Option Explicit

Sub Kopiervorgang()
Dim i As Long, AnzahlZeilen As Long

For i = 1 To Range("A65536").End(xlUp).Row
AnzahlZeilen = Range("C65536").End(xlUp).Row + 1
If AnzahlZeilen = 2 And Range("C1") = "" Then AnzahlZeilen = 1
Range(Cells(i, 1), Cells(i, 2)).Copy Range(Cells(AnzahlZeilen, 3), Cells(AnzahlZeilen + Cells(i, 2) - 1, 4))
Next i
End Sub


Gruss
Chris

Anzeige
Re: Zeilen kopieren
23.04.2003 17:20:30
PeterW

Hallo Remo,

es könnte auch so gehen:

Die Werte stehen in den Spalten A und B, Ausgabe erfolgt in C und D.

Gruß
Peter

;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige