/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 vote381 views1 answer
Create links in msgbox in vb
VBA
0 vote349 views1 answer
Vbnet line chart showing extra space
VBA
2 votes353 views2 answers
Excel vba copy values range to another range
VBA
0 vote346 views1 answer
How to get value from clipboard in vbnet
VBA
0 vote443 views1 answer
Excel vba delete columns in range
VBA
0 vote352 views1 answer
Type excel.application is not defined vb
VBA
0 vote369 views1 answer
Vba run command
VBA
1 vote324 views1 answer
Vba listindex select multiple items vba
VBA
0 vote374 views1 answer
Vbnet check if string is only letters
VBA
0 vote368 views1 answer
How to enter Vbox manage commands
VBA