/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 vote220 views1 answer
Hello world vb.net
VBA
1 vote218 views1 answer
Excel vba hide zero values
VBA
0 vote248 views1 answer
Vba clear collection
VBA
0 vote232 views1 answer
Loop through all text boxes in a form vb
VBA
7 votes226 views1 answer
Vba array declaration
VBA
0 vote230 views1 answer
Enable macros on opening workbook vba
VBA
22 votes514 views1 answer
Excel vba check if directory exists
VBA
1 vote231 views1 answer
Shortcut to apply a formula to an entire column in excel
VBA
1 vote220 views1 answer
Vba reverse string
VBA
0 vote223 views1 answer
WGET FTP
VBA