Kristylee0228
New Member
- Joined
- Sep 8, 2011
- Messages
- 30
Hi there,
I have a Macro that finds the last empty cell in a column and fills it with the value "CO".
lastRow = Cells(Rows.Count, 3).End(xlUp).Row
Cells(lastRow + 1, 3).Select
ActiveCell.FormulaR1C1 = "CO"
ActiveCell.Select
I now need the Value "CO" to Autofill from this point until end of the worksheet.
This is what I thought to do, but it does not work. Also, I don't want the "CO" to fill anything above the last empty cell.
'Selction.AutoFill Destination:=Range("C2:C" & lastRow)
'Selection.Copy
'Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
':=False, Transpose:=False
'Application.CutCopyMode = False
Any help would be greatly appreciated!!!
Thank you,
Kristy
I have a Macro that finds the last empty cell in a column and fills it with the value "CO".
lastRow = Cells(Rows.Count, 3).End(xlUp).Row
Cells(lastRow + 1, 3).Select
ActiveCell.FormulaR1C1 = "CO"
ActiveCell.Select
I now need the Value "CO" to Autofill from this point until end of the worksheet.
This is what I thought to do, but it does not work. Also, I don't want the "CO" to fill anything above the last empty cell.
'Selction.AutoFill Destination:=Range("C2:C" & lastRow)
'Selection.Copy
'Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
':=False, Transpose:=False
'Application.CutCopyMode = False
Any help would be greatly appreciated!!!
Thank you,
Kristy