Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 04:37:43
Mit Word erstellte PDF als Anhang an E-Mail anhängen
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1556to1560
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
1556to1560
1556to1560
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Application.WorksheetFunction.Match

Application.WorksheetFunction.Match
15.05.2017 19:43:18
Christoph
Hallo und einen schönen Abend
Meine Excel/VBA Kenntnisse reichen leider wieder einmal nicht aus und so hoffe ich auf Hilfe im Forum:
Ich habe in der Spalte A Datumswerte eingetragen.
10.10.2015
20.12.2016
30.12.2016
31.12.2016
12.01.2017
04.02.2017
06.03.2017
usw.
Ich möchte nun mittels VBA das erste Auftreten des Datums vom Jahr 2017 haben.
Mein Ansatz mit 
z = Application.WorksheetFunction.Match(CLng(DateSerial(jahr, 1, 1)), .Columns(1), 0)

sucht aber nach dem 01.01.2017, der aber nicht vorhanden ist und somit eine Fehlermeldung erzeugt. Wie muss der Aufruf richtig lauten, um das erste Datum das größer als der 31.12.2016 ist, zu finden. Vielen Dank.

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

Betreff
Datum
Anwender
Anzeige
AW: Application.WorksheetFunction.Match
15.05.2017 20:46:45
ChrisL
Hi Christoph
Probiere mal die letzte 0 auf 1 zu setzen.
VERGLEICH(Suchkriterium;Suchmatrix;[Vergleichstyp])
https://support.office.com/de-de/article/VERGLEICH-Funktion-e8dffd45-c762-47d6-bf89-533f4a37673a
cu
Chris
AW: Application.WorksheetFunction.Match
15.05.2017 21:00:19
Gerd
Hallo Christoph! 
Sub bbb()
Dim objCell As Range, Z As Long, Such As String
Such = "*2017*"
Set objCell = Columns(1).Find(Such, after:=Cells(Rows.Count, 1), lookat:=xlPart, LookIn:= _
xlValues, searchdirection:=xlNext)
If Not objCell Is Nothing Then
Z = objCell.Row
Set objCell = Nothing
End If
MsgBox Z
End Sub

Gruß Gerd
Anzeige
AW: Application.WorksheetFunction.Match
16.05.2017 06:10:10
Christoph
Funktioniert super und vielen Dank für eure Hilfe.

57 Forumthreads zu ähnlichen Themen

WorksheetFunction Match ?
chrissey

Hallo Leut,
versuche einer Variable den Wert der WF.Match zu zuweisen.
e = Application.WorksheetFunction.Match(so, Sheets("WeNr").Range("A2:A4"), 0)
Funktioniert aber nicht, weiss jmd warum ?
p.s.: Habe e als variant definiert, ist integer besser?
Grüße & viele Dank scho...
30.03.2010 09:40:59
Thread-ID: 1149296
4 Beiträge
Anzeige
Fehler bei WorksheetFunction.Match
Michael2010

Hallo allerseits,
ich verzweifel hier bald. Wir haben letzte Woche auf Office 2010 umgestellt und jetzt bleibt eine GANZ Wichtige Tabelle bei folgenden Code hängen
test = WorksheetFunction.Match(i, ArrKW)
Die Dimensonierung
ArrKW = Variant
i = integer, weil es ein Zähler ist...
05.04.2012 08:49:40
Thread-ID: 1257980
5 Beiträge
VBA Fehler abfangen
Peter

Guten Tag an alle Forumsteilnehmer,
ich habe ein kleines Problem mit folgendem Code.
ActiveSheet.Shapes("AutoShape 1").Rotation = Range("A1").Value
Wie schalte ich die Fehlermeldung aus, wenn Zelle A1 leer ist.
Würde mich freuen, wenn Ihr mir weiterhelfen könntet.
Vielen Dan...
03.03.2013 14:33:27
Thread-ID: 1302021
5 Beiträge
Anzeige
VBA Application.WorksheetFunction.Median
Lolaley

Hallo,
Ich wollte mir gern von untereinandergeschriebenen Daten pro Monat (hier jetzt nur die mit 31 Tagen) die Mediane ausrechnen lassen. Dabei kommt jetzt aber immer die Fehlermeldung:
"Eigenschaft des WorksheetFunction-Objektes kann nicht zugeordnet werden"
Ich schätze mal, die...
11.11.2014 14:45:27
Thread-ID: 1391676
6 Beiträge
VBA, WorksheetFunction.SearchB
Rainer Quaas

Hallo Excel-User,die Häufigkeit (H) wie oft String1 in String2 vorkommt, wobei String1 * oder ? als Wildcard enthalten kann, wird durch folgende Funktion berechnet:H = Application.WorksheetFunction.SearchB(String1 , String2 , 1)Bei einer Zeichenanzahl > 32.0000 von String2 ist diese Formel nich...
04.04.2003 11:23:40
Thread-ID: 240294
4 Beiträge
VBA - Application.WorksheetFunction.Index
Markus
Hallo liebe Community,

ich versuche via Application.WorksheetFunction.Index mit Hilfe von zwei Koordinaten (x, y-Wert) Zellen gezielt anzusprechen um Werte (Value)hineinzukopieren.

Ich habe mir mit Hilfe dieser Funktion auch bereits die Werte aus dem ersten Tabellenblatt geholt und...
29.10.2003 10:16:39
Thread-ID: 330289
4 Beiträge
VBA - Application.WorksheetFunction.Index die 2.te
Markus S.
Hallo liebe Community,

ich versuche via Application.WorksheetFunction.Index mit Hilfe von zwei Koordinaten (x, y-Wert) Zellen gezielt anzusprechen um Werte (Value)hineinzukopieren.

Ich habe mir mit Hilfe dieser Funktion auch bereits die Werte aus dem ersten Tabellenblatt geholt und v...
29.10.2003 13:06:21
Thread-ID: 330461
4 Beiträge
VBA-Fehlermeldung abfangen...
Ina
Hallo Forum,
einen schönen Montagmorgen wünsche ich in die Runde!
Ich habe ein kleines Problem...
In Tabelle1 werden abhängig vom Inhalt der Zellen B9:B39 per rechtem Mausklick eine UserForm (AUSWAHL_1 oder AUSWAHL_2) mit ListBox zur Auswahl von Werten geöffnet.
Enthält die Zelle E4...
01.03.2004 10:40:07
Thread-ID: 390692
7 Beiträge

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
5
4
4
3
5
3
3
3
6
1
4
2
3
2
11
2
10
6
2
4
3
1
3
14