/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 vote206 views1 answer
Replace spaces with underscores vbnet
VBA
0 vote238 views1 answer
Windows Forms dark title bar
VBA
1 vote234 views1 answer
Excel vba array remove first
VBA
1 vote228 views1 answer
Vbscript convert ascii code to character
VBA
3 votes226 views1 answer
Excel vba change format of cell
VBA
0 vote225 views2 answers
Vb.net include quotes in string
VBA
0 vote227 views1 answer
Vba sort the data Z to A
VBA
1 vote232 views2 answers
Excel vba password protect
VBA
0 vote210 views1 answer
Excel protect cells with formulas
VBA
1 vote244 views1 answer
Vba optional
VBA