'===================ABV PROJECT====================== '===================MODULE 1 ======================= Sub main () 'you can edit this macro to execute any command when loading this workbook 'next line call the routine that fill the sheet call absmain () call testloop() End Sub Sub testloop() for i = 1 to 1000 for j = 1 to 10 Cells(i,j).value = i*10+j+1.1 next j next i End Sub Sub absmain () 'Do not edit this macro, changes will not be saved with the workbook!!! End Sub