mehrere Zeilen in einer Zeile und mehreren Spalten
 |
Betrifft: mehrere Zeilen in einer Zeile und mehreren Spalten
von: Holger
Geschrieben am: 12.08.2004 08:12:08
Guten Morgen,
Ich muß eine Datenbank erstellen. Ich habe in Spalte A Die Artikel-Nummer, und die Artikelkurzbezeichnung, in der nächsten Zeilen kommt die Artikel-Langbenennung. Diese kann eine unterschiedliche Anzahl von Zeilen haben. In Spalte B und C habe ich die Artikelklassfikation und in Spalte D den Verkaufspreis. Beides in der jeweils ersten Zeile des Artikels (Artikelnummer).
Mein Problem ist nun, dass ich die Artikel in eine Tabelle haben muss, wo der komplette Artikel in einer Zeile steht, damit man über z. B. Autofilter diese entsprechend filtern kann.
Also z. B.: Spalte A: Artikelnummer, Kurzbezeichnung; Spalte B und C: Klassifikation; Spalte D: Preis; Spalte E: Langbenennung 1. Zeile; Spalte F: Langbenennung 2. Zeile; Spalte G: Langbenennung 3. Zeile; usw.
Ich hoffe Ihr könnt mit der Beschreibung etwas anfangen und mir helfen.
Danke
Holger
 |
Betrifft: AW: mehrere Zeilen in einer Zeile und mehreren Spalten
von: Ramses
Geschrieben am: 12.08.2004 08:25:39
Hallo
Ich versteh das Problem nicht.
Du kannst doch das ganze in eine zeile schreiben.
Zeilenumbrüche in einer Zelle erreichst du mit "Alt"+"Enter".
Gruss Rainer
Betrifft: AW: mehrere Zeilen in einer Zeile und mehreren Spalten
von: Holger
Geschrieben am: 12.08.2004 08:39:52
Hallo Ramses,
ja das ist bekannt. Das Problem ist nur, das ich mir die Liste über eine Druckdatei aus dem Warenwirtschaftssystem in Excel geöffnet habe. Dabei schreibt Excel jede Zeile nunmal in eine neue Zeile.
Gruß
Holger
Betrifft: AW: mehrere Zeilen in einer Zeile und mehreren Spalten
von: Ramses
Geschrieben am: 12.08.2004 08:48:22
Hallo
tut mir leid, keine weitere Idee.
Gruss Rainer
Betrifft: AW: mehrere Zeilen in einer Zeile und mehreren Spalten
von: Holger
Geschrieben am: 12.08.2004 08:56:35
Zur Verdeutlichung meines Probelems eine Beispieldatei
https://www.herber.de/bbs/user/9536.xlsIch hoffe, dass Ihr nun versteht, was mein Problem ist.
Gruß
Holger
Betrifft: Probier mal...
von: Ramses
Geschrieben am: 12.08.2004 09:14:12
Hallo
Option Explicit
Sub Long_Name()
'Zuerst ausführen
Dim i As Long, tarCol As Integer, myCol As Integer
Dim tarRow As Integer
tarCol = 4
myCol = 1
'3 ist die Zeile mit der ersten aRtikelbezeichnung
tarRow = 3
For i = tarRow + 1 To Cells(65536, 1).End(xlUp).Row
If Cells(i, 1) <> "" And Cells(i, 2) = "" Then
Cells(tarRow, tarCol) = Cells(i, 1)
tarCol = tarCol + 1
Else
tarRow = i - 1
tarCol = 4
End If
Next i
End Sub
Sub Delete_OldValues()
'Makro nach "Long_Name" ausführen.
'Dann werden die überflüssigen Langbenennungen gelöscht.
Dim i As Long
For i = Cells(65536, 1).End(xlUp).Row To 3 Step -1
If Cells(i, 1) <> "" And Cells(i, 2) = "" Then
Rows(i).Delete
End If
Next i
End Sub
Gruss Rainer
Betrifft: AW: Probier mal...
von: Holger
Geschrieben am: 12.08.2004 09:29:50
Das ist schon fast so, wie ich mir es Vorstelle. Nur, dass ich jetzt die Langbenennungen in jeweils der 2. Zeile unter dem Preis und dann fortlaufend jeweils Spaltenweise nach rechts habe. Wenn jetzt noch hinzukriegen ist, dass die Langbenennungen in Spalte E, F, ... der jeweils ersten Zeile kommen wäre das supper.
Gruß
Holger
Betrifft: AW: Probier mal...
von: Ramses
Geschrieben am: 12.08.2004 17:19:50
Hallo
ersetze die Zeile
For i = tarRow + 1 To Cells(65536, 1).End(xlUp).Row
mit
For i = tarRow To Cells(65536, 1).End(xlUp).Row
Gruss Rainer
Betrifft: hat noch jemand eine Idee? Ist dringend!
von: Holger
Geschrieben am: 12.08.2004 10:58:40
Guten Morgen,
Ich muß eine Datenbank erstellen. Ich habe in Spalte A Die Artikel-Nummer, und die Artikelkurzbezeichnung, in der nächsten Zeilen kommt die Artikel-Langbenennung. Diese kann eine unterschiedliche Anzahl von Zeilen haben. In Spalte B und C habe ich die Artikelklassfikation und in Spalte D den Verkaufspreis. Beides in der jeweils ersten Zeile des Artikels (Artikelnummer).
Mein Problem ist nun, dass ich die Artikel in eine Tabelle haben muss, wo der komplette Artikel in einer Zeile steht, damit man über z. B. Autofilter diese entsprechend filtern kann.
Also z. B.: Spalte A: Artikelnummer, Kurzbezeichnung; Spalte B und C: Klassifikation; Spalte D: Preis; Spalte E: Langbenennung 1. Zeile; Spalte F: Langbenennung 2. Zeile; Spalte G: Langbenennung 3. Zeile; usw.
Ich hoffe Ihr könnt mit der Beschreibung etwas anfangen und mir helfen.
Hier noch einmal die Beispieldatei!
https://www.herber.de/bbs/user/9546.xlsDanke
Holger
Betrifft: AW: hat noch jemand eine Idee? Ist dringend!
von: Udo
Geschrieben am: 12.08.2004 12:11:40
Hier ist immer alles dringend.
Udo
Beiträge aus den Excel-Beispielen zum Thema "mehrere Zeilen in einer Zeile und mehreren Spalten"