Un petit coup de pouce! je suis au bord du ......

Bonjour,
j'ai crée une macro afin d'envoyer des données d'une cellule à l'autre grâce
à un bouton à condition que que le chechBox_acier est vrai, mais ça marche pas.

est que quelqu'un a une idée????

Meric d'avance


Sub NBR_Cellules()
'
' NBR_Cellules Macro
' AKA
'
' Touche de raccourci du clavier: Ctrl+n
'
' Affichage nbr Cellules
    If CheckBox_Acier.Value = True Then      <  Voilà l'erreur
       Feuil2.Cells(21, 7) = Feuil1.Cells(175, 14)
       Feuil1.Cells(5, 3) = Feuil1.Cells(175, 14)
    End If
   
    If CheckBox_Inox.Value = True Then
       Feuil2.Cells(21, 7) = Feuil1.Cells(175, 14)
       Feuil1.Cells(9, 3) = Feuil1.Cells(175, 14)
    End If
End Sub

T'as essayé = 1

It@li@

Salut,
ton titre est bidon et si tu cherches de l'aide essai d'en mettre un qui donnera envie aux potes de le lire et de t'aider.
pour ton prob, tu ne peux pas lui dire ces cellules=ces autres cellules. Tu n'es plus sur ta feuille mais en VBA.

Donc tu lui dit :

Range("a2").FormulaR1C1 = Range("a1").Value

FormulaR1C1=ecrire en francais
evite d'ecrire : Cells(21, 7) : tu ne sait pas d'un coup d'oeil ce que c'est mais si tu ecris Range("a1") ou Range("G9") tu vois de suite de quoi on parle

a+


Cliff le bouffeur

Rappel : Range=cellule
sheets=feuille

donc : sheets("feuil2").range("A4").value

Cliff le bouffeur

ok je vais tester!

Italia, j'ai essayé de mettre 1 mais ça marche tjs pas?

et bouf, je vais pas m'amuser a changer toutes mes lignes de codes!

merci

Je sais pas si c'est pareil en VBA mais en VB6 true = -1 et non pas 1

---

Si le cerveau était assez simple pour que nous puissions le comprendre,
nous serions assez bête pour ne pas le comprendre malgré tout.

casy a raison. de plus tu peux utiliser Ctrl+H pour faire les remplacements. cela va très vite
a+

Cliff le bouffeur

ça marche toujours pas, par contre la condition marche bien sur les feilles mais une qu'il est dans le module, il deconne

par contre j'ai un autre souci, si quelqu'un a une macro réutilisable?
En fait j'ai crée des boutons dans la barre d'outil qui marche bien, par contre quand je vais sur un autre PC, je ne les retrouve plus!

Comment faire

Merci bien