/VBA/Vba find last row in range for certain criteria

Vba find last row in range for certain criteria

Excel vba last row of range

Dim rRange As Range
Dim rDuplicate As Range

Set rRange = ActiveSheet.UsedRange
lFirstRow = rRange.Row
lLastRow = rRange.Rows.Count + rRange.Row - 1
lFirstColumn = rRange.Column
lLastColumn = rRange.Columns.Count + rRange.Column - 1
' New reference to current range (can be truncated)
Set rDuplicate = Range(Cells(lFirstRow, lFirstColumn), _
      Cells(lLastRow, lLastColumn))

Vba find last row in range for certain criteria

Range("E3:E" & Cells(Rows.Count, "F").End(xlUp).Row) = DateSerial(Right(Range("Q1"), 2), 4, 1)

Source: mrexcel.com

Similar codes

0 vote222 views1 answer
Vba pass named range to function
VBA
0 vote224 views1 answer
Open application from vbnet
VBA
0 vote256 views1 answer
Vba nested dictionary
VBA
1 vote253 views1 answer
Excel vba How to determine if a date falls on the weekend?
VBA
0 vote234 views1 answer
VBA Sort RossetaCode
VBA
0 vote246 views1 answer
Excel vba Column Name from Column Number
VBA
0 vote204 views1 answer
Excel vba concatenate range
VBA
-1 vote240 views2 answers
Excel vba delete empty rows
VBA
0 vote235 views1 answer
Limit combobox to list vba
VBA
8 votes281 views1 answer
Vba make a short integer from two bytes
VBA