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
468to472
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
468to472
468to472
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

mehrere Zeilen in einer Zeile und mehreren Spalten

mehrere Zeilen in einer Zeile und mehreren Spalten
12.08.2004 08:12:08
Holger
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

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: mehrere Zeilen in einer Zeile und mehreren Spalten
Ramses
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
AW: mehrere Zeilen in einer Zeile und mehreren Spalten
12.08.2004 08:39:52
Holger
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
AW: mehrere Zeilen in einer Zeile und mehreren Spalten
Ramses
Hallo
tut mir leid, keine weitere Idee.
Gruss Rainer
AW: mehrere Zeilen in einer Zeile und mehreren Spalten
12.08.2004 08:56:35
Holger
Zur Verdeutlichung meines Probelems eine Beispieldatei
https://www.herber.de/bbs/user/9536.xls
Ich hoffe, dass Ihr nun versteht, was mein Problem ist.
Gruß
Holger
Anzeige
Probier mal...
Ramses
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
Anzeige
AW: Probier mal...
12.08.2004 09:29:50
Holger
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
AW: Probier mal...
Ramses
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
hat noch jemand eine Idee? Ist dringend!
12.08.2004 10:58:40
Holger
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.xls
Danke
Holger
Anzeige
AW: hat noch jemand eine Idee? Ist dringend!
Udo
Hier ist immer alles dringend.
Udo

337 Forumthreads zu ähnlichen Themen

Frage - Spalten einfügen & Spalten untereinander z
André

Hallo zusammen!
Ich habe da als blutiger Anfänger in VBA zwei Fragen:
1.) Wie kann ich in meiner Tabelle in jeder zweiten Spalte 4 leere Spalten einfügen lassen?
2.) Dann möchte ich unter den Inhalt der ersten fünf Spalten (A-E) den Inhalt der zweiten 5 Spalten (F-J) usw. In der grö...
08.08.2008 16:00:00
Thread-ID: 1000340
3 Beiträge
Anzeige
Spalten in Zeilen anhängen
Jörg

Hallo zusammen,
in einer Tabelle mit ~1000 Artikeln in Spalte A stehen jeweils in den Spalten B-M die 12 zum Artikel gehörenden Monatswerte des Verbrauchs.
Ich brauche diese Daten jetzt so angeordnet, dass weiterhin alle Artikel in Spalte A stehen, jedoch die einzelnen Monatswerte unter...
01.09.2008 18:03:42
Thread-ID: 1006570
11 Beiträge
Zelleninhalt (Text) in 2 Spalten teilen
El.

Hallo!
Habe eine Spalte in der Artikelname und Artikelmerkmale, durch drei Punkte getrennt "...", zusammen stehen. Beispiel: Lecker Whisky 21 Jahre ... Lieferung in hochwertiger Schatulle
Wie krieg ich nun den Text links der Punkte in eine extra Spalte und rechts der Punkte in eine extr...
03.09.2008 16:35:00
Thread-ID: 1007155
4 Beiträge
Anzeige
Spaltentrennzeichen nach speichern in Text-Datei
Michael

Hallo
ich habe ein Problem. Vielleicht ist es schwierig, vielleicht aber auch nicht.
Ich habe eine Text-Datei mit Spaltentrennzeichen "|" (besser als ";" der Übersichtlichtlichkeit halber) und verschiedenen Längen der Spalten.
Ich will diese in Excel überarbeiten und als Text-Dat...
11.09.2008 09:28:00
Thread-ID: 1008978
3 Beiträge
Text in Spalten
Simone

Hallo zusammen,
ich hab ein wohl eher triviales Problem, komme aber trotzdem einfach nicht weiter.
Ich füge in ein Arbeitsblatt Daten aus einem anderen Programm ein. Jetzt habe ich mehrmals die Funktion 'Text in Spalten' verwendet / ausprobiert, und wenn ich jetzt wieder Daten in A1 ein...
16.09.2008 13:54:00
Thread-ID: 1010092
3 Beiträge
Zeilen löschen in Abhängigkeit von 2 Spalten
2

Hallo zusammen,
ich habe ein Makro über den Rekorder aufgezeichnet und versuche es anzupassen. Leider kenn ich mich in der Syntax nicht aus.
Ziel:
In einem markierten Bereich die Zeilen löschen, die in Abhängigkeit von zwei Spalten eine 0 enthalten.
D.h. Spalten X und Y enthalte...
06.10.2008 14:00:00
Thread-ID: 1014434
3 Beiträge
TextBox Werte in Spalte Q ersetzen ?
Selma

Hallo Leute,
ich habe eine Frage zu UserForm. Beim Klick auf CommandButton1 sollen die Zahlen aus TextBox1 mit Werten in Spalte Q ab Zeile 12 ersetzt werden. Dies soll nur dann erfolgen, wenn in TextBox1 die Zahlen stehen bzw. der TextBox gefüllt ist.
Ersetzt sollen nur die vorhandene W...
13.10.2008 15:42:00
Thread-ID: 1016083
3 Beiträge
Text in Spalten
Tom

Hallo,
ich möchte mit der Funktion Text in Spalten erreichen, dass alle Zeilen, die mit einer Zahl beginnen, nach der Zahl in eine neue Spalte geschoben werden - nur finde ich hierfür nur die Funktionen nach Leerzeichen, Komma usw...
Wer hat ne Lösung?
In A1: 1020 Maier Huber Mülle...
20.10.2008 14:09:42
Thread-ID: 1017654
7 Beiträge
Anzeige

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
2
3
10
3
3
2
2
2
2
6
3
2
2
2
2
4
4
8
4
5
4
2
5
3
4