jordanburch
Active Member
- Joined
- Jun 10, 2016
- Messages
- 439
- Office Version
- 2016
Hey all,
I have the below. It finds the last row and then finds it again and then copy and pastes the formulas.
This is the line where it errors out
Range(("J" & lRow) + 1).Select
I am getting a type mismatch error 1004 on that line. I dont really understand why. Any help is appreciated!
Jordan
Sheets("CARS TO HQARS BUMP").Select
Range("C44:C70").Select
Selection.Copy
Sheets("AUG FY21 IDARRS").Select
Dim lRow As Long
lRow = Cells(Rows.Count, 10).End(xlUp).Row
Range(("J" & lRow) + 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range(("K" & lRow) + 1).Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=+ABS(RC[-1])"
Range(("K" & lRow) + 1).Select
I have the below. It finds the last row and then finds it again and then copy and pastes the formulas.
This is the line where it errors out
Range(("J" & lRow) + 1).Select
I am getting a type mismatch error 1004 on that line. I dont really understand why. Any help is appreciated!
Jordan
Sheets("CARS TO HQARS BUMP").Select
Range("C44:C70").Select
Selection.Copy
Sheets("AUG FY21 IDARRS").Select
Dim lRow As Long
lRow = Cells(Rows.Count, 10).End(xlUp).Row
Range(("J" & lRow) + 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range(("K" & lRow) + 1).Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=+ABS(RC[-1])"
Range(("K" & lRow) + 1).Select