Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
19.10.2025 10:48:58
Zufällige Uhrzeit
19.10.2025 10:46:18
Zufallszahlen nur wenn Datum ab kommenden Sonntag
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
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
1264to1268
1264to1268
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

per vba Übereinstimmungen und Datum

Forumthread: per vba Übereinstimmungen und Datum

per vba Übereinstimmungen und Datum
karl
Hallo EXCEL GEMEINDE
Ich möchte gerne mit vba Spalte A nach dem aktuellen Monat durchsuchen und vergeleichen
ob in Spalte B t1, in Spalte C ein X, in Spalte D t2 und in Spalte E ein x steht
und dann diese Treffer (können mehrer sein) in das Blatt B kopieren.Im Beispiel hier 3 Treffer
Der aktuelle Monat bereitet mir hierbei die grössten Probleme, weil er sich ja ändern kann…..
https://www.herber.de/bbs/user/80503.xls
herzlichen Dank für die Hilfe. Karl
Anzeige
AW: per vba Übereinstimmungen und Datum
10.06.2012 13:45:13
Hajo_Zi
Hallo Karl,
irgendwie hast Du die falsche Datei hochgeladen, da ist kein Code enthalten.
Month(Date)

AW: per vba Übereinstimmungen und Datum
10.06.2012 13:50:07
karl
Hallo Hajo,
sorry, ich habe keinen Code weil das ist bedauerlicherweise nicht mein Ding ist.
Ich bitte deshalb um die Hilfe und den vba Code
karl
Anzeige
AW: per vba Übereinstimmungen und Datum
10.06.2012 13:53:54
Hajo_Zi
Hallo Karl,
das hat sich aber im ersten Beitrag anders gelesen.
Ich erstelle keine Datei die Deinen Vorstellungen entspicht, dazu ist mir meine Zeit zu schade.
Eine Datei mir nur einen Datum in Spalte A entspricht nicht Deiner Aufgabe.
Ich wünsche Dir noch viel Erfolg.
Ich bin dann raus.

Anzeige
AW: per vba Übereinstimmungen und Datum
10.06.2012 14:07:44
karl
Hallo nochmals,
habe meinen Code beigefügt. Dieser macht aber nicht das was er soll.
Und sicherlich ist ist der Code extrem suboptimal
https://www.herber.de/bbs/user/80504.xls
karl
AW: per vba Übereinstimmungen und Datum
10.06.2012 14:31:37
Hajo_Zi
Hallo Karl,
jetzt gibt es doch mit einmal Code?
Arbeite mit Autofilter und kopiere den sichtbaren Bereich.
Gruß Hajo
Anzeige
AW: per vba Übereinstimmungen und Datum
10.06.2012 14:41:44
karl
Hallo Hajo und alle anderen Helfer,
einen Code dazu hatte ich aber der schien mir nicht vorzeigefähig...
deshalb war er nicht in der Mappe.
Zudem funktioniert er ja auch nicht.
Bricht hier ab, beim Versuch den Monat zu finden
Argument nicht optional 
If Sheets("A").Cells(i, 1).Date(Month) = amonat Then


Sub auflisten()
Dim i As Long
Dim amonat As Integer
amonat = Month(Now())
For i = 8 To 374
If Sheets("A").Cells(i, 1).Date(Month) = amonat Then
If Sheets("A").Cells(i, 2).Value = "t1" And Sheets("A").Cells(i, 3).Value = "x" _
And Sheets("A").Cells(i, 4).Value = "t2" And Sheets("A").Cells(i, 5).Value = "x" Then
Sheets("B").Cells(5, 1).Value = Sheets("A").Cells(i, 1).Value
Sheets("B").Cells(5, 2).Value = Sheets("A").Cells(i, 2).Value
Sheets("B").Cells(5, 3).Value = Sheets("A").Cells(i, 3).Value
Sheets("B").Cells(5, 4).Value = Sheets("A").Cells(i, 4).Value
Sheets("B").Cells(5, 5).Value = Sheets("A").Cells(i, 5).Value
End If
Next i
End Sub
karl
Anzeige
AW: per vba Übereinstimmungen und Datum
10.06.2012 15:48:04
Heribert
Hi Karl,
probiers mal so

