Discussion :

[cneau]

Bonsoir,

Je suis perdue. Je dois utiliser une macro pour un tableau où toutes les lignes ne seront pas remplies et ceci pour impression.
C'est en fait le bilan.
Je mets en pièce jointe le tableau concerné et le modèle de macro à utiliser (mais comment ?)
L'idée serait d'insérer une feuille après le tableau prête à imprimer avec le tableau où apparaissent seulement les lignes.
Je ne sais même pas si c'est très clair.
Merci à tous par avance.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub Masquage
    REM Masquage conditionnel de lignes dans un tableau avec une cellule texte vide à gauche
    dim oFeuille As Object
    dim oCellule As Object
    dim oColonne As integer
    dim i as integer
    oFeuille = ThisComponent.CurrentController.ActiveSheet 'Définit la feuille de travail
    oColonne = 0
    REM Masquage des lignes avec prénoms
          for i = 3 to 9 'Numéros des lignes à vérifier
             oCellule = oFeuille.getCellByPosition(oColonne,i) 'Définit la cellule à vérifier i=ligne
             if oCellule.string = "" then oCellule.rows.isVisible = false 'si case prénom vide, masquer la ligne
          next i
    End Sub