XL 2021 Note d'une cellule dans Textbox

Mate59

XLDnaute Junior
Bonsoir,



Alors voilà, j'ai un début de code dans userform initialize:



If Range ()=comment Then

Textbox.text=range().comment.text

End if



Le problème que je rencontre est le suivant:

J'aimerai que même s'il n'y a pas de note alors le textbox n'affiche rien et que malgré ce qui est dans la case, ça n'impacte pas ma demande.



Merci de votre aide
 
Solution
Bonjour à tous

Bruno n'hésites pas à mettre ta version.

Je te propose cette version
J'ai mis des commentaires dans le code VBA si tu changes d'avis tu pourras le faire facilement

C'est toujours le même principe on teste si il y a un commentaire en D4 et suivant le cas on fait l'action qui va bien !!!!

Phil69970

XLDnaute Barbatruc
Bonjour à tous

Et tu vois avec un fichier c'est beaucoup mieux car on comprends plus vite 🤣🤣
Il suffit de tester si il y a un commentaire et le tour est joué .

Remarque :
J'ai désactiver l'enregistrement qui n'apportait rien à la demande pour faire des essais
1698499018734.png


Merci de ton retour
 

Pièces jointes

  • Tester commentaire V1.xlsm
    25 KB · Affichages: 2

Phil69970

XLDnaute Barbatruc
Bonjour à tous

Bruno n'hésites pas à mettre ta version.

Je te propose cette version
J'ai mis des commentaires dans le code VBA si tu changes d'avis tu pourras le faire facilement

C'est toujours le même principe on teste si il y a un commentaire en D4 et suivant le cas on fait l'action qui va bien !!!!
 

Pièces jointes

  • Tester commentaire V3.xlsm
    21.2 KB · Affichages: 5
C

Compte Supprimé 979

Guest
@BrunoM45

La demande ne concerne pas uniquement Phil. Je lui ai demandé car il a répondu à ma première demande.

Après nous sommes sur un forum d'entraide donc bien évidemment que l'aide de tous est la bienvenue 😁
Mate59, c'est bien pour cette raison qu'il est préférable de s'adresse à tous et non à 1 seule personne ;)

@Phil69970, rien à rajouter ton code est OK
 

Mate59

XLDnaute Junior
Je rencontre un nouveau problème sur l'enchainement des notes...

Pour faire simple, j'ai rempli mon fichier où je souhaite mettre ces codes.
Le problèmes est que j'ai plusieurs textbox et actuellement avec ce code, je ne peux par exemple pas ajouter de note via le textbox2 si je n'ai pas rempli le textbox1.

J'ai apporté plus de détails sur le fichier excel pour mieux comprendre.

Sorry pour le cheminement....
 

Pièces jointes

  • Tester commentaire enchainement V1.xlsm
    18.2 KB · Affichages: 2

Discussions similaires

  • Question
Microsoft 365 TEXTBOX
Réponses
7
Affichages
332

Statistiques des forums

Discussions
312 209
Messages
2 086 271
Membres
103 168
dernier inscrit
isidore33