Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.06.2025 09:18:27
Excelprogramm mit makro zurücksetzen
19.06.2025 00:23:42
bedingte Formatierung einer Zeilengruppe
18.06.2025 20:36:16
Datum wird bei erneuter Suche nicht gefunden
18.06.2025 19:40:30
Per Spill-Formel sortieren und hochzählen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1056to1060
1056to1060
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

suchen kopieren einfügen vba

Forumthread: suchen kopieren einfügen vba

suchen kopieren einfügen vba
10.03.2009 11:55:49
Bea
Hallo zusammen
Ich hab folgendes Problem.
in der angehängten Beispielmappe möchte ich, das die in Arbeitsblatt "Nummern" hinterlegten Anfänge von Telefonnummern in Arbeitsblatt "evnachweis" gesucht die jeweiligen Zeilen kopiert und dann in Arbeitsblatt in dem Fall "Februar" (am besten mit Inputbox Name selber wählen) in diesem Format eingefügt werden.
die Anzahl der Firmen erhöht sich die drei sind nur ein Beispiel
Puh
Ich hoffe ich hab das einigermaßen gut erklärt und würde mich über eure Hilfe freuen
Schöne Grüße
vom Bodensee
Bea
https://www.herber.de/bbs/user/60160.xls
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Kategorie
Automatisierung
Tags
#automation #datenmanagement #vba
Relevante Fragen
Anzeige
Betreff
Datum
Anwender
Anzeige
eine / Roaming .. Suchen Kopieren Einfügen VBA
10.03.2009 12:39:19
Mike
Hey Bea,
nur zwei Details am Rande: Ideal wäre gewesen, wenn mindestens eine Nummer
(bei "nummern") mit dem EVnachweis übereinstimmen würde ... ;-)
Wem willst Du ROAMING zuordnen?
Gruss
Mike
AW: eine / Roaming .. Suchen Kopieren Einfügen VBA
10.03.2009 12:51:09
Bea
ich möchte ja auch nur die Nummern auf den Arbeitsblatt "nummern" suchen
Gruß
Bea
Anzeige
schon .. Suchen Kopieren Einfügen VBA
10.03.2009 13:01:12
Mike
Hey Bea,
es ist Dir schon bewusst, dass Du keine Nummer "11111" im Nachweis
finden wirst?
Gruss
Mike
AW: schon .. Suchen Kopieren Einfügen VBA
10.03.2009 13:25:31
Bea
Das sind ja auch nur Beispiele ich wollte nicht die tatsächlichen Nummern verwenden da stehen die Ortsvorwahl und die Firmenvorwahl
Schöne Grüße
Bea
Hat keiner eine Idee? oT
10.03.2009 15:16:20
Bea
ot
Anzeige
Hat keiner eine Idee? oT
10.03.2009 15:20:47
Bea
ot
AW: suchen kopieren einfügen vba
10.03.2009 15:22:21
D.Saster
Hallo,
ungetestet:

Sub suchen_und_kopieren()
Dim i As Long, j As Integer, wksZiel As Worksheet, vntNummern, vntEVN, strMonat As String
Dim vntZiel(), n As Integer, k As Integer
strMonat = MonthName(Application.InputBox("Monat (1-12)", "", , , , , , 1))
On Error Resume Next
Set wksZiel = Worksheets(strMonat)
On Error GoTo 0
If wksZiel Is Nothing Then
Set wksZiel = Worksheets.Add
wksZiel.Name = strMonat
End If
vntEVN = Sheets("evnachweis").Range("a10").CurrentRegion
vntNummern = Sheets("nummern").Range("A1").CurrentRegion
For i = 1 To UBound(vntNummern)
n = 0
For j = 1 To UBound(vntEVN)
If vntEVN(j, 4) Like vntNummern(i, 2) & "*" Then
n = n + 1
ReDim Preserve vntZiel(1 To 8, 1 To n)
For k = 1 To 8
vntZiel(k, n) = vntEVN(j, k)
Next
End If
Next j
If n > 0 Then
With wksZiel
.Cells(Rows.Count, 1).End(xlUp).Offset(1) = vntNummern(i, 1)
.Cells(Rows.Count, 1).End(xlUp).Offset(1).Resize(n, 8) = WorksheetFunction.Transpose( _
vntZiel)
End With
End If
Erase vntZiel
Next i
End Sub


Gruß
Dierk

Anzeige
AW: suchen kopieren einfügen vba
10.03.2009 15:50:26
Bea
vielen Dank
das sieht gut aus damit kann ich mit meinem bescheidenen Wissen weitermachen
Schöne Grüße
Bea

Forumthreads zu verwandten Themen

String in Zeilen suchen
Herbert

Hallo liebe Gemeinde
Ich habe mir vor längerer Zeit von Euch helfen lassen, um in der Spalte A rückwärts nach Text zu suchen.
In Spalte A kam bisher der jeweilige Name einer Abteilung (den suche ich) und laufende Nummern vor, klappt prima mit folgendem Code:
Sub a_String() iRow =...
28.10.2008 14:20:00
Thread-ID: 1019944
7 Beiträge
Ordner in Explorer-Struktur suchen VBA
andreas

