Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
25.04.2024 10:30:04
Suche mit MINWENNS und Rückgabe mehrerer Werte
25.04.2024 09:47:49
Daten aus mehreren Dateien untereinander importieren
25.04.2024 09:31:31
Bild "In Zelle platzieren"
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1368to1372
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
1368to1372
1368to1372
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalte A mit kommendne Zellen füllen

Spalte A mit kommendne Zellen füllen
30.06.2014 17:04:49
Mike
Hall zusammen
Ich möchte den Inhalt von Spalte A mit dem Inhalt von den Spalten B und kommenden füllen.
Zum Beispiel:
A1 | B1 | C1 | D1
Hans Paul ; Meier| Hans | Paul | Meier
Das spezielle ist, dass nach zwei Zellen eine Trennung mit dem ";" erfolgen soll, ansonsten nur mit Leerschlag. Das Skript soll alle Spalten in A1 kopieren, bis leer und dann zur nächsten Zeile wechseln und weiterlaufen.
Irgendeine Idee wie ich das mit Makro umsetzen kann?
Danke und gruss
Mike

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalte A mit kommendne Zellen füllen
30.06.2014 20:01:44
Michael
Hallo Mike,
Du brauchst dafür kein Makro, sondern nur eine Formel, die Du in A1 schreibst und nach unten kopierst, soweit Du sie brauchst.
Und zwar: =VERKETTEN(B1;" ";C1;"; ";D1)
Ich hab jetzt vor den ; kein Leerzeichen gesetzt; wenn Du eines haben willst, machst Du zwischen dem " und dem ; noch eines rein.
Die Formel läßt sich auch händisch mit dem &-Operator schreiben, aber mit dem Befehl verketten kannst Du den Funktionsassistenten benutzen, das ist bei umfangreicheren Verkettungen angenehmer.
Falls leere Zellen vorkommen, also in Deinem Beispiel etwa mal der "Paul" nicht vorkommt, wäre eine zusätzliche Wenn-Abfrage ganz nett, um zu vermeiden, daß zwei Leerzeichen nacheinander stehen.
Kannst Du das selbst?
Schöne Grüße,
Michael

Anzeige
AW: Spalte A mit kommendne Zellen füllen
01.07.2014 08:50:05
Mike
Das funktioniert dann wenn du immer die selbe Spaltenanzahl hast, die ist bei mir aber unterschiedlich.

AW: Spalte A mit kommendne Zellen füllen
01.07.2014 16:14:52
Michael
Hallo Mike,
hm, hm.
Na, man kann das schon in einem Makro machen mit dem prinzipiellen Aufbau:
1. Gehe zu 1. Zeile, 2. Spalte
2. Solange Werte in Zelle
verkette und springe zur Zelle rechts
3. Schreibe den (verketteten) Wert in die Zelle der Spalte A
4. Dann gehe in die nächste Zeile, 2. Spalte
Das läßt sich leicht machen, aber ich habe trotzdem das Gefühl, daß wir dabei mit Kanonenkugeln auf Spatzen schießen.
Wenn Du VERKETTEN um einige Spalten erweiterst, in denen eh nichts steht, passiert auch nichts weiter Schlimmes. Anschließend kannst Du die etwa am Ende hängenden Leerzeichen mit =GLÄTTEN entfernen, insgesamt also etwa:
=GLÄTTEN(VERKETTEN(B1;" ";C1;"; ";D1;" ;";E1;"; ";F1;"; ";G1))
Tut das für Dich?
Schöne Grüße,
Michael
Anzeige

273 Forumthreads zu ähnlichen Themen

Zellen formatieren mit vorangehenden "Nullen"
Addi

Hallo zusammen,
ich habe eine lange Liste, in der in einer Spalte Daten stehen, wo ab und zu vorangehende Nullen nötig sind (mal eine - mal 2...etc.) - und manchmal auch keine.
Wie kann ich diese Zellen formatieren, das die vorangehenden "Nullen" nicht automatisch weggelassen werden?
11.08.2008 10:37:00
Thread-ID: 1000746
8 Beiträge
Anzeige
Zelle mit 50 stelliger Zahl
Mathias

