Anzeige
Archiv - Navigation
476to480
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
476to480
476to480
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

individuell Transponieren mit vba

individuell Transponieren mit vba
01.09.2004 14:57:19
Claudi
Hallo,
ich musste eine Spalte transponieren von Tabelle1 in Tabelle2, aber so das sie in Tabelle2 in die nächste freie Zeile eingefügt wird, denn das ganze muss variabel sein. Mit der Excel-Funktion funktioniert das nicht so recht.
Danke schon mal!
Gruß Claudi

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: individuell Transponieren mit vba
01.09.2004 15:12:26
Werner
Grüezi Claudi

Sub A1_A9_Transponieren()
x = Sheets("Tabelle2").Range("A33").End(xlUp).Row + 1
Sheets("Tabelle1").Range("A2:A9").Copy
Sheets("Tabelle2").Select
Cells(x, 1).Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
, Transpose:=True
Application.CutCopyMode = False
End Sub

Gruss Werner

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige