XL 2013 Table multiplication VBA

[Anr1]

Bonjour tt le monde !


svp comment crée une table multiplication VBA sous cette forme !

1 2 3 4
10
12
14
16
20

ce code ne fonctionne pas !!!

Sub table_multiplication()
Cells(1, 1).Select

For a = 10 To 20
For b = 1 To 4

For i = 2 To 2

ActiveCell.Offset(b + 4, a - 6).Value = (a) * (b + i)

Next i

Next b
Next a

End Sub

 

[job75]

Bonjour anouarlachiri,

Quand on est pressé on se dépêche de fournir des explications que tout le monde peut comprendre.

Moi je ne comprends rien à ce que vous voulez faire alors bêtement j'ai fait cette macro :

Sub table_multiplication()
Dim i&, j%
For i = 1 To 20
    For j = 1 To 20
        Cells(i, j) = i * j
Next j, i
End Sub

A+

 

[Staple1600]

Bonsoir le fil, l'homme pressé, job75

Une macro pour une formule
(parce que c'est urgent)

Sub Macro1()
Dim chiffres
chiffres = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
[B1:K1] = chiffres
[A2:A11] = Application.Transpose(chiffres)
[B2:K11] = "=(ROW()-1)*(COLUMN()-1)"
With Range("A2:A11,B1:K1")
.Font.Bold = True
.Interior.ColorIndex = 6
End With
[A1].CurrentRegion.Borders.LineStyle = 1
[A1].CurrentRegion.Columns.AutoFit
End Sub

 

[mapomme]

Bonsoir à tous,

Voir fichier (formule en B2)

Salut

 

[job75]

Bonsoir JM, mapomme,

A quoi on joue là ? Voir le fichier joint qui donne le même résultat que mon poste #2 mais par formule.

Bonne nuit.

 

[David Aubert]

Bonjour à tous,
J’ai supprimé le « Urgent » dans le titre.
Voir la charte...
Bonne journée

 

[Anr1]

Bonjour anouarlachiri,

Quand on est pressé on se dépêche de fournir des explications que tout le monde peut comprendre.

Moi je ne comprends rien à ce que vous voulez faire alors bêtement j'ai fait cette macro :

Sub table_multiplication()
Dim i&, j%
For i = 1 To 20
    For j = 1 To 20
        Cells(i, j) = i * j
Next j, i
End Sub

A+

merci bien @job75 , @Staple1600 , @mapomme ;


j'avais un test VBA hier c'est pour cela j'ai écrit urgent
par contre les programmes que vous m'avais envoyé marche si on a de ligne : 1 2 3 ..... 10 , et colonne : 1 2 3 .....10

par contre ma table est :

colonne : 1 2 3 4
ligne: 10 12 14 16 18 20

vois le fichier joint montre ma table ..

Merci d'avance