XL 2013 Table multiplication VBA

  • Initiateur de la discussion Initiateur de la discussion Anr1
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Anr1

XLDnaute Occasionnel
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
 
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 :
VB:
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+
 
Bonsoir le fil, l'homme pressé, job75

Une macro pour une formule
(parce que c'est urgent)
VB:
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
 
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 :
VB:
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 🙂
 

Pièces jointes

Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
707
Réponses
2
Affichages
186
Réponses
8
Affichages
270
Réponses
2
Affichages
427
Réponses
4
Affichages
581
Réponses
8
Affichages
650
Réponses
10
Affichages
533
Réponses
5
Affichages
478
Retour