PatCatNat’s, site de Patrice MOREL
Vous êtes ici : Accueil » Inform@tic » Excel ou Calc » Macros diverses

Macros diverses

D 17 mars 2010     H 15:55     A Patrice MOREL    


Masquer les lignes en fonction d’un contrôle sur liste déroulante (Objet) :

Excel 2003 Office 2003 - Excel | Testé |

Sub Masquer()

  Dim I As Long
  
  I = 1   
    
  'Enlève le masquage des lignes
    Rows("5:78").Select
    Selection.Rows.AutoFit
  
  'Boucle le masquage des lignes comportant un "E" dans la première colonne jusqu'à la ligne 81
  Do While I < 82
    If Cells(I, 1).Value = "E" Then
      Cells(I, 1).EntireRow.Hidden = True
    End If
    I = I + 1
  Loop

End Sub

Excel 2003 Office 2003 - Excel | Non testé |
Autres boucles en téléchargement en bas de pages.

Mettre une liste déroulante vierge :

Excel 2003 Office 2003 - Excel | Testé |

'Met 0 en A4 afin de rendre la liste déroulante dépendante vierge
Range("A4").Select
ActiveCell.FormulaR1C1 = "0"

Dans la même rubrique

17 janvier – Bogue en RechercheV avec des parenthèses

12 mai 2021 – Un lien entre les cellules

12 novembre 2019 – Formatages divers

4 janvier 2018 – Incrémentation de lignes avec un classeur lié.

3 août 2017 – Nom de fichier dans une cellule