OVH Cloud OVH Cloud

format sous-totaux

5 réponses
Avatar
GEGE
J'ai écrit une macro qui établit un certain nombre de sous-totaux dans une
liste (qui s'établissent bien sûr à des emplacements variables dans la
liste, dépendant de son contenu). Quelqu'un sait-il comment formater les
lignes de sous-totaux ainsi générées par excel (par exemple pour les
encadrer ou rajouter du texte dans ces lignes) ?

GL

5 réponses

Avatar
YannX
"GEGE" a écrit dans le message de
news:
J'ai écrit une macro qui établit un certain nombre de sous-totaux dans une
liste (qui s'établissent bien sûr à des emplacements variables dans la
liste, dépendant de son contenu). Quelqu'un sait-il comment formater les
lignes de sous-totaux ainsi générées par excel (par exemple pour les
encadrer ou rajouter du texte dans ces lignes) ?

A priori, tu ré-inventes les Modes Plan ou TCD (tableaux dynamiques

croisés)...
Le formatage est implicite dans ces outils,
ce qui reglera ton problème.

Toute la question est de bien identifier le critère qui fait établir
ces lignes de totalisations
Bonne nuit

Avatar
AV
Si tu appelle "sous-totaux " le résultats obtenu par la fonctionnalité Données >
Sous-Totaux.....
Une MFC peut très bien faire l'affaire
Sous réserves :
Une MFC ne peut pas formater avec les bordures !
Par ailleurs tu parles de "rajouter du texte dans ces lignes" ce qui devient un
peu bizarre...

Sinon :
http://www.excelabo.net/moteurs/compteclic.php?nom=av-mefc
Rubrique : "Recherches dans une plage" --> "Sous-totaux"

AV
Avatar
GEGE
C'est bien cela le but. L'idée est de remplacer les mots du genre "somme",
qui sont automatiquement mis par excel, par des mots plus explicites. et si
en plus on pouvait rajouter des formules dans les cases vides de ces lignes,
ce serait parfait...

GL

"AV" a écrit dans le message de
news:%
Si tu appelle "sous-totaux " le résultats obtenu par la fonctionnalité
Données >

Sous-Totaux.....
Une MFC peut très bien faire l'affaire
Sous réserves :
Une MFC ne peut pas formater avec les bordures !
Par ailleurs tu parles de "rajouter du texte dans ces lignes" ce qui
devient un

peu bizarre...

Sinon :
http://www.excelabo.net/moteurs/compteclic.php?nom=av-mefc
Rubrique : "Recherches dans une plage" --> "Sous-totaux"

AV




Avatar
AV
Bien que n'étant pas du tout partisan de ce type de truc...
A adapter
Ton tableau est en Ax:??x
La fonction (SOMME) utilisée dans les sous-totaux est en col A
Tu veux la remplacer par "blabla" et écrire "blibli" dans la cellule de la col B
des mêmes lignes

Sub zzzz()
Set x = [A65536].End(3)
Set plg1 = Range("A1", x)
Set plg2 = Range("A2", x)
plg1.AutoFilter Field:=1, Criteria1:="=*Moy*"
plg2.SpecialCells(xlCellTypeVisible) = "blabla"
plg2.Offset(0, 1) = "blibli"
[A1].AutoFilter
End Sub

AV
Avatar
GEGE
Je vais essayer.
Merci
GL

"AV" a écrit dans le message de
news:
Bien que n'étant pas du tout partisan de ce type de truc...
A adapter
Ton tableau est en Ax:??x
La fonction (SOMME) utilisée dans les sous-totaux est en col A
Tu veux la remplacer par "blabla" et écrire "blibli" dans la cellule de la
col B

des mêmes lignes

Sub zzzz()
Set x = [A65536].End(3)
Set plg1 = Range("A1", x)
Set plg2 = Range("A2", x)
plg1.AutoFilter Field:=1, Criteria1:="=*Moy*"
plg2.SpecialCells(xlCellTypeVisible) = "blabla"
plg2.Offset(0, 1) = "blibli"
[A1].AutoFilter
End Sub

AV