Comment racourci un bouton Range
Diag-Avignon
-
Diag-Avignon Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
Diag-Avignon Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je tourne sous excel 2016
j ai crée un bouton pour additionner des valeurs a partir d une commande puis de remettre a zéro cette commande pour la prochaine.
cependant je ne sais pas comment appliquer cette formule à 1000 ligne sauf manuellement (pénible)
voici mon bouton pour 16 ligne:
Private Sub Commandbutton_Click()
Range("am5") = Range("g5") + Range("ak5"): Range("g5") = 0
Range("an5") = Range("as5") + Range("al5"): Range("as5") = 0
Range("am6") = Range("g6") + Range("ak6"): Range("g6") = 0
Range("an6") = Range("as6") + Range("al6"): Range("as6") = 0
Range("am7") = Range("g7") + Range("ak7"): Range("g7") = 0
Range("an7") = Range("as7") + Range("al7"): Range("as7") = 0
Range("am8") = Range("g8") + Range("ak8"): Range("g8") = 0
Range("an8") = Range("as8") + Range("al8"): Range("as8") = 0
Range("am9") = Range("g9") + Range("ak9"): Range("g9") = 0
Range("an9") = Range("as9") + Range("al9"): Range("as9") = 0
Range("am10") = Range("g10") + Range("ak10"): Range("g10") = 0
Range("an10") = Range("as10") + Range("al10"): Range("as10") = 0
Range("am11") = Range("g11") + Range("ak11"): Range("g11") = 0
Range("an11") = Range("as11") + Range("al11"): Range("as11") = 0
Range("am12") = Range("g12") + Range("ak12"): Range("g12") = 0
Range("an12") = Range("as12") + Range("al12"): Range("as12") = 0
Range("am13") = Range("g13") + Range("ak13"): Range("g13") = 0
Range("an13") = Range("as13") + Range("al13"): Range("as13") = 0
Range("am14") = Range("g14") + Range("ak14"): Range("g14") = 0
Range("an14") = Range("as14") + Range("al14"): Range("as14") = 0
Range("am15") = Range("g15") + Range("ak15"): Range("g15") = 0
Range("an15") = Range("as15") + Range("al15"): Range("as15") = 0
Range("am16") = Range("g16") + Range("ak16"): Range("g16") = 0
Range("an16") = Range("as16") + Range("al16"): Range("as16") = 0
End Sub
Merci de votre aide
Je tourne sous excel 2016
j ai crée un bouton pour additionner des valeurs a partir d une commande puis de remettre a zéro cette commande pour la prochaine.
cependant je ne sais pas comment appliquer cette formule à 1000 ligne sauf manuellement (pénible)
voici mon bouton pour 16 ligne:
Private Sub Commandbutton_Click()
Range("am5") = Range("g5") + Range("ak5"): Range("g5") = 0
Range("an5") = Range("as5") + Range("al5"): Range("as5") = 0
Range("am6") = Range("g6") + Range("ak6"): Range("g6") = 0
Range("an6") = Range("as6") + Range("al6"): Range("as6") = 0
Range("am7") = Range("g7") + Range("ak7"): Range("g7") = 0
Range("an7") = Range("as7") + Range("al7"): Range("as7") = 0
Range("am8") = Range("g8") + Range("ak8"): Range("g8") = 0
Range("an8") = Range("as8") + Range("al8"): Range("as8") = 0
Range("am9") = Range("g9") + Range("ak9"): Range("g9") = 0
Range("an9") = Range("as9") + Range("al9"): Range("as9") = 0
Range("am10") = Range("g10") + Range("ak10"): Range("g10") = 0
Range("an10") = Range("as10") + Range("al10"): Range("as10") = 0
Range("am11") = Range("g11") + Range("ak11"): Range("g11") = 0
Range("an11") = Range("as11") + Range("al11"): Range("as11") = 0
Range("am12") = Range("g12") + Range("ak12"): Range("g12") = 0
Range("an12") = Range("as12") + Range("al12"): Range("as12") = 0
Range("am13") = Range("g13") + Range("ak13"): Range("g13") = 0
Range("an13") = Range("as13") + Range("al13"): Range("as13") = 0
Range("am14") = Range("g14") + Range("ak14"): Range("g14") = 0
Range("an14") = Range("as14") + Range("al14"): Range("as14") = 0
Range("am15") = Range("g15") + Range("ak15"): Range("g15") = 0
Range("an15") = Range("as15") + Range("al15"): Range("as15") = 0
Range("am16") = Range("g16") + Range("ak16"): Range("g16") = 0
Range("an16") = Range("as16") + Range("al16"): Range("as16") = 0
End Sub
Merci de votre aide
A voir également:
- Comment racourci un bouton Range
- Bouton on/off comment savoir ✓ - Forum Matériel & Système
- Comment débloquer un bouton enfoncé - Forum Samsung
- Comment faire une capture d'écran sur un samsung sans bouton ? - Guide
- Symbole arrêt marche - Forum Word
- Input signal out of range - Forum Ecran
4 réponses
Bonjour,
ton code n'a rien à voir avec ce que tu veux faire. Tu fais la somme d'une cellule et d'un résultat de test...
Vider une plage :
range("AM5:AN1000").clearcontents
eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
ton code n'a rien à voir avec ce que tu veux faire. Tu fais la somme d'une cellule et d'un résultat de test...
Vider une plage :
range("AM5:AN1000").clearcontents
eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
Bonjour
merci de ta réponse ta commande va me servir pour éviter la dernière ligne mais je ne comprend pas ta première phrase, comment faire pour que a1 s’additionne a b1 et qu une fois a1=0 b1 reste avec la meme valeur?
merci de ta réponse ta commande va me servir pour éviter la dernière ligne mais je ne comprend pas ta première phrase, comment faire pour que a1 s’additionne a b1 et qu une fois a1=0 b1 reste avec la meme valeur?
Bonjour
voila le fichier
https://www.cjoint.com/c/FAzoKaQS2Wk
ce qu il m intéresse c est de rentrer pour chaque vente que nous faisons la quantite dans la colonne G et le prix Unitaire dans la colonne H, du coup cela me permet de faire une moyenne de mes prix de vente par produit, ensuite de remettre ces colonnes a zero
merci
voila le fichier
https://www.cjoint.com/c/FAzoKaQS2Wk
ce qu il m intéresse c est de rentrer pour chaque vente que nous faisons la quantite dans la colonne G et le prix Unitaire dans la colonne H, du coup cela me permet de faire une moyenne de mes prix de vente par produit, ensuite de remettre ces colonnes a zero
merci