XL 2013 résolus erreur code

gena · 29 Juillet 2020

bonsoir le forum
voila mon petit soucis encore une fois
Thierry ma aidé a faire un userform pour une basse client tout fonctionne rien a dire
mais voila je recherche a mettre un mgbox pour les date anniversaire a l'ouverture du dossier de ses clients de ma base
j'ai essayé un petit code dans le THISWORKBOOK qui fonctionne pas
ni dans un module 1
si vous pouvais m'aidé cela serait génial
avec tout mes remercîments

Phil69970 · 29 Juillet 2020

Bonsoir Gena

Dans ==> Thisworkbook
Rajouter après :
Dim Cell As Range

==> Worksheets("basededonnéespatient").Select

Remplacer
==> With Worksheets("~~Feuil8~~")

Par :
==> With Worksheets("BaseDeDonnéesPatient")

Et supprimer le module1

@Phil69970

gena · 29 Juillet 2020

bonsoir merci Phil
j'ai déjà essayé cela fonctionne pas
voila pourquoi je venait trouvé ici une solution

Phil69970 · 29 Juillet 2020

Gena ==> J'ai modifié ma réponse

Voir fichier

gena · 29 Juillet 2020

merci PHIL bien j'avais presque trouvé a un poil prés
encore merci infiniment

Phil69970 · 30 Juillet 2020

Gena

Si ça peux aider d'autres personnes, n'oublie pas de passer le sujet en résolu.

@Phil69970

gena · 30 Juillet 2020

OK MERCI encore

XL 2013 résolus erreur code

gena

XLDnaute Occasionnel

Pièces jointes

Phil69970

XLDnaute Barbatruc

gena

XLDnaute Occasionnel

Phil69970

XLDnaute Barbatruc

Pièces jointes

gena

XLDnaute Occasionnel

Phil69970

XLDnaute Barbatruc

gena

XLDnaute Occasionnel

Discussions similaires