/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 vote128 views1 answer
Vba sort the data Z to A
VBA
0 vote141 views1 answer
Thread sleep vb
VBA
0 vote117 views1 answer
Excel vba hide columns
VBA
1 vote128 views1 answer
Excel vba get column number from column name
VBA
20 votes253 views1 answer
Excel vba recursive example factorial function
VBA
4 votes124 views2 answers
Vba array length
VBA
0 vote126 views1 answer
Excel vba disable keyboard input
VBA
0 vote135 views1 answer
Add text to Shape VBA
VBA
1 vote116 views1 answer
Excel vba to lower case
VBA
0 vote126 views1 answer
Vba run command
VBA