XL 2016 formule avec bouton

richardlion

XLDnaute Occasionnel
bonjour a tous,

je cherche a conjuguer formules =si(estvide) avec une une action bouton active x.

j'ai un fichier avec des colonnes secu et capa qui se remplissent automatiquement est des colonnes securite capacite.
je souhaiterais en appuyant sur mon bouton active x qu'une formule si(estvide) fonctionne sur plusieurs cellules.
dans le e cas présent du fichier ci joint.
avec le bouton active x exportation
je souhaite que si ma cellule H8 est vide qu'elle prenne la valeur de E8 sinon H8 et si ma cellule I8 est vide quelle prenne la valeur de F8 sinon I8.

je n'arrive a pas conjuguer le bouton et la formule.

si vous pouvez m'aider.

a votre disposition pour echange
 

Pièces jointes

  • Classeur1.xlsx
    14.9 KB · Affichages: 10

sylvanu

XLDnaute Barbatruc
Supporter XLD
1- Vous pourriez fournir une PJ "propre" et simple pour testez.
2- Vous pourriez répondre aux questions :
C'est quoi revenir en arrière?
Remettre vide si AX= BD ?

En PJ un truc simple avec :
VB:
Sub Annulation()
Application.ScreenUpdating = False
DL = [AH65500].End(xlUp).Row    ' dernière ligne, prendre une colonne sans erreur
For L = 18 To DL                ' Le tableau commence en 18
    If Cells(L, "BB") = Cells(L, "AX") Then Cells(L, "BB") = ""
    If Cells(L, "BD") = Cells(L, "AY") Then Cells(L, "BD") = ""
Next L
End Sub
Si une cellule de BB contient la même valeur que AX alors on efface BB. Idem pour BD et AY.
 

Pièces jointes

  • Classeur1 (4).xlsm
    671.5 KB · Affichages: 1

Statistiques des forums

Discussions
313 197
Messages
2 096 121
Membres
106 502
dernier inscrit
Jc_dan