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

jacky49

XLDnaute Impliqué
Bonsoir le forum,

Comment puis je faire une mise en forme spéciale sur une colonne.
Ex: j'ai S1, S2, S3 etc.., je voudrais mettre un double trait à chaque fois que ça change de S(1) etc...
je joins un fichier pour expliquer ce que je veux dire
merci
jacky
 

Pièces jointes

Re : MFC speciale,

Bonsoir jacky49, Re Staple1600
Justement en VBA, je propose:

Code:
Sub MFC()
Dim Derligne As Long
Derligne = Range("F" & Application.Rows.Count).End(xlUp).Row
For i = 4 To Derligne
    For j = 2 To 8
        If Cells(i, 6) <> Cells(i - 1, 6) Then
            Cells(i, j).Borders(xlEdgeTop).LineStyle = xlDouble
        End If
    Next j
Next i
End Sub
On peut imaginer une macro evennementielle...
Cordialement
 

Pièces jointes

Re : MFC speciale,

Bonsoir le forum, Efgé,

je vous rejoins un fichier car j'ai essayé avec une autre MFC spéciale mais je n'y arrive pas et je ne sais d'ailleurs pas si c'est possible.
J'aimerais que si par ex: j'ai S1 et ensuite F ou DF, je veux mettre une double ligne mais si par ex c'est S1 et S2 et S3, je veux mettre une ligne en pointillé.
je pense qu'avec le fichier c'est plus parlant.
merci
jacky
 

Pièces jointes

Re : MFC speciale,

re,

en fait, dans ma colonne , j'ai des S1,S2,S3 etc.. et pour les séparés, je voudrais mettre des Traits en Pointillés mais par contre j'ai aussi des F et DF et la par ex si j'ai F, DF et S1, je voudrais mettre des Traits Double .
Dans le fichier joint, j'ai mis des doubles traits pour séparer les S1, F, Df, et S2 et des Traits en Pointillés pour séparé les S4,S5,S
merci en esperant avoir été plus clair
jacky
 
- 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
2
Affichages
239
Réponses
40
Affichages
2 K
Réponses
3
Affichages
415
Retour