Excel prosím help

'Alokace proměnných (kromě jiného)
'DIM Tab (6) as string
'Definice pole

'Dim I As Long
'For I = 1 To 6
'For J = 1 To 9

'Telo cyklu

'AA(I, J) = "*" & Str(I) & Str(J)
'Cells(I, J) = AA(I, J)

'Next I
'Next J
'I/O operace prace se soubory
'1.OPEN serie makro instrukci,musi obsahovat jmeno toho souboru-INPUT/OUTPUT/RANDOM
'OPEN jmeno
'b) interni jmeno #číslo

Jak to mám udělat ?