/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 vote132 views1 answer
Convert Seconds to HH:MM:SS in VB.Net
VBA
0 vote124 views1 answer
Vbnet click on dgv cells
VBA
2 votes112 views1 answer
Excel vba extract file name
VBA
1 vote137 views1 answer
Add rows to datagridview vb.net
VBA
2 votes127 views1 answer
Excel vba check if string entirely alpha
VBA
0 vote131 views1 answer
Delete all controls in an area vb
VBA
0 vote120 views1 answer
Vb window.minimize
VBA
1 vote76 views1 answer
Vba Remove Case Sensitivity
VBA
0 vote123 views1 answer
Dynamically change drop down list visual basic
VBA
0 vote129 views1 answer
Average vba
VBA