Microsoft 365 imprimer si cellule remplie

Lucasix · 15 Septembre 2024

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 · 15 Septembre 2024

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

VB:

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 · 15 Septembre 2024

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 · 16 Septembre 2024

Bonjour à tous,

Lucasix à dit:
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 :

VB:

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

A+

Microsoft 365 imprimer si cellule remplie

Lucasix

XLDnaute Nouveau

sylvanu

XLDnaute Barbatruc

Phil69970

XLDnaute Barbatruc

Pièces jointes

job75

XLDnaute Barbatruc

Discussions similaires