I'm trying to dynamicly create a square ranged border. I take a value
off of the sheet "Param" then try to create a red border on "Magic".
However I keep getting a "Run-tim error '1004': Applicatoin-defined or
object defined error". Is there any other way for me to do this?

Thanks

Adam


Function Build_Grid()

Dim Start As Integer
Start = Worksheets("Param").Range("ODD_INPUT").Value
Worksheets("Magic").Cells.Clear

Worksheets("Magic").Range(Cells(1, 1), Cells(Start,
Start)).BorderAround ColorIndex:=3, Weight:=xlThick


MsgBox "Your Square has been created"




End Function



------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~ View and post usenet messages directly from http://www.ExcelForum.com/