Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon demand1 vom 12.11.2021, 11:16 Options
Excel Zeileninhalte in verschiedene Spalten konvertieren
Hallo,
ich müsste eine Liste über sämtliche Firmen einer Branche erstellen. Dazu habe ich von einer Website, die Firmen auflistet, die Daten rauskopiert und in ein Excel-Sheet eingefügt.
Das Ziel ist, dass ich am Ende eine Tablle habe mit drei Spalten: Name der Firma, Adresse, Telefonnummer.
In diesen drei Spalten sollen sämtliche Firmen aufgeführt sein.
Das Problem ist nun, dass ich alle Daten in einer Zeile habe: Es folgen nacheinander in den Spalten Firma1 (A1), Adresse1 (B1), Telefonnummer1 (C1),Firma2 (D1), Adresse2 (E1), Telefonnummer2 (E1),...
Ich möchte, dass immer drei Spalten der ersten Zeile kopiert werden und dann in einem neuen Sheet untereinander eingefügt werden. Das ganze würde in einer Schleife mit VBA funktionieren, aber mir fehlen dazu die erforderlichen Kenntnisse.
Kann mir jemand bei dieser Frage weiterhelfen?
Vielen Dank im vorraus.
ich müsste eine Liste über sämtliche Firmen einer Branche erstellen. Dazu habe ich von einer Website, die Firmen auflistet, die Daten rauskopiert und in ein Excel-Sheet eingefügt.
Das Ziel ist, dass ich am Ende eine Tablle habe mit drei Spalten: Name der Firma, Adresse, Telefonnummer.
In diesen drei Spalten sollen sämtliche Firmen aufgeführt sein.
Das Problem ist nun, dass ich alle Daten in einer Zeile habe: Es folgen nacheinander in den Spalten Firma1 (A1), Adresse1 (B1), Telefonnummer1 (C1),Firma2 (D1), Adresse2 (E1), Telefonnummer2 (E1),...
Ich möchte, dass immer drei Spalten der ersten Zeile kopiert werden und dann in einem neuen Sheet untereinander eingefügt werden. Das ganze würde in einer Schleife mit VBA funktionieren, aber mir fehlen dazu die erforderlichen Kenntnisse.
Kann mir jemand bei dieser Frage weiterhelfen?
Vielen Dank im vorraus.
Antwort 1 von Beverly vom 12.11.2021, 11:48 Options
Hi,
Bis später,
Karin
Sub Kopieren()
Dim inSpalte As Integer
Dim inZeile As Integer
inZeile = 1
For inSpalte = 1 To IIf(IsEmpty(Cells(1, Columns.Count)), Cells(1, Columns.Count).End(xlToLeft).Column, Columns.Count) Step 3
Range(Cells(1, inSpalte), Cells(1, inSpalte + 2)).Copy Worksheets("Tabelle2").Cells(inZeile, 1)
inZeile = inZeile + 1
Next inSpalte
End Sub
Bis später,
Karin
Antwort 2 von Charlotte_S vom 12.11.2021, 16:24 Options
Hallo demand1!
Schreibe in Zelle B1 die Formel
=INDIREKT("Z1S" & (ZEILE() - 1) * 3 + SPALTE(); FALSCH)
und kopiere (ziehe) die Zelle B1 bis B3,
kopiere danach die Zellen B1:B3 soweit nach unten wie nötig!
MfG Charlotte
Schreibe in Zelle B1 die Formel
=INDIREKT("Z1S" & (ZEILE() - 1) * 3 + SPALTE(); FALSCH)
und kopiere (ziehe) die Zelle B1 bis B3,
kopiere danach die Zellen B1:B3 soweit nach unten wie nötig!
MfG Charlotte
Antwort 3 von Charlotte_S vom 12.11.2021, 18:48 Options
Sorry,
kleiner Fehler: schreib die Formel (wie oben)
=INDIREKT("Z1S" & (ZEILE() - 1) * 3 + SPALTE(); FALSCH)
in die Zelle A2, nicht in B1! Da steht ja schon was. Kopiere A2 bis C2 und danach A2:C2 so weit runter wie nötig.
MfG Charlotte
kleiner Fehler: schreib die Formel (wie oben)
=INDIREKT("Z1S" & (ZEILE() - 1) * 3 + SPALTE(); FALSCH)
in die Zelle A2, nicht in B1! Da steht ja schon was. Kopiere A2 bis C2 und danach A2:C2 so weit runter wie nötig.
MfG Charlotte
Ähnliche Themen
excel-Spalten miteinander vergleichen
isabey21 10.07.2008 - 121 Hits - 1 Antwort
Mehr Spalten in Excel
jjgwlw 04.08.2008 - 10 Hits - 2 Antworten
Excel-Formel- 2 verschiedene Wenn Bedingungen in einer Zelle
moere 24.09.2008 - 38 Hits - 4 Antworten
verschiedene Adressen aus Excel-Liste in ein Worddokument einfügen
Skywalker02 23.10.2008 - 11 Hits - 1 Antwort
Excel Spalten ausblenden
michael87 27.02.2009 - 1311 Hits - 2 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
