Microsoft 365 Enchaînement textbox pour ajouter une note à une cellule

Créer une discussion
Répondre
  • Initiateur de la discussion Initiateur de la discussion Mate59
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
M

Mate59

XLDnaute Junior
Bonjour à tous!

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

Actuellement j'ai un userform avec plusieurs textbox, les cases à cocher sont OK, elles fonctionnent.

Le problèmes actuellement avec ce code des textbox à la toute fin, je ne peux, par exemple, pas ajouter de note via le textbox2 (T2) si je n'ai pas rempli le textbox1(T1) et ainsi de suite.

Voici le tableau pour que vous compreniez
 

Pièces jointes

Dernière édition:
Solution
ChTi160
re
ce que j'ai modifié en fonction de ce que j'ai compris Lol
VB: 
Private Sub UserForm_initialize()
For i = 3 To 33
    'Garder la case cochée dans userform si case égal X & la note dans le textbox
    If Cells(4, i) = "X" Then Me.Controls("J" & i - 2) = True
    Me.Controls("J" & i - 2).Enabled = IIf(Me.Controls("J" & i - 2) = True, False, True)
    'Si une cellule contient une note alors on la récupère dans le formulaire
    If Not Cells(4, i).Comment Is Nothing Then Me.Controls("T" & i - 2) = Cells(4, i).Comment.Text
         Me.Controls("T" & i - 2).Enabled = Me.Controls("J" & i - 2).Enabled
Next i
End Sub
Une petite vidéo du rendu Lol
jean marie
Trier par date Trier par votes
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

M
  • Résolu(e)
XL 2021 Note d'une cellule dans Textbox
2
Réponses
15
Affichages
1 K
Phil69970
Phil69970
halecs93
  • Résolu(e)
XL 2016 récupérer textbox dans une cellule fusionnée
Réponses
3
Affichages
552
laurent950
laurent950
patricktoulon
  • Question Question
Autres Petite mise a jour (exceptionnellement pour cp4) du calendar V4.1(OLDVERSION)
2
Réponses
21
Affichages
1 K
patricktoulon
patricktoulon
L
  • Question Question
XL 2016 Test si TextBox rempli par date correcte
2 3
Réponses
30
Affichages
2 K
Lorenzini
L
F
  • Résolu(e)
Microsoft 365 Commentaire cellule dans TextBox dans UserForm
Réponses
4
Affichages
611
Francky79
F
C
  • Question Question
XL 2021 case à cocher dans ListView impacte une cellule de feuille
Réponses
1
Affichages
830
fanch55
fanch55
A
  • Résolu(e)
XL 2010 ajout de textbox
Réponses
2
Affichages
815
Appo1985
A
Sergent_Lipton
  • Résolu(e)
Microsoft 365 [VBA] Barre de recherche dynamique - objectif : cacher les lignes hors résultat
Réponses
3
Affichages
458
Sergent_Lipton
Sergent_Lipton
G
  • Résolu(e)
XL 2019 Consigne non suivi dans une suite de ElseIf
Réponses
8
Affichages
646
Gstn
G
R
  • Résolu(e)
XL 2016 Tabulation automatique entre deux textbox dans une feuille de calcul
Réponses
10
Affichages
936
ReneDav14000
R
H
  • Résolu(e)
XL 2016 Créer une ligne si une cellule est rempli
Réponses
11
Affichages
651
hugod
H
tactic6
  • Question Question
XL 2016 Aide pour userform (sujet clos)
Réponses
8
Affichages
489
tactic6
tactic6
P
  • Question Question
Autres Condition SI sur google sheet
Réponses
4
Affichages
760
Polo94100
P
P
  • Résolu(e)
Microsoft 365 Erreur d'exécution "9" :L'indice n'appartient pas à la sélection
Réponses
9
Affichages
1 K
pelerin65
P
P
  • Question Question
XL 2019 Faire afficher un texte présent dans une cellule dans un Textbox 1
Réponses
4
Affichages
991
Praveena
P
F
  • Résolu(e)
XL 2019 Besoin d'aide pour reporter une donnée d'un Userform vers un tableau
Réponses
2
Affichages
709
Flnte
F
P
  • Question Question
Google Sheets Probleme fonction SI avec case à cocher
Réponses
1
Affichages
1 K
Gégé-45550
Gégé-45550
L
  • Question Question
XL 2010 rechercher une valeur pour remplir un label de userform à partir d'une valeur de textbox
2 3 4
Réponses
52
Affichages
5 K
SDHABARKA
S
Yann71
  • Question Question
XL 2019 Ajouter un " aperçu avant impression " à ce code
Réponses
7
Affichages
864
Yann71
Yann71
I
  • Question Question
XL 2013 Userform pour remplir une cellule
Réponses
5
Affichages
1 K
pierrejean
pierrejean
Retour