Microsoft 365 couper/copier/coller le texte en tout ou partie dans le TextBox1 (casse méninges 1 du WE)

Usine à gaz

XLDnaute Barbatruc
Bonjour à toutes et à tous,
Je vous souhaite un bon WE :)

PS pour notre @patricktoulon qui m'a mis au défit de trouver des trucs bien loufoques pour ce WE ... hé bien, j'en ai 2 qui seront, je pense, pas mal, pour toi et pour notre @mapomme lol :p

Ce fil a été résolu grâce à tous les participants que je remercie encore une fois :)
Plusieurs solutions fonctionnelles ont été proposées.

J'en ai retenu une qui me convient parfaitement et j'ai 2 questions (casse méninges du WE) et voici la première :
Est-il possible de couper/copier/coller le texte en tout ou partie "directement" dans le TextBox1
1648281398989.png

J'ai tenté et fait des recherches et jusqu'à maintenant, je n'ai pas trouvé ...
Auriez-vous la solution ?
Un grand merci à toutes et à tous,
Je joins un p'tit fichier test et je continue mes recherches ...
lionel :)
 

Pièces jointes

  • inputBox_ModifCelluleP_OK2.xlsm
    46.6 KB · Affichages: 7
Dernière édition:
Solution
Vide le Clipboard avec le code :
VB:
Sub Vide()
[A1].Copy [A1]
End Sub
et exécute la macro ComboBox1_Change après avoir retiré On Error Resume Next...
re
Bonjour @job75
Ok vu
ci dessous exactement le même mais avec un vrai menu contextuel dans un module
dans un module standard
VB:
'***********************************************
'Menu contextuel "couper/copier/coller" sur textbox dans userform
'patricktoulon
'menu change sur la base de la version combobox de @job75
'*************************************************************
Option Explicit
Dim ctrl As Object
Sub createmenu(ctl As Object)
    Dim barre, arrbutton, I%: delebar: Set ctrl = ctl
    arrbutton = Array("Couper", "Copier", "Coller")
    Set barre =...

patricktoulon

XLDnaute Barbatruc
re
ben c'est la meme chose que @job75 sauf que la combo se transforme en menu
esthétiquement c'est mieux (tu peux la faire comme tu veux )

ensuite il y a un tout petit soucis avec la version sendkeys que ce soit celle de @job75 ou la mienne

quand on copie ou coupe et qu'ensuite on colle le clip se vide alors que le menu natif dans toute application le clip garde en mémoire ce qui a été coupé ou copié
avec cette methode donc ,on ne peut coller qu'une fois

alors ça peut arranger comme être ennuyant selon le besoins
;)
 

Usine à gaz

XLDnaute Barbatruc
re
ben c'est la meme chose que @job75 sauf que la combo se transforme en menu
esthétiquement c'est mieux (tu peux la faire comme tu veux )

ensuite il y a un tout petit soucis avec la version sendkeys que ce soit celle de @job75 ou la mienne

quand on copie ou coupe et qu'ensuite on colle le clip se vide alors que le menu natif dans toute application le clip garde en mémoire ce qui a été coupé ou copié
avec cette methode donc ,on ne peut coller qu'une fois

alors ça peut arranger comme être ennuyant selon le besoins
;)
Re-Patrick merci pour tes explications ... j'ai un souci :
C'est curieux : depuis la mise en place de cet UserForm "inPROUTbox", je ne peux plus afficher les Propriétés de mes UserForm ... tu saurais pourquoi ?
 

patricktoulon

XLDnaute Barbatruc
ben ca dépend je ne sais plus quel code tu utilise maintenant donc

ma méthode improutbox comme mon msgbox perso repose sur le mode modal pour la gestion d'attente et le hide pour libérer la valeur choisie pour ensuite faire un unload
la fonction est lancée en tant que fonction de la classe improutbox

si tu utilise toujours cette méthode responsive fait attention de ne pas avoir enlevé la ligne unload
sinon le inproutbox reste chargé mais invisible

après sinon je ne vois pas il n'y a aucune raison

je n'ai aucun soucis avec mon model
 

Usine à gaz

XLDnaute Barbatruc
ben ca dépend je ne sais plus quel code tu utilise maintenant donc

ma méthode improutbox comme mon msgbox perso repose sur le mode modal pour la gestion d'attente et le hide pour libérer la valeur choisie pour ensuite faire un unload
la fonction est lancée en tant que fonction de la classe improutbox
si tu utilise toujours cette méthode responsive fait attention de ne pas avoir enlevé la ligne unload
sinon le inproutbox reste chargé mais invisible

après sinon je ne vois pas il n'y a aucune raison

je n'ai aucun soucis avec mon model
J'ai testé ton dernier fichier #post 71 tel quel :)
 

Statistiques des forums

Discussions
314 667
Messages
2 111 700
Membres
111 264
dernier inscrit
Monnoye