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

mehrere Zellen in einer Zelle

mehrere Zellen in einer Zelle
14.09.2004 20:25:21
Sebastian
Hallo liebes Forum,
ich steh gerade auf dem schlauch ist schon spät:
ich möchte aus der Spalte A mehrere Zellen in einer Zelle darstellen
Hab folgenden Code begonnen aber das klappt nicht.

Sub test()
Dim zl As Long
For r = 1 To Worksheets("Tabelle1").Range("A10").End(xlUp).Row
Cells(1, 2).Value = Cells(r, 1) & "," & Cells(r + 1, 1) & "," & Cells(r + 2, 1)
Next
End 


Sub
Gruß und Danke
Sebastian

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: mehrere Zellen in einer Zelle
14.09.2004 20:43:51
Ramses
Hallo
Für was soll das denn gut sein ?
For r = 1 To Worksheets("Tabelle1").Range("A10").End(xlUp).Row
Cells(1, 2).Value = Cells(r, 1) & "," & Cells(r + 1, 1) & "," & Cells(r + 2, 1)
Next
jetzt schreibst du im ungünstigsten Fall 10 x etwas in B1, und zum Schluss steht dort doch der letzte Wert aus dem Bereich "A1:A10" in der Zelle ?
Bei dem kleinen Bereich mag das ja noch gehen, aber wenn du ein paar hundert einträge hast, dauert das. Das geht doch auch einfacher. Ausserdem wird die Variable "z1" nicht verwendet, dafür "i" die nicht deklariert ist :-)

Sub test()
Dim r As Long
r = Worksheets("Tabelle1").Range("A10").End(xlUp).Row
Cells(1, 2).Value = Cells(r, 1) & "," & chr$(10) & Cells(r + 1, 1) & "," & chr$(10) & Cells(r + 2, 1)
'Zeilenumbruch für B1 festlegen
With Cells(1, 2)
.WrapText = True
End With
End 


Sub
Hier wird nach jedem Komma ein Zeilenumbruch eingeführt
Gruss Rainer
Anzeige
AW: mehrere Zellen in einer Zelle
14.09.2004 21:07:09
Sebastian
OK mein Versuch ist Müll, vielleicht kannst Du mir noch mal Helfen:
Ich möchte nur:
z.B.
In spalte A
1
2
3
4
5
6
Jeweils in einzelnen Zellen.
Die sollen in einer Zellen kopiert werden also:
In B1: 1,2,3,4,5,6
Bin halt erst am Anfang
Gruß
Sebastian
AW: mehrere Zellen in einer Zelle
14.09.2004 21:14:49
Ramses
Hallo
jeder fängt mal klein an,... deshalb sollte die Fragestellung umso besser sein :-)

Sub test()
Dim i As Long, tmpStr as String
tmpStr = ""
For i = 1 to  Worksheets("Tabelle1").Range("A10").End(xlUp).Row
tmpStr = tmpStr & Cells(i, 1).Value & "," & chr$(10)
next i
With Cells(1, 2)
.Value = left(tmpstr,len(tmpstr)-2)
.WrapText = True
End With
End 


Sub
Gruss Rainer
Anzeige
AW: mehrere Zellen in einer Zelle Nachfrage
14.09.2004 21:24:16
PeterW
Hallo Rainer,
erlaube eine Detailfrage: warum setzt du vor der Schleife tmpStr = ""? Wird das nicht durch Dim tmpStr As String automatisch erledigt?
Danke und Gruß
Peter
AW: mehrere Zellen in einer Zelle Nachfrage
14.09.2004 22:43:27
Ramses
Hallo
Gewohnheit,... dann bin ich sicher dass nix drin ist wenn ich die Routine nochmal laufen lasse ;-)
Bei EXCEL weiss man nie ;-)
Gruss Rainer
AW: mehrere Zellen in einer Zelle
14.09.2004 21:46:43
Sebastian
Hi Reiner,
ich versuch es diesmal besser zu erklären.
Ich bin gerade dabei das ganze noch weiter zu entwickeln aber schon wieder gibt es Grenzen:
Kann ich das ganze auch noch mit einer Bedingung machen, also zb wenn in einer weiteren Zelle der gleichen Zeile OK steht dann sollen nur die Zellenwerte zusammen gefasst werden.
So wie im Beispiel

Gruß Sebastian und vielen Dank für die Hilfe, bin so schon ein Stück weiter gekommen Freu
https://www.herber.de/bbs/user/10886.xls
Anzeige
AW: mehrere Zellen in einer Zelle
14.09.2004 22:44:54
Ramses
Hallo
mit VBA ist nahezu alles machbar,... aber definiere doch erstmal genau, was du wirklich haben willst und wo dann was steht.
Mein altes Hirn ;-) hat keine Lust ständig etwas neues zu machen ;-)
Gruss Rainer
AW: mehrere Zellen in einer Zelle
14.09.2004 23:57:45
Sebastian
Hi Reiner,
Ok hier kommt die Datei so wie sie endgültig aussehen soll:
Ich habe Produkte in Spalte A
Unter den Produkten gibt es Beschreibungen in verschiedenen Zellen sowie eine weitere Spalte B mit OK’s
Wenn nun eine Beschreibung ein OK hat soll sie in eine Zelle Kopiert werden sowie alle weiteren Beschreibungen mit Ok’s
Anschließend sollen die neuen Beschreibungszeilen auf ein anderes sheet kopiert werden
Siehe alles nochmals zum kapieren in dem Beispielblatt:

