XL 2016 procédure qui ne fait rien

B

Bill73

XLDnaute Junior

• 6 Juin 2020

• #16

bien vu,... mais permet d'effacer l'ancienne dernière ligne (RGB(89..) et de la passer en RGB(230..).
je n'ai trouvé que ça pour que ça change la couleur. si je garde juste le Borders.color, la ligne reste en 89 !

 

Vote positif 0 Vote négatif

B

Bill73

XLDnaute Junior

• 6 Juin 2020

• #17

je reprends :
j'écris une ligne A d'infos dans un tableau (dernière ligne du tableau)
mise en forme de la ligne : la ligne du bas : color 89, les autres lignes 230
je rajoute une ligne B (devient la dernière ligne)
j'ai donc en mise en forme la ligne basse de A en 89 (elle reste, c'est comme ça !)
et la ligne basse de B en 89 aussi (normal, on lui demande)
et c'est pour ça le XlTop

bon, je vais quand même revérifier, mais à l'époque, j'avais fais ça pour corriger ce bug d'affichage il me semble.

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 6 Juin 2020

• #18

re
je re formule
tu parle de plusieurs lignes et plusieurs colonnes
le 230 fait la totale au départ
le 89 fait le xlright de Fligne sachant que Fligne est la dernière cellule en bas a droite
et encore 89 le bottom de ligne
que viens faire la correction du xltop de ligne la dedans
maintenant si tu parle d'une seule ligne je comprends mieux
et quoi que il te sufit de mettre tout en 230 et juste le xlright et botom en 89 sur Fligne

 

Dernière édition: 6 Juin 2020

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 6 Juin 2020

• #19

ps; je viens de tester sans c'est pareil

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 6 Juin 2020

• #20

re

VB:

Public Sub Format_Ligne(feuille As String, ByVal lig As Integer, dbcol As Integer, fncol As Integer)
    With Worksheets(feuille)
        With .Range(.Cells(lig, dbcol), .Cells(lig, fncol))
            .Borders.LineStyle = 1
            .Borders.Weight = xlMedium
            .Borders.Color = RGB(230, 230, 230)
            .SpecialCells(xlLastCell).Borders(xlEdgeRight).Color = RGB(89, 89, 89)
            .Borders(xlEdgeBottom).Color = RGB(89, 89, 89)
            .Interior.Color = Array(RGB(232, 232, 232), RGB(209, 209, 209))(Abs(lig Mod 2 <> 0))
        End With
    End With
End Sub

 

Vote positif 0 Vote négatif

B

Bill73

XLDnaute Junior

• 6 Juin 2020

• #21

et bien, impécable, je vais pouvoir virer la ligne...
je sais pas pourquoi j'avais fait ça !
Merci pour l'optimisation du code.

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 6 Juin 2020

• #22

re
après je crois comprendre qu'en fait il s'agit que d'une ligne a chaque coup et qu'a chaque inscription ou changement de ligne tu applique le format et selon l'index de ligne pair ou impair le interior est différent

oserais-je dire qu'il y a les tableaux structuré pour ça et pas besoins de code
ou bien même par MFC

 

Vote positif 0 Vote négatif

B

Bill73

XLDnaute Junior

• 6 Juin 2020

• #23

je sais, mais comme je l'ai dit dans un post précédant, je préfère appliquer la mise en forme depuis VBA automatiquement.

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 6 Juin 2020

• #24

re
heu oui d'accords
les tableaux structurés ou mfc le font automatiquement aussi

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 6 Juin 2020

• #25

re
tien tape quelque chose dans le col 1 a 7
regarde dans les MFC
des que tu va entrer quelque chose dans une des colonne la ligne se formate
PAS DE CODE

 

Pièces jointes

• mfc 1 ligne sur 2+condition sur rempli ou pas.xlsx

  9.8 KB · Affichages: 9

Vote positif 0 Vote négatif

B

Bill73

XLDnaute Junior

• 7 Juin 2020

• #26

bonjour,
je connaissais les mfc mais pas avec des formules, jamais essayé. Trop puissant.
par contre, maintenant, j'ai un autre problème, j'ai des colonnes avec des codes couleurs différents.

pour continuer avec les mfc, j'aurais besoin d'une formule type :

If (abd = 0 And abj = 0) Or abj < Year(Date) en mettant aussi : ET(NB.SI($B3:$H3;"*")>0;

et là, je bute !

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 7 Juin 2020

• #27

Bonjour
peux tu etre plus clair sVP
moi abd abj .... je sais pas ce que c'est je ne suis pas dans ta tète

 

Vote positif 0 Vote négatif

B

Bill73

XLDnaute Junior

• 7 Juin 2020

• #28

question subsidiaire : peut-on appliquer la mfc sur des colonnes distinctes - col B et col L-M

 

Vote positif 0 Vote négatif

B

Bill73

XLDnaute Junior

• 7 Juin 2020

• #29

oui bien sûr, c'est des réf à des colonnes soit col L et M par exemple

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 7 Juin 2020

• #30

oui on peut
on peut appliquer 36 mfc a une même colonne
c'est d’ailleurs ce qui est actuellement
puisque j’applique une mfc interior clair ou foncée a chaque lignes

 

Vote positif 0 Vote négatif