Poniżej umieszczam skrypt tworzący w Excelu tabliczkę mnożenia:

Thank you for reading this post, don't forget to subscribe!

Kod zawiera sporo komentarzy wiec nie będę się tu rozpisywał.

Sub TabliczkaMnozenia()
'program tworzący tabliczke mnozenia

'deklarowanie zmiennych
Dim col As Long
Dim row As Long

'rozpoczęcie pierwszej pętli ( mnożnik kolumny od 1 do 10)
For col = 1 To 10
'rozpoczęcie drugiej pętli (mnożnik wiersza od 1 do 10)
For row = 1 To 10

'kolorowanie liczb pierwszych
If col = 1 Or row = 1 Then
Cells(row, col).Interior.Color = RGB(200, 200, 200)
End If

'wykonywanie nożenia oraz wprowadzanie wartości do poszczególnych komórek
Cells(row, col) = col * row
Next row
Next col

'koniec programu
End Sub

a oto wynik zrealizowania kodu VBA: