Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
712to716
712to716
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellen aneinanderfügen, Leerzellen ignorieren

Forumthread: Zellen aneinanderfügen, Leerzellen ignorieren

Zellen aneinanderfügen, Leerzellen ignorieren
01.01.2006 11:50:01
Lupzig
Hallo zusammen,
ich habe mal wieder eine Frage zu Excel:
Ich habe eine Tabelle (siehe Anhang), wo ich Lottozahlen eintrage, auf die ich tippen möchte. Jetzt möchte ich aber nicht jede Woche auf die selbe Anzahl von Zahlen tippen, sondern variabel sein (1-5 Zahlen).
In Spalte J/K möchte ich dann aber die Zahlen lückenlos untereinander stehen haben, mit dem Datum daneben (habe ich jetzt per Hand gemacht und gelb eingefärbt) Ist so etwas möglich ?
Hier ist die Datei:

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

Danke im voraus und frohe Neujahrsgrüße
Tobias Schleifer
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen aneinanderfügen, Leerzellen ignorieren
01.01.2006 18:54:08
Reinhard
Hi Tobias,
du kannst entweder in Tabelle3 die zahlen eintragen oder in Tabelle2. Nachstehender Code notiert automatisch alles mit.
https://www.herber.de/bbs/user/29611.xls
Gruß
Reinhard
ps:Das Forum lebt auch von Rückmeldungen.
Tabelle2 hat einen Spinbutton und ein Textfeld, sowie die 5 Zahlenzellen und die Zelle die die Anzahl anzeigt.
Der Code von Tabelle2: 
Option Explicit
Private Sub SpinButton1_Change()
Dim ws2
Application.ScreenUpdating = False
Application.EnableEvents = False
Set ws2 = Worksheets("Tabelle2")
With Worksheets("Tabelle3")
TextBox1 = .Range("A" & SpinButton1)
ws2.Range("g4") = Application.WorksheetFunction.VLookup(.Range("A" & SpinButton1), .Range("A2:F122"), 2, 0)
ws2.Range("g5") = Application.WorksheetFunction.VLookup(.Range("A" & SpinButton1), .Range("A2:F122"), 3, 0)
ws2.Range("g6") = Application.WorksheetFunction.VLookup(.Range("A" & SpinButton1), .Range("A2:F122"), 4, 0)
ws2.Range("g7") = Application.WorksheetFunction.VLookup(.Range("A" & SpinButton1), .Range("A2:F122"), 5, 0)
ws2.Range("g8") = Application.WorksheetFunction.VLookup(.Range("A" & SpinButton1), .Range("A2:F122"), 6, 0)
ws2.Range("g10") = Application.WorksheetFunction.Count(Range("G4:G8"))
End With
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("g4:g8")) Is Nothing Then
With Worksheets("Tabelle3")
.Cells(SpinButton1, Target.Row - 2) = Target
End With
Worksheets("Tabelle2").Range("g10") = Application.WorksheetFunction.Count(Range("G4:G8"))
End If
End Sub

Anzeige
AW: Zellen aneinanderfügen, Leerzellen ignorieren
01.01.2006 21:38:49
tobias.schleifer@t-online.de
Hallo Reinhard,
danke für deine Hilfe. Ich werde das bei Gelegenheit versuchen in mein Dokument einzuarbeiten.
Gruß
Tobias

Forumthreads zu verwandten Themen

An Zellengröße anpassen in Verbundenen Zellen
Kai

Hallo
Ich habe folgendes Problem.
Ich habe die Zellen D12-G23 verbunden.
Darin soll ein längerer Text stehen, welcher mit sverweis geholt wird.
Wenn ich die Zelle mit Zeilenumbruch formatiere, dann ist der Text zu lang (unten fehlt was).
Wenn ich den Text mit "An Zellengröße...
18.08.2008 17:09:00
Thread-ID: 1002694
3 Beiträge
VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
Bei Eintrag in Zelle Eintrag i. anderer Zelle prüf
Josef

