Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
312to316
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
312to316
312to316
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten in einer Spalte -Transponieren

Daten in einer Spalte -Transponieren
23.09.2003 13:33:42
Dennis
Hallo! Habe folgendes Problem:

A B
Firma XYZ GmbH 
Zusatz ...
Straße XYZ-Strasse 
Plz Ort 12345 Teststadt 
Telefon 0123/405400 
Telefax 0123/4054025  
Mobil ...
E-Mail ...
WWW Adresse ...
Beschreibung ...

Dann kommen 2 Leerzeilen und das ganze von vorne mit etwa 900 Datensätzen. Jetzt möchte ich diese Datensätze wie in Access nebeneinander haben, also Firma, Strasse, etc. in Zeilen und die Daten in Spalten darunter, ist das möglich?

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten in einer Spalte -Transponieren
23.09.2003 14:18:15
Willie
Ja alles Markieren kopieren neues Blatt rechte Maustaste Inhalte Einfügen
dann transponieren ankeuzen und schon ist alles fertig!
Gruß

Willie
Klappt nicht!
23.09.2003 14:25:38
Dennis
Soweit war ich natürlich auch schon, leider müsste ich das dann 900 mal machen! Brauche Firma, Strasse, etc. als Spaltenüberschrift und die Daten aus Spalte B schön untereinander in Datensätzen (Zeile für Zeile)
AW: Klappt nicht!
24.09.2003 06:16:35
Willie
Hallo Dennis mußte gestern dringend weg und habe es erst heute morgen gesehen, dass
es nicht klappt
Kanns du nochmal genau beschreiben, nach wievielen Spalten oder Zeilen die Wiederholung
kommt, dann kann ich dir ein Makro basteln!
Gruß
Willie
Anzeige
AW: Klappt nicht!
24.09.2003 08:11:40
Dennis
Hallo Willie, danke für Deine Hilfe!

Also ich habe in Spalte A diverse Kategorien wie Firma, Strasse und zwar 9 Zeilen lang. Danach kommen 2 Leerzeilen und danach der nächste Datensatz mit 9 Zeilen. In Spalte B sind entsprechend die Daten dazu und jedesmal unterschiedlich wobei Spalte A (Kategorien) sich ständig wiederholt. Ich hatte mal ein Makro aufgezeichnet welches mir die Daten kopiert, transponiert, eine Zeile einfügt, die Ursprungsdaten löscht (Die Zeilen) und bei der gleichen Zeile wieder von vorne beginnt (Nächster Datensatz). Dafür musste ich bei 900 Datensätzen aber 900 mal Strg-Y drücken, und dass will ich nicht mehr.
So jetzt lass ich Dich mal tüfteln, Danke schonmal!
Anzeige
Hier kommt die Lösung
24.09.2003 10:17:33
Willie
Hallo Dennis hier die Lösung aber aufpassen es sind 10 Kategorien und nicht 9
falls doch nur 9 dann Wert änder, dort wo ich die * gemacht habe
Gruß

Willie


Sub transponieren()
Sheets("Tabelle1").Select
Range("A1:A11").Select
Selection.Copy
Sheets("Tabelle2").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
, Transpose:=True
i = 2
For trans = 1 To 2000 Step 12 ' * Hier eventl anpassen Da es in deinem Beispiel 10 Kategorien sind und nicht 9
Sheets("Tabelle1").Select
'Range("B1:B10").Select
Range(Cells(trans, 2), Cells(trans + 9, 2)).Select ' ***
Application.CutCopyMode = False
Selection.Copy
Sheets("Tabelle2").Select
Cells(i, 1).Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
, Transpose:=True
i = i + 1
Next
End Sub

Anzeige
Super! AW: Hier kommt die Lösung
24.09.2003 10:46:26
Dennis
Hey Willie!

Super klasse, wirklich toll, Danke! Mit der Lösung kann ich mir zukünftig jede Menge Arbeit sparen. Wird mal Zeit dass ich in VBA umsteige.

Danke nochmal und alles Gute

Dennis
Super! AW: Danke oT
24.09.2003 11:01:45
Willie
.

