Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
568to572
568to572
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Intelligentes Makro für Transponierung??

Forumthread: Intelligentes Makro für Transponierung?

Intelligentes Makro für Transponierung?
14.02.2005 17:48:55
Andy
Hallo Leute...
Ich möchte ein Makro entwickeln, welches die Funktion hat, die ich in dieser Mappe beschreibe.
https://www.herber.de/bbs/user/18066.xls
Ich habs schon mit zwei Schleifen in allen möglichen Formen versucht, aber ich kriegs einfach nicht hin. Wahrscheinlich ist es garnicht so schwer, oder ich bin zu d... dafür.
Wenn mir jemand helfen kann, bin für jeden (noch so kleinen) Tipp dankbar.
Andy
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Intelligentes Makro für Transponierung?
Uduuh
Hallo,
tatsächlich ziemlich einfach.

Sub andy2()
Dim iRows As Long, iRow As Long, i As Long, iSpalte As Integer
iRows = Range("b65536").End(xlUp).Row
For i = 1 To iRows
If Cells(i, 1) <> "" Then iRow = i: iSpalte = 3
Cells(iRow, iSpalte) = Cells(i, 2)
iSpalte = iSpalte + 1
Next i
End Sub

Gruß aus'm Pott
Udo

Anzeige
AW: Intelligentes Makro für Transponierung?
15.02.2005 09:04:34
läuft
Hey Udo,
Super...das Makro läuft einwandfrei. Nochmals vielen Dank für deine Hilfe. Warst meine Rettung:-)...
Gruß
Andy
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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