Home |
Search |
Today's Posts |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi,
Am Tue, 30 Aug 2016 21:39:21 -0700 (PDT) schrieb shriil: 1 14-Aug-2016 2 14-Aug-2016 3 15-Aug-2016 4 15-Aug-2016 5 15-Aug-2016 6 17-Aug-2016 7 17-Aug-2016 8 17-Aug-2016 9 17-Aug-2016 10 17-Aug-2016 11 17-Aug-2016 12 18-Aug-2016 13 19-Aug-2016 14 19-Aug-2016 try: Sub Test() Dim LRow As Long On Error GoTo skip With Application LRow = .Match(Range("G1"), Range("A:A"), 0) + .CountIf(Range("A:A"), Range("G1")) - 1 End With MsgBox LRow skip: MsgBox "No matches found" End Sub Regards Claus B. -- Windows10 Office 2016 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Count of times a number is repeated by date? | Excel Worksheet Functions | |||
Find and Add a number in a text field | Excel Worksheet Functions | |||
Lookup to find the last value based on name and date field | Excel Discussion (Misc queries) | |||
How can i calculate the age as on aparticular date on excel | Excel Worksheet Functions | |||
Trying to SUM up a DATE/TIME field in code... | Excel Programming |