Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
836to840
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
836to840
836to840
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalteninhalt gesondert auflisten

Spalteninhalt gesondert auflisten
11.01.2007 12:37:00
inesgeipel
Hallo Zusammen,
ich habe eine große Tabelle mit ca 45.000 Datensätzen.
In der Spalte 6 sind jeweils die Länder des jeweiligen Datensatzes angegeben.
Wie kann ich auf einem anderen Tabellenblatt alle Länder auflisten lassen, die überhaupt vorkommen?
Bsp:
Datensatz-Tab:
456 Deutschland
234 Belgien
123 Ungarn
453 Deutschland
432 Niederlande
524 Belgien
451 Niederlande
usw.
Auflistungs-Tab:
Deutschland
Belgien
Ungarn
Niederlande
Vielen Dank!!!

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalteninhalt gesondert auflisten
11.01.2007 12:42:52
Klaus-Dieter
Hallo Ines,
sieh mal hier: http://home.arcor.de/excelseite/KleineHelfer/listodupl.html da habe ich so was beschrieben. Das Makro müsste noch an deine Liste angepasst werden.
Oder du lädst dir das Programm mit UserForm herunter. http://www.downloadcounter.de/counter.pl?page=http://home.arcor.de/excelseite/Werkzeugkiste/liohndup.html&user=ExcelSeite2
Viele Grüße Klaus-Dieter

Online-Excel
Anzeige
AW: Spalteninhalt gesondert auflisten
11.01.2007 13:43:48
inesgeipel
Hallo,
vielen Dank für die schnell Antwort!!
Irgendwie funktioniert es bei mir nicht so richtig.
was muss ich denn alles anpassen?
Option Explicit

Sub Liste()
' erzeugt aus dem Inhalt einer Spalte eine Liste ohne Duplikate
' geschrieben von Klaus-Dieter Oppermann
' Variablen deklarieren
Dim s As Integer
Dim t As Integer
Dim r As Integer
Dim rr As Integer
Dim we As Integer
Dim nam(100) As String
' Werte in Variablen einlesen
For s = 2 To Range("A65536").End(xlUp).Row  ' Schleifenstart, gehe von Zeile 2 bis letzte Zeile
we = 0                                  ' Temporäre Variable auf null setzen
For t = 2 To s                          ' Schleifenstart, gehe von Zeile 2 bis aktuelle Zelle
If nam(t) = Cells(s, 1) Then we = 1 ' Wenn Wert aus Variable gleich aktuelle Zelle dann _
temporäre Variable gleich 1
Next t                                  ' Wendepunkt für Schleife
If we = 0 Then nam(t) = Cells(s, 1)     ' Wenn temp. Variable gleich null dann Wert aus _
aktueller Zelle in Variable
Next s                                      ' Wendepunkt für Schleife
' Werte in neuer Spalte ausgeben
For r = 1 To t                              ' Schleifenstart
If nam(r) <> "" Then                    ' Wenn Variable einen Inhalt hat, dann ...
rr = rr + 1                         ' ... Zähler für Zelle im Ausgabebereich plus 1
Cells(rr, 3) = nam(r)               ' ... Variable in Zelle schreiben
End If                                  ' Ende der Bedingung
Next r                                      ' Wendepunkt für Schleife
End 


Sub                                     ' Ende des Makros
Anzeige
AW: Spalteninhalt gesondert auflisten
11.01.2007 14:16:21
Klaus-Dieter
Hallo Ines,
du musst im erste Teil, bei Variablen einlesen, die Spaltenummer anpassen. Da du VBA-gut eingetragen hast, bin ich davon ausgegangen, dass du das hinbommst.
Viele Grüße Klaus-Dieter

Online-Excel
AW: Spalteninhalt gesondert auflisten
11.01.2007 13:45:28
Franc
Ich würde den Spezialfilter nehmen
Zelle in der Überschrift markieren und "Daten" - "Filter" - "Spezialfilter"
"an andere Stelle kopieren" und bei kopieren nach die zielzelle anklicken, den Haken bei Keine Duplikate und auf ok klicken.

302 Forumthreads zu ähnlichen Themen

@ Tino - brauche Hilfe bei einer deiner Formeln
oblivion

