Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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 !!!!

Mate59

XLDnaute Junior
Voici un fichier que j'ai fait avec les quatre cas de figure.
Il me faudrait un codage unique pour n'avoir qu'une macro qui répond à tout.

J'espère être plus clair
 

Pièces jointes

  • Classeur1.xlsm
    23.4 KB · Affichages: 1

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


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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…