Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Below loop works ok. But sheet ("pickuptime2") gets near over 15000
rows and it gets slower.Any suggestions would be helpful. Thank you very much in advance. Sub getpoint(tour As Range, tourdate As Range, hotel As Range) With Worksheets("pickuptime2") Set rng1 = .Range("A2", .Range("A" & Rows.count).End(xlUp)) For Each i In rng1 If tour.Value = i.Value And _ tourdate.Value = i.Offset(, 1).Value And _ hotel.Value = i.Offset(, 2) Then tour.Offset(, 12).Value = i.Offset(, 3) Exit Sub End If Next i MsgBox " No Value found " End With |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Msg Box on each Loop to Replace text | Excel Programming | |||
Replace using Do loop | Excel Programming | |||
Loop Function unable to loop | Excel Programming | |||
Find & Replace / Loop & Vlookup | Excel Programming | |||
Replace Loop | Excel Programming |