Hallo zusammen,
habe ein Formular mit einem Button "Speichern" und unter anderem ein Feld "Angebotsnr."
Wird der Button Speichern gedrückt soll das Programm den Ordner der im Feld Angebotsnr. eingetragen ist suchen. Dieser Ordner ist zum Zeitpunkt der Erstellung des Formulares im Window...
11.11.2008 08:50:00
Thread-ID: 1023400
2 Beiträge
Leere Zelle suchen, Wert eintragen VBA
andreas

Hallo zusammen,
habe ein kleines Formular mit zwei "Command-Button".
Bei drücken von "Zufügen" soll die nächst leere Zelle im Bereich "F3:J3500" gesucht werden und ein "x" eingetragen werden.
Bei drücken von "Entfernen" suche im selben Bereich die letzte ausgefüllte Zelle und diese...
19.11.2008 11:57:07
Thread-ID: 1025960
2 Beiträge
VBA-Code in einem String erzeugen und dann ausführ
Dirk

Hallo!
Gibt es eine Möglichkeit, VBA-Code auszuführen, der in einer String-Variablen vorliegt, die zuvor dynamisch erzeugt wurde? Sprich: Ich möchte VBA-Code dynamisch erzeugen und anschließend ausführen. Geht das irgendwie?
Ich hoffe, das ist so verständlich.
Vielen Dank,
Dirk<...
20.01.2009 20:08:36
Thread-ID: 1041981
4 Beiträge
Anzeige
VBA: Bestimmte Zeichenfolge in Zelle finden
gega

Hallo ich bins nochmals,
ich finde einfach keine Möglichkeit zwei Teile aus dem String herauszulösen, da nur "Käufer: " und "[ Kontakt mit Käufer aufnehmen ]" fest am Anfang und Ende des Strings sind und der Käufername hier "leu_bw_cen" unterschiedlich lang ist und auch die EMail-Adr. zw. d...
23.01.2009 11:52:00
Thread-ID: 1042917
3 Beiträge
Wert suchen, eintragen, weitersuchen (VBA)
Nico

Moin
Nachdem ich Gestern mein Problem mit einem Sverweis über mehrere Zellen lösen wollte (Danke nochmal an Josef Ehrensberger) habe ich heute feststellen dürfen, dass es zwar funktioniert - aber die Verzögerung auf Grund der Masse an Daten doch zu hoch ist.
Hier also mein Problem zieml...
26.02.2009 09:19:15
Thread-ID: 1054225
11 Beiträge
Anzeige
VBA Wert suchen, Wert einfügen
andreas

Hallo zusammen,
wie muss ich den Code schreiben, suche nach Zeilen in denen die Zelle "B" nicht leer ist.
In der Zeile in der die Zelle "B" nicht leer ist soll dann in Zelle "P" der Wert "1" eingetragen werden.
Danke für die Hilfe
Andreas
09.03.2009 08:27:39
Thread-ID: 1057988
8 Beiträge
In Spalte nach Wert suchen VBA
andreas


Hallo zusammen,
ich habe hier eine Tabelle, da will ich nach jeder Änderung in der Tabelle in Spalte "F" nach Wert "Spritzgießen" suchen und bei den gefundenen Zeilen die Zellen "B-N" rot einfärben und mit Rahmen versehen.
Komme aber wegen Mangels VBA-Erfahrung nicht klar damit.
03.04.2009 13:05:41
Thread-ID: 1066652
5 Beiträge
Teilstring "was " in Zelle suchen
Werner

VBA-Level: befriedigend
Hallo Freunde,
innerhalb einer Spalte sollen diejenigen Zellen markiert werden, die den Teilstring "was " (einschliesslich der Leerstelle) enthalten, aber nicht,
wenn "was " direkt auf "et" oder direkt auf "nd" folgt. Sinn ist, zwar den Teilstring "was " zu s...
06.04.2009 11:30:35
Thread-ID: 1067067
6 Beiträge
VBA-Code für "Suchen in: Formeln"
Wolfango

Hallo Experten,
ich habe folgenden VBA-Code:
Sub nach_DokNr_suchen() Columns("A:A").Select Application.Dialogs(xlDialogFormulaFind).Show End Sub
Leider habe ich von VBA keine Ahnung!!!
Wie muss ich diesen Code ergänzen bzw. erweitern, dass im erscheinenden "Suchen-Dialogfeld...
20.04.2009 14:58:48
Thread-ID: 1069849
5 Beiträge
VBA Suchen/Ersetzen inkl. Anzahl der Ersetzungen
Randolf

Hallo Excel-Gemeinde,
ich habe folgende Aufgabenstellung? Mit der normalen Suchen & Ersetzen-Funktion wird im Anschluss die Anzahl der Ersetzungen mitgeteilt. So weit so gut. Ich habe jetzt das Makro aufgezeichnet und es normal ablaufen lassen. Aber es kommt keine Anzahl der Ersetzungen...
14.05.2009 11:54:34
Thread-ID: 1075089
7 Beiträge
gezielt in 3 Arbeitsblättern suchen VBA?
Kay

Gute Morgen,
habe eine Userform mit vielen Feldern etc. - klappt alles super. Nun hab ich vor, Datensätze auch wieder bearbeiten zu lassen. Per Suche soll der User die Möglichkeit haben, nach einem Datensatz gezielt zu suchen, den er bearbeiten möchte.
Wie kann ich die Suche ermögliche...
13.07.2009 12:25:43
Thread-ID: 1088114
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige