Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Mise en forme conditionnelle et macro

  • Initiateur de la discussion Initiateur de la discussion tbft
  • 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 !

tbft

XLDnaute Accro
Bonjour tout le monde

Je souhaitais supprimer les $ des formules des mises en forme conditionnelle.
Pour faire simple, j'ai essayé la macro suivante:
VB:
Private Sub Supprime_Dollar_MFC()
Dim Cellule As Range, i As Integer
  For Each Cellule In Selection
    With Cellule.FormatConditions
      For i = 1 To .Count
        If .Item(i).Formula1 <> "" Then .Item(i).Modify xlExpression, , Replace(.Item(i).Formula1, "$", "")
        Debug.Print .Item(i).Formula1
      Next i
    End With
  Next Cellule
End Sub

Les formules perdent bien le $ mais changent😡😡
Il doit y avoir une boulette énorme mais je ne la vois pas🙁🙁🙁🙁

Est ce que quelqu'un pourrait m'éclairer😕

D'avance merci
 

Pièces jointes

Dernière édition:
Re : Mise en forme conditionnelle et macro

Bonsoir Pierrejean

Cela fonctionne si on selection une seul cellule, mais pas avec plusieurs?
Regarde la macro du fichier, j'ai remplacer .Selection par .ActiveSheet.usedRange

Je viens d'essayer sur mon pc perso, ça ne marche pas....SNIF
 
Re : Mise en forme conditionnelle et macro

Re

J'ai pas mal travaillé sur ce problème sans parvenir a rien
Si on utilise l'enregistreur de macro , on s'aperçoit que Excel supprime les formatConditions pour ensuite les reecrire
J'ai donc tenté cette voie mais on est perturbé par le systeme de recopie incrementale qui s'effectue
Par ailleurs la modification par modify est egalement influencée si le format condition s'applique a plusieurs cellules : si c9 et c22 ont le même formatconditions la modification est faite lorsque l'on est sur C9 mais ajoutée lorsque l'on est sur c22
D'ailleurs Bill et consorts on essayé de rendre ceci plus accessible dans Excel 2007/2010 ou on voit apparaitre les cellules qui sont interessées par la MFC mais la recopie incrementale est toujours la
En resumé le problème me depasse completement
Je suis le fil au cas ou ...
 
Re : Mise en forme conditionnelle et macro

Le probleme ne vient pas la conversion des forumles statiques en dynamiques.
Le soucis vient excel transforme un formule par exemple =(H15="SSM") en =(H16="SSM")
Lorsque l'on part de la formule =($H$15="SSM")

Tu peux regarder ma macro et la dérouler pas à pas. Et tu verra mon probleme.
 
Re : Mise en forme conditionnelle et macro

Re

tbft
Tu as testé au moins ?

Car chez moi, les dollars ne sont plus là

Code:
Private Sub Supprime_Dollar_MFC()
Dim Cellule As Range, i As Integer, Formule As String
'  For Each Cellule In Selection
  For Each Cellule In ActiveSheet.UsedRange
    If Cellule.Row > 21 Then Exit Sub
    With Cellule.FormatConditions
      For i = 1 To .Count
        If .Item(i).Formula1 <> "" Then
         [COLOR=Red] Formule = Application.ConvertFormula(.Item(i).Formula1, xlA1, xlA1, xlRelative)[/COLOR]
          .Item(i).Modify xlExpression, , Formule
          Debug.Print .Item(i).Formula1
        End If
      Next i
    End With
  Next Cellule
End Sub
 
- 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
908
Réponses
25
Affichages
1 K
Réponses
4
Affichages
730
  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
1 K
Réponses
9
Affichages
882
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…