Bonjour a tous,
Ce forum a vraiment l'air dynamique et j'espère que vous connaissez une solution à mon problème:
En réalité, je tente de cacher les lignes à 0. Ce n'est pas très compliqué allez vous me répondre, il suffit de mettre le code suivant:
Sub Macro1()
'
' Macro1 Macro
'
Dim I As Long
Dim Plage As Range
Set Plage = Range("C7:C" & Range("C7").End(xlDown).Row)
For I = Plage.Cells.Count To 1 Step -1
If Plage.Cells(I).Value = 0 Then
Plage.Cells(I).EntireRow.Hidden = True
End If
Next
'
End Sub
Ok, vais-je vous répondre, mais le problème est que je voudrais faire celà pour une feuille qui n'est pas active. Je me trouve donc sur la feuille 1 et voudrais le faire sur la feuille 2. Avez-vous une solution?
Un grand merci d'avance.
Ce forum a vraiment l'air dynamique et j'espère que vous connaissez une solution à mon problème:
En réalité, je tente de cacher les lignes à 0. Ce n'est pas très compliqué allez vous me répondre, il suffit de mettre le code suivant:
Sub Macro1()
'
' Macro1 Macro
'
Dim I As Long
Dim Plage As Range
Set Plage = Range("C7:C" & Range("C7").End(xlDown).Row)
For I = Plage.Cells.Count To 1 Step -1
If Plage.Cells(I).Value = 0 Then
Plage.Cells(I).EntireRow.Hidden = True
End If
Next
'
End Sub
Ok, vais-je vous répondre, mais le problème est que je voudrais faire celà pour une feuille qui n'est pas active. Je me trouve donc sur la feuille 1 et voudrais le faire sur la feuille 2. Avez-vous une solution?
Un grand merci d'avance.