Détailler liste des cellules contenants 0

[libellule85]

Bonjour le forum,

Dans la colonne B de B4 à B11, j'ai des chiffres et je veux savoir comment faire par macro (de préférence) ou formule pour mettre en B19 le détail des cellules contenants 0 (comme dans la présentation faite dans le fichier joint) !
D'avance merci pour votre aide.

 

[BOISGONTIER]

Re : Détailler liste des cellules contenants 0

Bonjour,

Function ListeZéros(champ As Range)
  Application.Volatile
  For Each c In champ
    If c = 0 Then temp = temp & c.Address(RowAbsolute:=False, ColumnAbsolute:=False) & ","
  Next c
  If temp <> "" Then ListeZéros = Left(temp, Len(temp) - 1)
End Function

JB

 

[libellule85]

Bonjour BOISGONTIER,

Merci beaucoup pour ta réponse c'est exactement ce que je cherchais.

Bonne journée et bonne fête de Noël

 

[libellule85]

Re : Détailler liste des cellules contenants 0

Re,

Excusez-moi j'ai encore une petite question : comment faire pour que le résultat soit mis à jour au fur et à mesure de l'évolution du tableau ? Comment adapter cette fonction pour la mettre dans le Worksheet_SelectionChange par exemple ?
Merci beaucoup pour votre réponse

 

[BOISGONTIER]

Re : Détailler liste des cellules contenants 0

C'est une fonction. Elle est mise à jour automatiquement si on modifie une cellule du champ.

JB

 

[libellule85]

Re : Détailler liste des cellules contenants 0

Re,

Merci beaucoup, je ne le savais pas.