Can any one correct this Microsoft Excel VBA code?
ANY ONE CORRECT THIS
Sub fill_series()
Dim myrange As Range
Set myrange = ActiveCell.Offset(0, 5)
Range("N9").FormulaR1C1 = "Apr-2008"
Range("N9").Select
Selection.AutoFill Destination:=myrange, Type:=xlFillDefault
End Sub
Software/Hardware used:
Software/Hardware used:
ASKED:
February 24, 2009 9:47 AM
UPDATED:
February 22, 2010 1:38 PM
RELATED QUESTIONS
- Microsoft Excel VBA
- Error(55,8): PLS-00103: Encountered the symbol "C1" when expecting one of the following: := . ( @ % ;
- Use of multiple SET/WHERE clauses in the MERGE of 2 Oracle tables
- MERGE using DECODE logic to control UPDATE
- Trying to copy a value created within a subroutine to another cell in the same worksheet
Answer Wiki:
If your trying to fill in the next five columns from the active cell with the "Apr-2008" value then you could use:
Dim Counter as Integer
ActiveCell.Select
For Counter = 1 To 5 Step 1
ActiveCell.FormulaR1C1 = "Apr-2008"
ActiveCell.Offset(0,5).Select
Next Counter
Hope that helps
To see all answers submitted to the Answer Wiki: View Answer History.
RSS - Discussions Help
Discuss This Question:
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
