My browser page freezes up whenever I reach the following line:

<%
	setFormula "=IF(AND(SUM(B"&rowcount&":"&chr(64+colcount)
&rowcount&")=0,COUNTA("&chr(66+colcount)&rowcount&")=0),1,0)", sheet, 
rowcount, colcount+1
%>

with sheet, rowcount and colcount being variables referencing worksheet, 
row and column I want to address. setFormula is given below:

<%
SUB setFormula(txt,sheet,i,j)

	ExcelBook.Worksheets(sheet).Cells(i,j).Font.Name = "Times New 
Roman"
	ExcelBook.Worksheets(sheet).Cells(i,j).Font.Size = 10
	ExcelBook.Worksheets(sheet).Cells(i,j).Formula = txt

END SUB
%>

As mentioned above, the browser page freezes up, as does the excel process 
(Win2k Server running an IIS 5). The excel process can't be ended either, 
at least not by the task manager.
Am I doing something wrong? Any help would be appreciated.

Thanks in advance,

KANE.