XL pour MAC Problème masquage ligne avec cellule contenant formule

[kwakos]

Bonjour à tous,

J'espère tout d'abord que vous vous portez bien en ces temps un peu particuliers !
De mon coté j'en profite pour me relancer dans de la macro que je n'ai pas touché depuis plusieurs années (d'ailleurs j'ai l'impression que sous MAC, ce n'est pas tout à fait le même principe qu'à l'époque sur mon PC, mais bref, c'est une autre discussion)

Alors voilà mon problème
En Feuille 1 "TABLEAU" j'ai une liste de client a facturer avec dans un tableau différentes factures sur plusieurs années
En Feuille 2 "FACTURE" j'aurais souhaiter établir une facture dans un nouveau tableau, mais je n'arrive pas à cacher les cellules à 0€ car, je suppose, elle contiennent une formule recherchev récupérant les données du tableau feuille 1

Bon, un fichier sera surement plus clair qu'un discours, alors le voici

Merci à tous ceux qui se pencheront sur mon petit souci

Bon courage à tous !

 

[sylvanu]

Bonjour Kwakos,
Je pense ne pas avoir compris votre demande, car quand je lance Masque_lig les lignes à 0 se masquent bien (NB : Je suis sous Xl2007 PC Win10 ):

Où est le problème ?

 

[kwakos]

Bonjour Sylvanu !

Tout d'abord merci pour la réponse...
Alors, chez moi cela ne marche pas.
Vous avez bien compris la question, c'est exactement ce que je cherchait à faire !
Etes-vous sur MAC ?
Comme c'est étrange...

 

[sylvanu]

Re,
J'ai bien précisé :

NB : Je suis sous Xl2007 PC Win10

Le code est correct. Est ce encore une différence entre MAC et PC ? Une de plus.

 

[kwakos]

Oops, pardon, dans la précipitation je n'avais pas vu...

Ok, cela doit faire partie des différence MAC / PC sur vba en effet...

Quelqu'un aurait-il une solution MAC à ce problème ?

Merci bien

 

[kwakos]

Bon bah à priori c'est compliqué sur Mac, merci à tous quand même

A très vite

 

[sylvanu]

Seul quelqu'un de pointu travaillant sur MAC pourrait vous répondre.
Essayez ça pour voir, je sélectionne toute la ligne avant de la masquer. Au cas où. Evidemment sur PC j'ai testé ça marche.

Sub Masque_lig()
For i = 25 To 100
    If Range("E" & i) = 0 Then
        Range(i & ":" & i).Select
        Selection.EntireRow.Hidden = True
    End If
Next i
End Sub

 

[kwakos]

Bonjour Sylvanu !

Bon, en effet ça ne marche pas chez moi...
Merci pour votre aide !