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

Microsoft 365 copier le contenu d'une cellule dans mon textbox

Créer une discussion

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

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonsoir à toutes et à tous,

je suis toujours sur mon nouveau fichier de travail et j'ai un besoin que je ne parviens pas à résoudre.

Mon besoin :
En Feuille "Appels"
Pour éviter de perdre du temps en saisie de commentaires dans ma feuille "Appel" en colonne L, j'ai créé ce qui deviendra un recueil de libellés prédéfinis.
- Quand clic sur la cellule de la colonne K, avant d'ouvrir mon textbox1, j'ouvre la feuille "Table",
- Quand je clique sur un commentaire prédéfini, la cellule est copiée et mon textbox1 s'ouvre,
- Je souhaite donc que le contenu de la cellule copiée de "Table" soit collé dans mon textbox que je valide ensuite par "Entrée".
Et lol, comme d'habitude, je ne sais pas faire et malgré mes recherches, je n'ai pas encore trouvé.
Auriez-vous la solution ?
En attendant, je continue mes recherches.
Je joins le fichier test,
Avas mes remerciements,
Amicalement,
lionel 🙂
 

Pièces jointes

Solution
Essayez cette PJ.
J'ai modifié Worksheet_SelectionChange de la feuille Table, ça strappe l'USF avec :
VB: 
Private Sub Worksheet_SelectionChange(ByVal R As Range)
    Application.EnableEvents = False
    Application.ScreenUpdating = False
    Range(Cells(1, 14), Cells(1, 1)).Select
    ActiveWindow.Zoom = True 'ActiveWindow.Zoom = 114

If Not Intersect(R, Range("b4:b30")) Is Nothing Then
    R.Copy
    [a1].Select
    Sheets("Appels").Select
    ' Modif transfert automatique
    If R <> "" Then
        ActiveCell.Offset(0, 1) = Format(Now, "dd-mm-yy hh:mm") & " : " & R & " - " & Chr(10) & ActiveCell.Offset(0, 1).Value
    End If
End If
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub
Trier par date Trier par votes
Re,
Il pourra le modifier directement dans la colonne L, je ne l'ai pas protégé pour ça et pour pouvoir y ajouter un commentaire personnel en plus du commentaire sélectionné dans la "Table" 🙂
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
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

G
  • Question Question
Microsoft 365 Formule qui retourne le contenu de la cellule sélectionnée
Réponses
5
Affichages
298
Guy_M
G
  • Résolu(e)
Autres Copier/ Coller plage de données dans une autre cellule d'un même onglet
Réponses
6
Affichages
291
fenec
C
  • Question Question
Microsoft 365 Insérer le contenu d'une cellule dans le texte d'une autre cellule
Réponses
2
Affichages
514
chris427
C
D
  • Question Question
Microsoft 365 VBA copier cellule, conserver la copie tout en effaçant contenu
2 3
Réponses
33
Affichages
2 K
fanch55
Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
232
Yogean
Y
K
  • Question Question
XL 2010 copier le contenu de plusieurs feuilles sur une seule
Réponses
3
Affichages
233
sylvanu
F
  • Question Question
XL 2021 VBA bouton pour copier le contenu d'une cellule
Réponses
3
Affichages
309
fuioplde
F
K
  • Résolu(e)
XL 2016 Affichage TextBox
Réponses
6
Affichages
490
KRUG WOO
K
J
  • Question Question
Microsoft 365 Naviguer dans un tableau pour copier des données dans un modèle et copier l'un derrière l'autre
Réponses
11
Affichages
363
AtTheOne
A
  • Résolu(e)
Microsoft 365 Enregistrer copie d'un fichier avec pour nom le contenu d'une cellule excel (macro)
2
Réponses
15
Affichages
1 K
firecarl
F
A
  • Résolu(e)
XL 2013 mise en forme conditionnelle celons 2 critères
Réponses
7
Affichages
255
Auriane
A
F
  • Question Question
Autres Récupération de données d'une feuille X en fonction de la valeur de cellule dans une collone d'une feuille Y
2
Réponses
27
Affichages
1 K
fanfan38
Z
  • Question Question
Microsoft 365 Rendre visible un onglet en fonction du contenu d'une cellule
Réponses
2
Affichages
200
zorol
Z
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
772
Nel'
N
C
  • Question Question
XL 2016 VBA - Mettre en Indice une partie du contenu d'une cellule : problème avec la propriété Font.Subscript
Réponses
2
Affichages
416
crocrocro
C
C
  • Question Question
XL 2021 Comment intégrer le contenu d'une cellule dans une formule
Réponses
1
Affichages
377
chris
C
  • Question Question
Microsoft 365 je cherche un code excel pour copier la couleur d'une cellule, à toutes les cellules qui ont la même valeur dans mon tableau.
Réponses
1
Affichages
334
sylvanu
M
  • Question Question
Microsoft 365 Calcul du nombre de chiffres dans une cellule. Mise en page d'un fichier.
Réponses
2
Affichages
460
MCOTTEND
M
C
  • Question Question
XL 2016 Ancienne Valeur fantôme sur le LostFocus d'une TextBox
Réponses
2
Affichages
261
crocrocro
C
O
  • Résolu(e)
Microsoft 365 Effacer le contenu de cellules si une autre cellule est vide
Réponses
9
Affichages
408
Olihoes
O
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…