Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 09:22:48
VBA Filter in intelligenter Tabelle funktioniert nicht
18.04.2024 08:54:52
automatisches übertragen von Daten
18.04.2024 08:16:13
Dynamische Positionsnummerierung
18.04.2024 08:15:33
Seitwärts scrollen - Fenster fixiert
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
972to976
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
972to976
972to976
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

WorksheetFunction.Match

WorksheetFunction.Match
01.05.2008 11:48:20
Sonnenpeter
Hallo,
ich versuche mit der WorksheetFunction.Match die Zeilennummer zu erfahren.
(Bewusst nicht mit Find)
Müsste doch so gehen? 

Sub Vergleiche()
SDatum = Format(Date, "ddd.dd.mm.yyyy")
Test = WorksheetFunction.Match(SDatum, Sheets("Datum").Range("A:A"), 0)
End Sub


Leider erhalte ich eine Fehlermeldung Match kann nicht zugewiesen werden.
Gruß SP

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: WorksheetFunction.Match
01.05.2008 11:59:15
Uduuh
Hallo,
nimm Application.match. test wird zwar zu einem Fehler, aber das Prog läuft weiter.

Sub Vergleiche()
SDatum = Format(Date, "ddd.dd.mm.yyyy")
Test = Application.Match(SDatum, Sheets("Datum").Range("A:A"), 0)
If iserror(test) then
msgbox" nicht da"
else
msgbox "in Zeile" &test
end if
End Sub


Gruß aus’m Pott
Udo

AW: WorksheetFunction.Match
01.05.2008 12:16:14
Sonnenpeter
Hallo Udo,
erst mal Danke für den neuen Ansatz, dass Datum ist definitiv da, trotzdem bekomme ich nicht die Zeilennummer sondern einen Fehler.
Kann das am Datumsformat liegen?
Gruß aus Rheinhessen in den Pott / SP

Anzeige
Nachtra........
01.05.2008 12:17:00
Sonnenpeter
Hallo nochmal.
=VERGLEICH(HEUTE();A:A;0) funzt einwandfrei....
Gruß aus Rheinhessen in den Pott / SP

AW: Nachtra........
01.05.2008 12:21:10
Daniel
Hi
lad doch mal deine Daten hoch, damit man was testen kann.
es liegt nicht immer nur am Code, auch die Daten dazu sind wichtig um den Fehler zu finden.
Gruß, Daniel

SDatum ist ein Variant, der vermutlich...
01.05.2008 12:34:00
Luc:-?
...wg der Pktt als Text interpretiert wird, Peter.
HEUTE() liefert eine Zahl! Mit Date ohne Format sollte es bei entsprechender Deklaration und analogen Daten fkt. Verwende Option Explicit!
Gruß Luc :-?
PS: Application direkt mit einer WshFct wird nicht empfohlen. WorksheetFunction als Eigenschaft von Application... (→ kann entfallen) ist exakter!

Anzeige
Erledigt...
01.05.2008 12:42:47
Sonnenpeter
Danke für eure Unterstützung :-)
So funzt es
Option Explicit

Sub Vergleiche()
Dim SDatum As Long
Dim Test As Long
SDatum = Format(Date, 0)
Test = Application.Match(SDatum, Sheets("Feiertage").Range("A:A"), 0)
Test = WorksheetFunction.Match(SDatum, Sheets("Feiertage").Range("A:A"), 0)
End Sub


Gruß SP

AW: @Luc
01.05.2008 18:16:00
Gerd
Hi Luc,
das entscheidene bei dieser Konstellation war, dass der Suchbereich aus Datevalues= Long-Werten
bestand.
........Worksheetfunctions nicht empfohlen.....
Diese sind immerhin hinreichend dokumentiert u. u. U. genauso schnell wie die entspechende
VBA-Methode.
Gruß Gerd

Anzeige
...das habe ich nicht gemeint,...
01.05.2008 23:19:00
Luc:-?
...Gerd!
Lies mal genau, was ich geschrieben habe: Ich meinte Application.fktsname... Und dass das, was du schreibst, der Grund war, konnte ich mir auch ohne Dateieinsicht denken, denn auch ein Datum ist ein Zahlenwert! Ein Datum ist aber dann kein Zahlenwert mehr, wenn man es mit Format herkömmlich formatiert und dann einer Variablen vom Typ Variant übergibt. Die Variable enthält dann einen Variant vom Untertyp String. Dem hat Peter Rechnung getragen, indem er jetzt auf eine Zahl formatiert hat.
Gruß Luc :-?

AW: ...das habe ich nicht gemeint,...
02.05.2008 00:23:00
Gerd
Hallo Luc,
ob mit Format oder Convert, da stimme ich dir natürlich zu.
Nur ist es halt viel einfacher, den Suchbegriff richtig zu deklarieren,
wenn man weis, welcher Variablentyp erforderlich ist.
Zum anderen Thema:
Application. , Application.Worksheetfunction bzw. Worksheetfunction
Hier ist das Gleiche offenbar nicht immer das Selbe.
Falls es dich interessiert:
http://www.online-excel.de/fom/fo_read.php?f=1&bzh=-1&h=26645&ao=1
Gruß Gerd

Anzeige
...eben, und genau deshalb wird auch nur...
02.05.2008 01:41:00
Luc:-?
...Application von MS nicht empfohlen, Gerd,
obwohl es möglich ist!
Gruß Luc :-?

41 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
Application.WorksheetFunction.Match
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...
15.05.2017 19:43:18
Thread-ID: 1558489
4 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

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