Guten Morgen!
Wenn ich z. B. in der Spalte K ein Datum eintrage, soll in der Spalte N in der gleichen Zeile folgendes geprüft werden:
Ist ein Wert in der Spalte N vorhanden dann soll dieser gelöscht und die Zelle rot gefärbt werden.
Wenn ich jedoch ein Datum in der Spalte K lösche,...
26.08.2008 06:17:08
Thread-ID: 1004645
3 Beiträge
Zellen ausblenden mit Wert 0 in Zelle
Ulrich

Hallo zusammen,
wie kann ich einem Tabellenblatt alle Zeilen ausblenden, bei denen in der ersten Zelle eine 0 (null) steht? Geht sowas überhaupt?
Viele Grüße,
Ulrich
01.09.2008 11:08:49
Thread-ID: 1006360
6 Beiträge
Zelle einer Spalte in bestimmte Zelle kopieren
Fred

Wie kann man irgendeine Zelle, die in einer bestimmten Spalte befüllt wird, in eine fixe Zelle einer andere Excel-Tabelle übertragen?
Danke für eure Unterstützung!
08.10.2008 09:43:47
Thread-ID: 1014907
3 Beiträge
Anzeige
Bild von Zelle in Zelle verlinken
Zelle

Hi Leute
Ich habe in Tabelle1 Zelle A1 einen Text, und danach habe ich in die Zelle ein Bild eingefügt
Nun möchte ich die gesamte Zelle A1 (Bild und Text) in Zelle Z17 haben.
Bei normalen Texten geht es ja mit =A1 (wenn ich in Zelle Z17 stehe)
Gibt es diesen Befehl auch für mein...
04.11.2008 16:19:07
Thread-ID: 1021687
4 Beiträge
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
Inhalt einer Zelle in anderer Zelle als Formel
Elias

Guten Morgen,
ich bin auf der Suche nach einer Lösung für folgenden Sachverhalt.
In einer Tabelle wird aus dem Inhalt verschiedener Zellen über Verketten eine Zeichenfolge gebildet, die in einer anderen Tabelle als Formel herhalten soll.
(Kurzes) Beispiel, das Original ist furchtbar...
11.01.2009 06:01:22
Thread-ID: 1038572
6 Beiträge
Werte aus einer Zelle in andere Zelle (neue Datei)
Franz

Tach auch,
folgendes Problem habe ich:
ich öffne eine Datei über eine Vorlage "rep.xlt". Die heisst dann bis zum Speichern "rep1". In einer Zelle wird eine Zahl eingetragen, bspw.: 1234. Dann kann ich die Datei per makro speichern, dann heisst sie: "rep1234.xls. Das funktioniert auch g...
22.01.2009 15:10:00
Thread-ID: 1042648
3 Beiträge
Inhalt einer Zelle in mehrere Zellen aufsplitten
Joerschi

Hallo liebe Excel-Community,
ich möchte den Inhalt einer Zelle (getrennt durch Leerzeichen) in andere Zellen aufsplitten bzw. in anderen Zellen getrennt anzeigen lassen. Die Leerzeichen aus der Herkunftszelle sollen dabei ignoriert werden.
Z. B. steht in Zelle A1: "1 2 3 4 5"
Jetzt...
04.03.2009 11:46:03
Thread-ID: 1056268
9 Beiträge
Zelle kopieren, einfügen, nächste Zelle kopieren,
Andrea

Hallo,
ich hoffe, dass mir jemand bei meinem Problem helfen kann.
In dem Bereich B5:B50 habe ich im Tabellenblatt "TotalYear" Kostenstellen hinterlegt. Ich möchte B5 kopieren, xmal im Tabellenblatt "Upload Template" einfügen. Dann möchte ich B6 kopieren, xmal in dem Tabellenblatt "Upl...
10.03.2009 12:43:11
Thread-ID: 1058597
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige