Microsoft 365 imprimer si cellule remplie

[Lucasix]

Bonjour,

J'aimerais créer une macro qui fonctionne de sorte a ce que dès lors qu'une cellule est remplie (non vide) dans ce cas imprimer
Pour l'instant j'en suis la :

Sub print_list()

If ("Planning!F7") <> " " Then

Call print_fibri_congele

End If

End Sub


Le problème est que ça m'imprime dans tout les cas que la cellule soit vide ou non, j'imagine que ce n'est pas très compliqué mais je n'arrive pas à trouver par moi même

Merci d'avance pour votre aide !

 

[sylvanu]

Bonjour Lucasix et bienvenu sur XLD,
"Planning!F7" est une chaine de caractères, Planning!F7 est l'adresse d'une cellule. Aloes essayez :

Sub print_list()
If (Planning!F7) <> " " Then
    Call print_fibri_congele
End If
End Sub

Et pour le code utilisez la balise </> à gauche de l'icone GIF, c'est plus lisible.

 

[Phil69970]

Bonjour @Lucasix

Edit Bonjour Sylvain

Je te propose ce fichier et avec de la chance cela devrait le faire .....

Si cela ne va pas un fichier sera le bienvenu avec les explications adéquates ....

Merci de ton retour

 

[job75]

Bonjour à tous,

Pour l'instant j'en suis la :

Sub print_list()

If ("Planning!F7") <> " " Then

Call print_fibri_congele

End If

End Sub

" " n'est pas un texte vide, utilisez "" et par ailleurs évaluez Planning!F7 avec des crochets :

Sub print_list()
If [Planning!F7] <> "" Then Call print_fibri_congele
End Sub

A+