302 Forumthreads zu ähnlichen Themen

In Spalte nach Anzahl eines Begriffs suchen?
Lauren

Hall Leute!
ich will nach einem Begriff, in meinem Fall nach "SUMs" in der Spalte C suchen und wissen wie oft es in der Spalte vorkommt.
Bei Berechnungen funktioniert es mit ZÄHLENWENN ohne Probleme aber wie erhalte ich die "absolute" Zahl?
Vielen Dank für Eure Hilfe!
Grüße
...
19.08.2008 11:08:23
Thread-ID: 1002846
5 Beiträge
Anzeige
Häufigkeit einer Uhrzeit aus einer Spalte
wolfgang

Hallo Leute
Ich habe eine Spalte mit einer menge Uhrzeiten und möchte die Häufigkeit einer Uhrzeit ( wie oft ist eine eintrag vorhanden)zum Beispiel zwischen 08:00 und 17:00!! Ich weiß das für euch sicher ein leichtes ist jemanden wie mir zu helfen!
Schon jetzt besten Dank für eure Mühe...
02.09.2008 15:11:51
Thread-ID: 1006816
2 Beiträge
von Datum bis Datum suchen und Werte in die Spalte
Datum

Hallo liebe Excel-Könner,
ich habe folgendes Problem und finde keine Lösung.
Ich habe in Spalte A von 2006 bis heute Datum stehen, über eine UserForm möche ich in zwei TextBoxen von bis Datum eintragen und in Spalte B in diesem Bereich den WertX.
Ich hoffe Ihr könnt mir helfen!
...
07.09.2008 09:31:20
Thread-ID: 1007931
8 Beiträge
Anzeige
Berechnen von Werten in einer Spalte
Werten

Folgendes Problem:
In der Spalte A möchte ich wissen, wieviel unterschiedliche Werte es gibt.
Wer kann mir helfen.
Danke
Alex
05.10.2008 12:52:00
Thread-ID: 1014231
5 Beiträge
Filtern, gefilterte Daten benutzen, Suchen und Aus
Merle


Hallo alle zusammen,
ich habe ein mittelschweres Problem. Und zwar habe ich hier ein Beispiel:
https://www.herber.de/bbs/user/55986.xls
In 'Tabelle1' sind ganz viele verschiedene Waren (C17:57) hinterlegt. Ich möchte nun, wenn ich eine dieser Waren rausfilter z.B H025, dass da...
13.10.2008 15:48:00
Thread-ID: 1016087
3 Beiträge
Gleiche Eintäge in einer Spalte nacheinander finde
Malcolm_p

Hallo zusammen!
Wenn ich einen bestimmten Eintrag - per VBA - in einer Spalte finden möchte verwende ich der Regel den folgenden Code:
Dim NameSP As Range
Set NameSP = Sheets("Konten").Rows(1).Find( _
What:=Textbox1, _
Lookat:=xlWhole, _
LookIn:=xlValues)
Dim Erfdat...
15.10.2008 23:08:59
Thread-ID: 1016705
5 Beiträge
Suchen und Ersetzen schnelleres Makro
Susi

Hallo liebe Excel-Freunde,
ich habe folgendes kleines Makro.
Sub Suchen_Ersetzen() out = "15200" 'zu ersetzender String in = "43900" 'einzufügender String For Each cell In Selection If cell.HasFormula = True Then cell.Formula = Application.WorksheetFunction.Substitute(cell.Formula, ou...
20.10.2008 12:19:00
Thread-ID: 1017624
17 Beiträge
Doppelte Einträge in einer Spalte farbig markieren
Robert

Hallo,
ich hab eine Tabelle mit riesigem Datenbestand. Mein Problem ist nun, dass doppelte Eintrage, die in einer Spalte vorkommen, farbig markiert werden sollten - und das gleiche bei jeder weiteren Spalte mit Inhalt.
Sollten in einer Spalte doppelte Einträge vorhanden sein, müsste die...
27.10.2008 19:09:00
Thread-ID: 1019713
11 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
8
1
7
5
4
2
4
16
10
2
3
6
8
4
2
3
4
2
15
10
5
1
5
3