ahdbrouw
-
Items
2 -
Registratiedatum
-
Laatst bezocht
Inhoudstype
Profielen
Forums
Store
Berichten die geplaatst zijn door ahdbrouw
-
-
Besta VBA-liefhebbers,
In Combobox3 heb ik alle maanden van het jaar, in combobox2 heb ik verschillende jaren (2013,2014,...)
Ik maak een string Datum=ComboBox3.ListIndex + 1 & "/" & ComboBox2.Value
Bij september 2014 geeft Datum 9/2014 weer
mijn bedoeling is in een range alle data te vinden van deze maand in dit jaar, ongeacht welke dag van de maand:
With Worksheets("Gezamelijke").Range("A6:A500")
Set Rng = .Find(Datum, LookIn:=xlValues)
If Not Rng Is Nothing Then
FirstAddress = Rng.Address
Do
'om te zien welke data gevonden worden:
MsgBox Datum & " op adres: " & Rng.Value
...
Set Rng = .FindNext(Rng)
Loop While Not Rng Is Nothing And Rng.Address <> FirstAddress
End If
End With
De eerste datum dat zou moeten gevonden worden is 2/09/2014
maar in de plaats vindt hij enkel de data waar een 9 in de dag komt, vb: 19/09/2014, 9/09/2014, 29/09/2014, ...kan ie
Kan iemand mij hieruit helpen aub?
Avast bedankt!
Annelies
Datum vinden vanuit maand en jaar
in Archief Excel
Geplaatst:
Ik heb
Dim Datum as string
veranderd naar
Dim Datum as Date
Nu neemt hij enkel 1/9/2014
...