Sub auflisten()
Dim i, b As Long
Dim zaehler As Integer
Dim amonat As Integer
amonat = Month(Now())
b = 5
zaehler = 0
For i = 8 To 374
If Month(DateValue(Sheets("A").Cells(i, 1))) = amonat Then
If Sheets("A").Cells(i, 2).Value = "t1" And Sheets("A").Cells(i, 3).Value = "x" _
And Sheets("A").Cells(i, 4).Value = "t2" And Sheets("A").Cells(i, 5).Value = "x" Then
Sheets("B").Cells(b, 1).Value = Sheets("A").Cells(i, 1).Value
Sheets("B").Cells(b, 2).Value = Sheets("A").Cells(i, 2).Value
Sheets("B").Cells(b, 3).Value = Sheets("A").Cells(i, 3).Value
Sheets("B").Cells(b, 4).Value = Sheets("A").Cells(i, 4).Value
Sheets("B").Cells(b, 5).Value = Sheets("A").Cells(i, 5).Value
b = b + 1
zaehler = zaehler + 1
Sheets("B").Cells(3, 7).Value = zaehler
End If
End If
Next i
End Sub
gruss
Heribert

Anzeige
;

Forumthreads zu verwandten Themen

mit Find (VBA) nach Datum suchen
Werner