Gruß und eine Gute Nacht

Die Datei https://www.herber.de/bbs/user/10889.xls wurde aus Datenschutzgründen gelöscht

Anzeige
AW: mehrere Zellen in einer Zelle
15.09.2004 00:08:10
Ramses
Hallo
die Datei enthält nicht deaktivierbare EXCEL4 Makros.
Tut mir leid, solche Dateien öffne ich grundsätzlich nicht.
Gruss Rainer
AW: mehrere Zellen in einer Zelle
15.09.2004 07:04:56
Sebastian

Die Datei https://www.herber.de/bbs/user/10890.xls wurde aus Datenschutzgründen gelöscht

Hier die Datei ohne Macro.
Es war aber nur der Code von Dir drin.
Gruß
Sebastian

330 Forumthreads zu ähnlichen Themen

Letzte gefüllte Zeile in einem Feld anzeigen
Hendrik

Hallo zusammen,
bei einer Exceltabelle, die aus ca. 40 freien Zeilen besteht, die sich über die Zeit füllen, soll in Zeile 41 immer die Zahl der letzten gefüllten Zeile angezeigt werden.
Ist das möglich?
Danke im voraus!
Hendrik
28.08.2008 18:36:42
Thread-ID: 1005564
4 Beiträge
Anzeige
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
Tasten während der Eingabe in einer Zelle abfragen
Arthur

Hallo.
Wie kann man in Excel auf die Eingabe in einer Zelle schon beim Tastendruck reagieren?
Beispiel: Schon während der Eingabe von Werten soll reagiert werden. Bspw. ist eine fünfstellige Bestelnummer einzutragen. Nachdem fünf Ziffern eingetragen sind soll automatisch in die nächste...
22.10.2008 11:44:52
Thread-ID: 1018286
4 Beiträge
Anzeige
mehreren Zellen in einer Zelle mit Absätzen
Christian

1. Ist es möglich, die markierten Zeilen von Screenshot 1 per Formel/Makro so zu übernehmen, das diese wie in Screenshot 2 übernommen werden? Solche Felder kommen aber öfters und auch mit einzelnen Zeilen dazwischen vor. Die Formatierung (bei Zahlen mit ,00 soll ein langer Strich stehen) sollte...
28.11.2008 15:53:49
Thread-ID: 1028725
3 Beiträge
mehrere Zellen in einer Zelle mit Absätzen II
Christian

Hi
Wir brauchen etwas ähnliches wie in diesem Script von Daniel (der uns schon sehr weitergeholfen hat!):
https://www.herber.de/bbs/user/57225.xls
Zeilen sollen zusammengefasst werden, wenn die Bezeichnung in Spalte A und B gleich sind (siehe Screenshots).
https://www.herber.de...
05.12.2008 15:47:00
Thread-ID: 1030485
7 Beiträge
hochzählen in einer Zelle
Tobias

Guten Morgen zusammen,
ich möchte in einer Zelle einen Wert "hochzählen" lassen. Also z.B. in Zelle A1 soll jeweils alles zusammen addiert werden was in Zelle B1 eingegeben wurde.
Ich hoffe das ist einigermaßen verständlich...
Vielen Dank im Voraus für Eure Tipps!
20.12.2008 10:26:00
Thread-ID: 1034350
12 Beiträge
Schriftfarben in Zellen
Ulli

Hallo Zusammen,
beim letzen mal wurde mir sehr schnell, sehr kompetent und sehr freundlich geholfen. Dafür möchte ich mich nochmals bedanken.
Hier mein Problem: Ich habe eine Tabelle mit verschiedenen Farben in einer Zelle. Diese Farben entsprechen jedoch nicht den originalen Schriftfar...
19.01.2009 07:57:00
Thread-ID: 1041313
5 Beiträge
zählen bestimmter Zeichen in einer Zelle
Georg

Hallo Excel Welt,
wie kann ich die Anzahl bestimmter Zeichen (z.B. Kommas) in einer Zelle zählen?
Beispiel:
A2 = 12, 34, 2, 134
B2 = 3 (es sind drei Kommas in der Zelle A2) = dafür benötige ich die Lösung
Oder kann ich die Anzahl der (durch Kommas getrennten) Zahlen direkt...
21.01.2009 16:03:36
Thread-ID: 1042267
6 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
3
1
3
3
7
2
6
11
4
5
2
1
3
6
5
6
13
5
4
4
7
5
7
6
3