Hallo guten morgen,
kann mir bitte jemand sagen wie ich eine Zelle so formatieren kann das darin eine ca. Zahl mit 50 Stellen angezeigt wird.
Folgendes Problem,die Zahl sind so auf 350015+28€ d.h. sie wird als Text angezeigt, formatiere ich diese als Zahl bekomme ich zwar etliche Stell...
21.10.2008 08:33:45
Thread-ID: 1017842
3 Beiträge
Zahl mit Nullen auffüllen !!!
Zoran

Hallo zusammen.
Habe folgenden Code:
Sub NullWert() Dim c As Range Dim laenge As Integer Dim maxNull As Byte Dim i As Integer For Each c In Selection laenge = Len(c) If c "" And IsNumeric(c) Then c.Select maxNull = laenge - 10 For i = maxNull To 1 Step -1 c = c & "0" Next i Activ...
17.11.2008 15:49:00
Thread-ID: 1025268
5 Beiträge
Anzeige
Zahlen mit . auf Spalten übertragen
ZekA

Hallo,
ich habe in Spalte L Zahlen stehen mit dem Trennzeichen .
Also in Spalte L steht
7 . 3 . 38 . 45 . 43 . 8
Wie bekomm ich mit einer Formel die Zahlen in Spalte B-G
Also Spalte B = 7
Spalte C = 3 usw.
Freu mich auf Hilfe. Danke
Gruß
06.02.2009 11:18:30
Thread-ID: 1047676
3 Beiträge
Zahl in Zelle finden und mit 0/1 ausgeben
klaus

Hallo!
Folgendes Problem:
In jeder Zelle einer Spalte sind Zahlenwerte jeweils mit Kommata getrennt. Ich möchte nun einen beliebigen Wert auslesen lassen, d.h. wenn dieser Wert vorkommt die Zahl 1 in die Zelle rechts daneben schreiben lassen.
Wenn ich also aus der Zelle (10,10012,30...
27.02.2009 10:54:59
Thread-ID: 1054649
2 Beiträge
Makro Zahlen mit drei 0 löschen
Jeron

Hallo zusammen,
kann mir jemand bitte bei einem Makro helfen ?
Das Makro soll aus einer beliebig langen Tabelle alle Nummern in der ersten Spalte überprüfen.
Wenn die Zahl mit drei Nullen beginnt, soll die gesamte Zeile gelöscht werden.
Vielen Dank für eure Hilfe!!
Beste Grü...
07.04.2009 11:07:59
Thread-ID: 1067314
6 Beiträge
VBA für Zahlen mit drei Nullen
Jeron

Hallo zusammen,
ich bräuchte bitte ein Makro für folgenden Fall: in meiner Spalte liegen drei Sorten von Zahlen vor
1) 0001234 : In Zeile 1) und 2) stehen die gleichen Zahlen, ich brauch aber nur die Zahl aus Zeile 2)
2) 1234 : " " Zeile 1) muss gelöscht werden
3) 00012...
07.04.2009 16:27:50
Thread-ID: 1067456
4 Beiträge
Letzte Stelle einer Zahl mittels VBA in 0 umwand.
Josef

Guten Morgen!
Ich habe in der Spalte A in einem Arbeitsblatt eine Menge siebenstelliger Zahlen, am Schluß mit einer Prüfziffer versehen, stehen. Ich möchte nun, wenn möglich, mittels VBA immer die letzte Zahl in eine 0 umwandeln.
Wie würde hier bitte eine VBA Lösung lauten?
Danke
10.04.2009 06:26:04
Thread-ID: 1068138
12 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
7
5
2
4
1
2
1
5
3
11
2
5
3
5
1
13
2
10
13
3
5
4
4
1
2