Hi!
Ich habe folgendes Problem:
Ich habe eine Spalte mit Datumseinträgen (z.B.:13.04.1953, 17.12.1970, ...)
Suche ich mit
ThisWorkbook.Worksheets("AUSWAHL").Columns("E:E").Find(What:="17")
bekomme ich ein Ergebnis
ThisWorkbook.Worksheets("AUSWAHL").Columns("E:E").Find(W...
13.08.2008 23:54:00
Thread-ID: 1001685
8 Beiträge
Bereich nach Datum durchsuchen und Werte vergleich
Michael

Hallo zusammen,
ich habe in der Spalte A Datumsangaben im Format Tag.Monat.Jahr
In der Spalte B befinden sich verschiedene Werte.
Ich möchte nun die Anzahl aller Werte in der Spalte B feststellen die z.b. grösser 50 sind und in der Spalte A das Jahr 2007 aufweisen.
Danke für eue...
04.12.2008 15:10:13
Thread-ID: 1030190
7 Beiträge
Anzeige
Tabellenblätter nach Datum durchsuchen
Markus

Hallo zusammen,
ich habe angefügte Datei erstellt.
Jetzt möchte ich das sich das Blatt "Tabelle1" aus den anderen Blättern mit Daten füllt.
Und zwar soll beispielsweise nach dem Datum in Tabelle1 in A4 in den anderen Blättern gesucht werden. Das Datum steht auf den anderen Blättern...
25.09.2009 10:24:50
Thread-ID: 1105395
2 Beiträge
Anzeige
VBA Datum in INPUTBOX in Tabelle suchen
Klaus

Nachdem ich nun seit einigen Stunden das Forum durchforstet habe, gehen mir langsam die Suchbegriffe aus. Daher frag ich jetzt einfach einmal......
Ich habe (mal wieder) so eine Tabelle mit einer Zinsstaffel. In Spalte B steht immer die Valuta oder eben das Buchungsdatum.
Ich hab mir be...
22.04.2010 16:03:34
Thread-ID: 1153334
2 Beiträge
Spalte nach Datum durchsuchen u danach Filtern
Marta

Hey Leute,
stehe vor meinem nächsten Problem. Nur leider fällt mir im Moment gar kein Lösungsweg ein, nicht einmal Ansatzweise.
Also das Szenario sieht folgendermaßen aus:
Ich habe eine Spalte mit verschiedenen Datumsangaben ab August 2009. Diese Spalte wird jeden Monat mit dem aktu...
03.08.2010 14:32:53
Thread-ID: 1170220
9 Beiträge
Suchen nach Datei
Karsten

Hallo...
ich möchte über Excel nach einer bestimmten Datei suchen.
in A1 steht der Pfad (z.B. C:\)
in A2 möchte ich den Suchtext eingeben (z.B. Schnee)
in A3 und darunter sollen alle Suchergebnisse aufgelistet werden, welche in diesem Zusammenhang gefunden wurden (z.B. Schneeba...
22.12.2010 21:23:16
Thread-ID: 1192594
8 Beiträge
Code Hilfe Bild suchen nach Datei
amintire

Hallo liebe Excel Freunde,
benötige eine Code Hilfe. Soweit funktioniert das ganze auch.
Wenn ich SpinButton betätige zeigt er mir die Bilder an die im Laufwerk abgelegt sind,
würde aber gerne auch nach einem Bild im Laufwerk suchen können,
wenn ich den Pfad eingebe er mir sozu...
08.04.2011 10:32:19
Thread-ID: 1209577
12 Beiträge
Verzeichnis + Dateien nach Zellinhalt durchsuchen
Patrick

Hallo,
ich benötige bitte eure Hilfe.
Folgendes Problem treibt mich um:
Ich möchte ein festes Verzeichnis (c:\test - enthält nur xls.-Dateien) durchsuchen.
Und zwar möchte ich das bei allen enthaltenen Dateien überprüft wird, ob auf dem
Worksheet "Daten" in der Zelle G6 "DE"...
10.05.2011 14:57:44
Thread-ID: 1213837
4 Beiträge
Anzeige
Nachdatum suchen und in entsprechende Tabelle kopi
Choppy_76

Hallo zusammen,
Ich habe eine Tabelle mit 6 Spalten. In Spalte A wird automatisch immer das heutige Datum eingetragen wenn sich in Spalte B was ändert. Nun sollen die Eingaben ab Zeile 2 der Spalte A,B,C,D,E,F soweit die Zellen befüllt sind, der Tabelle Eingabe nach jeden öffnen anhand von...
09.08.2011 09:01:54
Thread-ID: 1225325
14 Beiträge
Dateipfad eingeben und nach Werten druchsuchen
Jens

Hallo Forumsteilnehmer,
ich habe ein problem welches ich mit meinen unzureichenden Kenntnissen leider nicht alleine lösen kann.
Ich soll in einer Arbeitsmappe (z.B Mappe1 / Sheet1) einen Dateipfad für eine andere Mappe (z.B. Mappe2) angeben und per Knopfdruck nach dieser suchen lassen.<...
16.12.2011 08:45:41
Thread-ID: 1242216
3 Beiträge
Zellen nach Datum durchsuchen
Stefan Thewalt

Hallo,
ich habe folgendes Problem:
In meinem Excelsheet habe ich diverse Zellen,
in denen sowohl Text als auch gleichzeitig ein Datum steht in der Form: "Dokumentation fertig 30.06.2002"
Dabei können in einer Zelle auch mehrere solcher Sachen stehen,also:
"Dokumentation fertig 3...
04.06.2002 15:53:23
Thread-ID: 125813
4 Beiträge
Anzeige
Suchen nach Tagesdatum im Namen
Max

Hallo Forum,
ich habe eine Tabelle (Kalender) in der bestimmte Zellen mit einem Namen versehen sind.
Dabei hat die Zelle A1 den Namen "Januar01", die Zelle A2 den Namen "Januar02"....die Zelle B1 den Namen "Februar01", die Zelle B2 den Namen "Februar02" usw.
Nun will ich per Makro z...
13.04.2012 11:59:15
Thread-ID: 1259099
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