'===================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 () a=2 Select Case a Case 1 Cells(1,1).value = 1 Case 2 Cells(1,1).value = 2 Case Else Cells(1,1).value = 0 End Select End Sub Sub absmain () 'Do not edit this macro, changes will not be saved with the workbook!!! End Sub