AUTO FORMATTING WHEN ADDING ADDITIONAL ROWS
I have a spreadsheet which is a user list for new job costings
When additional rows are added i need to update the range to include
the new additional rows
Is there an automatic procedure or code to automatically the code as
below?
Range("A2:G407").Select
When a new code is added (in the spreadsheet ) the range will go from
a2:g407 to a2:g410
Thankyou
Darrell
With Selection.Borders(xlInsideHorizontal)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
Range("A1").Select
Rows("1:1").RowHeight = 23.25
Range("A1").Select
ActiveCell.FormulaR1C1 = "CODE"
Range("B1").Select
ActiveCell.FormulaR1C1 = "NAME"
Range("C1").Select
ActiveCell.FormulaR1C1 = "BANK #"
Range("D1").Select
ActiveCell.FormulaR1C1 = "REC/GRP"
Range("E1").Select
ActiveCell.FormulaR1C1 = "D/MDLE"
Range("F1").Select
ActiveCell.FormulaR1C1 = "JOB #"
Range("G1").Select
ActiveCell.FormulaR1C1 = "GST CODE"
Range("A2:G407").Select
Selection.RowHeight = 20
Range("A2").Select
End Sub
|