/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 vote141 views1 answer
Open file dialog in vb.net
VBA
8 votes211 views1 answer
Excel vba determine number of elements in a 1D array
VBA
0 vote134 views1 answer
Excel vba urlmon
VBA
5 votes164 views1 answer
Excel vba first byte from INTEGER
VBA
0 vote86 views10 answers
Vba excel create event log
VBA
3 votes123 views1 answer
Vba not equal
VBA
0 vote132 views1 answer
Excel vba disable keyboard input
VBA
0 vote144 views1 answer
Visual stuiod not recognising desgined labels
VBA
5 votes136 views1 answer
Excel vba left word from Long Integer
VBA
3 votes126 views1 answer
Excel vba read registry key value
VBA