Program: przedstawiający generowanie tabliczki mnożenia.
O wymiarach podanych przez użytkownika.
Kompilator: Microsoft Excel
Kod programu:
Sub makro_1()
n = InputBox("Podaj zakres w pionie:")
m = InputBox("Podaj zakres w poziomie:")
For i = 1 To n
For j = 1 To m
Cells(i, j) = i * j
Next j
Next i
End Sub