Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1524to1528
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
1524to1528
1524to1528
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

*.****-*** in Tabelle finden und übertragen

*.****-*** in Tabelle finden und übertragen
15.11.2016 11:03:52
Nilo
Hallo zusammen,
ich habe eine Tabelle("Daten") mit Daten.
Spalten A:Z
Daten in den Zellen bestehen aus entweder: Zahlen, Text oder Zahl mit Text und oder Zeichen
Ich möchte Werte finden und in Tabelle("Extrakt") in Spalte A übertragen.
Folgende Diktion soll gesucht und übertragen werden, also alles was so geschrieben ist: 1.1000-444 oder 4.4444-222 etc.
Im Autofilter, Spalte für Spalte, funktioniert es mit Suchwert: *.****-***
Es soll aber die Tabelle als ganzes verarbeitet werden.
Dabei benötige ich Eure Hilfe.
Besten Dank und Gruß
Nilo

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

Betreff
Datum
Anwender
Anzeige
AW: *.****-*** in Tabelle finden und übertragen
15.11.2016 11:27:58
UweD
Hallo Nilo
so?
Option Explicit 
 
Sub exakt() 
    Dim TB, firstAddress, C, z& 
    Set TB = Sheets("Extrakt") 
    TB.Columns(1).ClearContents 
    With Sheets("Daten").Range("A:Z") 
        Set C = .Find(What:="?.?-?", LookIn:=xlFormulas, LookAt:=xlPart) 
        If Not C Is Nothing Then 
            firstAddress = C.Address 
            Do 
                z = z + 1 
                TB.Cells(z, 1) = C.Value 
                Set C = .FindNext(C) 
            Loop While Not C Is Nothing And C.Address <> firstAddress 
        End If 
    End With 
End Sub

LG UweD
Anzeige
AW: Genau so ;) Super Danke für die schnelle Hilfe
15.11.2016 11:39:56
Nilo
...
AW: gern geschehen owt
15.11.2016 11:56:10
UweD

300 Forumthreads zu ähnlichen Themen

Spaltenwerte ausgewählter Tabellen kopieren
obelix-xxl

Hallo,
in mehreren Tabellen habe ich in der gleichen Spalte X11:X100 Summenwerte eingetragen.
Die Spaltenbeschriftung ist in der Zelle X10 und ist gleich dem Tabellennamen, z.B. -1.234.
Zur weiteren Verwendung möchte ich nur die Ergebnisse der markierten Tabellenblätter in eine neu...
07.09.2008 08:42:00
Thread-ID: 1007926
2 Beiträge
Anzeige
Beim Kopieren eines Tabellenblattes den VBA-Code e
Alfi

Hallo Excel-Gemeinde!
ich habe eine mehrblättrige Datei, per Makro kopiere ich ein Blatt und speichere dieses unter neuem Namen ab.
Dieses Blatt soll aber nicht mehr den VBA-Code der ursprübglichen Datei enthalten, sprich ein Blatt ohne Makros.
Wer kann mir helfen?
So sieht der...
09.09.2008 09:58:00
Thread-ID: 1008333
8 Beiträge
Tabellenblätter in neue Arbeitsmappe kopieren
Christian

Hallo!
ich möchte gerne per makro aus einer datei mit ca. 70 tabellenblättern 11 Blätter auswählen und in eine neue Mappe kopieren, am besten sollten auch gleich noch die verküpfungen (in der neuen mappe) gelöscht werden.
Die zu kopierenden Blätter sind nicht hintereinander, also quer ü...
10.09.2008 16:37:00
Thread-ID: 1008845
6 Beiträge
Anzeige
Exceltabelle in Word
S.H.

Hallo,
evtl. bin ich auch im falschen Forum, aber trotzdem meine Frage:
Ich habe ein Excel Arbeitsblatt unter word eingefügt und möchte dort weitere Zeilen einfügen. Das funktioniert auch soweit, am Ende der Word Seite ist allerdings Schluss. Ich schaffe es nicht, das die Tabelle einen...
20.10.2008 20:22:26
Thread-ID: 1017796
3 Beiträge
Exceldaten als Fliestext in Word einbinden?
Frank

Hallo zusammen,
ich habe eine halbe Excel und halbe Wordfrage :-)
Ich habe eine Exceltabelle mit diversen Zahlenmaterial. Das Zahlenmaterial wird ständig aktualisiert. Parallel dazu habe ich einen geschriebenen Langtext in Word, der eine Art ausführliche Erklärung zur Exceltabelle darst...
23.10.2008 07:08:00
Thread-ID: 1018498
3 Beiträge
von Tabelle eine Datei erstellen
Tabelle

Hallo Zusammen,
vielleicht kann mir jemand einen Tip geben.
Ich möchte gern von der aktiven Tabelle eine Datei erstellen.
Die Datei sollte ins Verzeichnis "C:\Gesamt\Produkte\"
kopiert werden.
Der Tabellenname: "Daten"
Nach Möglichkeit als Datei mit akt. Datum: "Daten...
23.10.2008 12:44:00
Thread-ID: 1018612
5 Beiträge
Kopieren in ausgeblendete Tabelle
Wolfgang

Hallo,
noch weiterhin auf der Suche nach Lösungsmöglichkeiten, folgende Frage. - Den untenstehenden Code entdeckte ich auf der "Herber-CD"; Wie kann ich den Code umstellen, wenn die Daten aus Tabelle "Grunddaten" und "Altdaten" in die ausgeblendete Tabelle "Gesamt" kopiert werden soll. Dabe...
09.11.2008 15:48:00
Thread-ID: 1023078
3 Beiträge
Excel Grafiken in Word kopieren
niefl

Hi,
eine Freundin schreibt gerade eine Arbeit in Word. Sie verwendet sehr viele Excel Diagramme und Tabellen. Sie verwenden "kopieren" (in Excel) und "Inhalte einfügen" / "als Bild (Erweiterte Metadatei)" um Diagramme in das Word-Dokument zu integrieren. Leider ist das Ergebnis nicht perfek...
09.11.2008 19:19:03
Thread-ID: 1023105
2 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
1
3
7
5
2
2
2
4
2
1
3
2
7
5
2
2
7
3
4
2
2
5
4
3
6