Hallo, ich habe eine Frage an dich. Du hast mir die Formel erstellt in A16.
Ich habe die Datei mal hochgeladen und in Blatt "Beispiel" Spalte A etwas hereingeschrieben.
Danke für deine Hilfe.
Gruß Oblivion
https://www.herber.de/bbs/user/54685.zip
17.08.2008 21:06:00
Thread-ID: 1002466
4 Beiträge
Anzeige
In mehrspaltiger ListBox Einträge in Spalte zählen
Josef

Hallo!
Mit "Label140.Caption = ListBox9.ListCount" kann ich die eingetragenen Zeilen in einer Listbox zählen und in einem Label eintragen lassen.
Ist es möglich, in einer merhspaltigen ListBox Einträge in einer Spalte z.B. Spalte 8 zu zählen.?
Wenn ja, wie würde hier bitte eine VBA...
26.08.2008 12:10:10
Thread-ID: 1004750
4 Beiträge
Bestimmten Wert in einer Zelle finden
Olli

Hallo,
ich lauf gerade wieder mal mit einem Brett vorm Kopf rum und hoffe, mir kann einer hier helfen.
Ich habe in einer Zelle mehrere Werte stehen, die jeweils durch Semikolon getrennt sind (bis zu 15).
Wie kann ich per VBA eine Schleife erstellen, dass solange nach einem Wert gesu...
19.09.2008 08:54:00
Thread-ID: 1010897
5 Beiträge
Anzeige
Formel gesucht: Anzahl vesch. Werte in Zellbereich
Martin

Hallo liebe Excelianer,
gibt es eine Formel, die die Anzahl verschiedener Zelleninhalte für einen Bereich ermittelt? Zum Beispiel wenn ich 15 Zellen hätte, in denen 3mal die 5 steht und 12mal die 7 steht. Da ja nur 2 verschiedene Werte in den 15 Zellen stehen, müsste also 2 herauskommen. Nu...
19.09.2008 13:25:00
Thread-ID: 1011022
4 Beiträge
UDF - pos. oder neg. Wert in ausgeblendet. Bereich
Peter

Guten Abend
Ich möchte mit Hilfe einer Funktion (z.B. yWert) abfragen, ob innerhalb einem benannten Bereich (z.B. "Zahlenteil") positive oder negative Werte in ausgeblendeten Zeilen enthalten sind. Falls dies zutrifft, sollte die Rückgabe der Tabellenname sowie die betreffenden Zelladressen...
26.09.2008 21:20:00
Thread-ID: 1012746
4 Beiträge
Vergleichen mit Funktion WENN
Uwe

Hallo liebe Forummitglieder,
ich habe ein Problem mit vergleichen von Zahlen.
Ich habe schon selbst probiert, aber das haut hinten und vorne nicht hin.
=WENN(ODER(B10=1;"100")WENN(B10=2;"200")WENN(B10=3;"300")WENN(B10=4;"400"))
Ich möchte wenn in B10 1 steht 100, bei 2 200, bei...
01.10.2008 08:25:00
Thread-ID: 1013514
9 Beiträge
Wert der letzten befüllten Zelle in Bereich
Bibo

Hallo EXCEL-Freunde,
ich habe bei excelformeln.de bei Beate Schmitz und Aladin Akyurek abgekupfert und ermittle mit der genauso kurzen wie eleganten Formel =VERWEIS(9^99;A1:F1) oder =VERWEIS(9^99;C1:C10) die letzten Zahlen in den angegebenen Bereichen.
Das klappt auch wunderbar, soweit...
12.10.2008 15:32:39
Thread-ID: 1015865
5 Beiträge
Such in Spalte Ergebnis in listbox
Markus

Hallo zusammen,
hab wieder mal ein Problem.
Hab ne Userform mit mehreren Textboxen und einer Listbox
In Textbox1 steht mein Suchtext das makro sucht nun im angegebenen Arbeitsblatt nach dem Text und
schreibt mir alle Daten aus der Gefundenen Zeile in Textboxen.
Hab nun fest...
14.10.2008 11:24:35
Thread-ID: 1016271
3 Beiträge
Anzeige

Links zu Excel-Dialogen

UserForm

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