Re : Intrégrer un pavé numérique dans une feuille
Bonjour
Merci d'avoir répondu, aprés bien des essais , jai cré 10 "userFor" pour créer un pavé. Je ne suis pas sur que c'est la maniére la plus élégant mais ca marche
A titre indicatif copie des mes macros
Macro1 Macro
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
ActiveCell.FormulaR1C1 = "1"
Range("B3").Select
Sub Macro2()
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
ActiveCell.FormulaR1C1 = "2"
Range("B3").Select
End Sub
Sub Macro3() Range("B3").Select
End Sub
Ect... pour les autre chiffres