/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

8 votes400 views1 answer
Excel vba determine number of elements in a 1D array
VBA
0 vote364 views1 answer
Write listbox to text file vb.net
VBA
3 votes351 views1 answer
Excel vba export sheet as a csv without losing focus of my current workbook
VBA
8 votes482 views1 answer
Excel vba make word
VBA
0 vote364 views2 answers
How to update date and time automatically once id is entered in excel vba
VBA
0 vote410 views1 answer
Excel vba unlock sheet without password
VBA
0 vote345 views1 answer
Vba get text file content
VBA
0 vote376 views1 answer
Vbscript remove spaces from string
VBA
0 vote389 views2 answers
Open url from vba
VBA
0 vote333 views1 answer
Putting marquee in vb.net
VBA