[Résolu][Calc]Masquage automatique des lignes vides.

[Seb1258]

Bonjour tous le monde,

Je viens vers vous pour savoir si vous pourriez m'aider pour une macro.

Dans mon tableau ci-joint, j'aimerais avoir une macro (reliée au bouton 'Masquer les lignes") qui me permette de regarder toutes les lignes des plages ci-dessous et de masquer automatiquement celle qui sont vides en colonne A(comme quand on fais clic droit sur un numéro de ligne et qu'on clic sur masquer la ligne).

En revanche, la colonne A contient une formule et j'aimerais que la ligne soit masquée si le résultat de la formule est "". Dans mon exemple, la cellule A16 ne renvoie pas de résultat, donc j'aimerais la masquer.

Dans l'idéal, j'aurais souhaiter avoir une macro qui ré-affiche toutes les lignes masquées également.

Plages de lignes:

7:20
23:29
32:36
39:44
47:52
55:57

Merci d'avance pour votre aide.

A bientôt

[Dude]

Salut,

Pour moi, tu es parti dans une usine à gaz. Ta feuille est mal structurée.
Il faudrait rassembler toutes les infos en une liste contigüe avec une colonne pour catégoriser les totaux.
Tu pourrais alors utiliser les fonctions de filtre et de tableau croisé sans avoir à recourir à de pénibles macros.

[Seb1258]

Bonjour Dude,

Qu'entends tu par "une liste contigüe avec une colonne pour catégoriser les totaux" ?

Pour les tableaux croisés, je ne maîtrise pas vraiment, mais si c'est vraiment beaucoup plus pratique à voir.

Sachant que toutes les données de cette feuille sont mise à jour automatiquement (j'ai supprimer beaucoup d'information, les graphiques, les boutons, etc...).

Merci d'avance,

[Dude]

Qu'entends tu par "une liste contigüe avec une colonne pour catégoriser les totaux" ?

[Seb1258]

Ah ok, merci.

Mais ça ne correspond pas à ce que l'on m'a demandé du coups.

Je garde en tête cette idée quand même.

[Dude]

Mais ça ne correspond pas à ce que l'on m'a demandé du coups.

Avec ce genre de liste, tu retrouveras cette présentation avec un tableau croisé.
Cela t'évitera de coder.
Cet exemple masque les lignes de ta plage :

Code : Tout sélectionner

Sub Masque
	oDoc = ThisComponent
	oFeuil = oDoc.Sheets.getByName("Par Atelier C")
	oPlage = oFeuil.getCellRangeByName("A5:C59")
	oLignes = oPlage.getRows()
	for i = 0 to oLignes.Count -1
		oLigne = oLignes.getByIndex(i)
		oCell = oLigne.getCellByPosition(0,0)
		if Len(oCell.String) = 0 then oLigne.IsVisible = false
	next
End Sub

[Seb1258]

Merci pour ta réponse.

Du coup j'ai copié le code et adapter pour ré-afficher les lignes avec un autre bouton.

Maintenant que le tableau est fini, je vais regarder comment fonctionne les tableaux croisés car je ne connais pas trop.

Sachant que toutes les données sont issues de plusieurs feuilles je ne sais pas comment ça fonctionnera.

Je mettrai des messages dans tableur si besoin.

Merci encore pour ton aide.

[Dude]

Sachant que toutes les données sont issues de plusieurs feuilles je ne sais pas comment ça fonctionnera.

Pour moi, tu es parti dans une usine à gaz.