Masquer une ligne sur une autre feuille

Bonjour à tous,

Je suis désespéré, celà fait bien 5h que j'essaie de faire une fonction qui doit être vraiment basique et que je recher sur tous les forums.

Je recherche à masquer un ensemble de lignes et colonnes en fonction d'une macro située sur une autre feuille.

En premier lieu, je cherchais à masquer les cellules si une cellule présente sur une autre feuille est vide.(Si vous avez l'astuce ce serait le top)

autrement, celà me semblait trop compliqué, et j'ai donc utilisé une "checkbox", j'arrive donc à masquer des cellules losqu'elles sont sur la même feuille mais pas sur d'autres feuilles.

J'ai donc essayé diverses formules sans succès comme:

Worksheets("Feuil3").Activate

Worksheets("Feuil3").select

Feuil3.Activate

Feuil3.Select

With Sheets("calculs")

Sheets("Feuil3").Select

Sheets("Feuil3").Active

Voici mon code VBA:

Private Sub CheckBox1_Click()

If CheckBox1 = True Then

Cells.Rows("7").Hidden = True

Cells.Columns("e:g").Hidden = True

Cells.Rows("9:100").Hidden = True ces 3 lignes sont là en "test" et fonctionnent

Worksheets("Feuil3").Activate

Rows("1:10").Hidden = True ce que je veux en réalité et qui ne fonctionne pas

ElseIf CheckBox1 = False Then

Cells.Rows("7").Hidden = False

Cells.Columns("e:g").Hidden = False

Cells.Rows("9:100").Hidden = False

Worksheets("Feuil3").Activate

Rows("1:10").Hidden = False

End If

End Sub

Vous trouverez mon fichier en pièce jointe.

Merci de votre aide

Bonjour

Essayes

Private Sub CheckBox1_Click()
  If CheckBox1 = True Then
    Rows("7").Hidden = True
    Columns("e:g").Hidden = True
    Rows("9:100").Hidden = True
    Worksheets("Feuil3").Rows("1:10").Hidden = True
  Else                                            'If CheckBox1 = False Then
    Rows("7").Hidden = False
    Columns("e:g").Hidden = False
    Rows("9:100").Hidden = False
    Worksheets("Feuil3").Rows("1:10").Hidden = False
  End If
End Sub

Je ne vois pas l'utilité de Cells

Un checkBox est soit (en principe) coché ou décoché : Donc si tu testes si coché pas la peine de tester si décoché

Bonsoir,

Merci pour ta réponse, malheureusement ça ne marche pas.

Effictivement Cells n'y était pas, je l'ai rajouté en "bidouillant" suite à des comparaisons que j'ai faite avec d'autres VBA. Merci pour l'infos!

Si vous avez d'autres idées!

Merci beaucoup

Bonsoir

J'ai refait un fichier de test car j'ai des soucis de compatibilité avec les activex

A voir

Merci beaucoup ça fonctionne à merveille!

Encore merci bonne soirée