Kod:
Private Sub UserForm_Click()
Range("D2") = "Ç A R P I M T A B L O S U"
Range("D3") = "----------------------------"
'3.satırdan itibaren çarpım tablosu yazdırmaya çalışıyoruz.
satir = 3
sutun = 1
For i = 2 To 9 'sadece 2 ler ile 9 lar arası çarpım tablosu yapılacak.
For j = 1 To 9 'Her defasında 1 ile 9 arasındaki rakamlarla çarpılacak.
Cells(satir, sutun).Value = i&" x "&j& " = " & (i * j) 'İşte tam da burada Compile Error: Expected: end of statement hatası veriyor ve "x" i işaret ediyor. Nedenini anlayamadım. Yardımınızı rica ederim.
satir = satir + 1
Next j
sutun = sutun + 1
satir = 3
Next i
End Sub