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

recopier un texte d'une bulle automatiquement

picronte

XLDnaute Occasionnel
Bonjour le fil,
je voudrais s'avoir si c'est possible de copier automatiquement un texte d'une bulle dans une bulle identique d'un autres onglet.
Ci-joint un fichier pour mieux comprendre
Picronte
 

Pièces jointes

  • Classeur1.xls
    28.5 KB · Affichages: 66
  • Classeur1.xls
    28.5 KB · Affichages: 71
  • Classeur1.xls
    28.5 KB · Affichages: 65

picronte

XLDnaute Occasionnel
Re : recopier un texte d'une bulle automatiquement

re,
j'ai essayé a nouveau mais toujours rien. mais j'ai d'autres onglet dans mon fichier qui non pas de bulle, es pour cela que ça ne fonctionne pas car dans le tien cela fonctionne.
Picronte
 

picronte

XLDnaute Occasionnel
Re : recopier un texte d'une bulle automatiquement

re,
je touche presque au but.
maintenant quand le texte est petit cela fonctionne mais mon texte est grand. il me met le message d'erreur a chaque onglet et si je clique sur fin il me copie bien mon texte.
Faut-il que je mets mon fichier en ligne.
Picronte
 

job75

XLDnaute Barbatruc
Re : recopier un texte d'une bulle automatiquement

Re,

Je ne vois pas de quoi il s'agit car la longueur du texte ou sa taille ne posent pas de problème, même si la forme n'est pas assez grande pour l'afficher en entier.

A+
 

picronte

XLDnaute Occasionnel
Re : recopier un texte d'une bulle automatiquement

re,
j'ai du surement faire une erreur car il me marque "la valeur tapée est en dehors des limites" je te joins mon fichier original
Picronte
 

Pièces jointes

  • essai-2013.xlsm
    462.3 KB · Affichages: 39
  • essai-2013.xlsm
    462.3 KB · Affichages: 42
  • essai-2013.xlsm
    462.3 KB · Affichages: 44

picronte

XLDnaute Occasionnel
Re : recopier un texte d'une bulle automatiquement

re,
que dois-je rectifier dans le code pour qu'il puisse prendre en compte la forme de ma bulle
je ne connais pas le terme pour cette bulle.
If s.Name Like "*Rectang*" Then
picronte
 

job75

XLDnaute Barbatruc
Re : recopier un texte d'une bulle automatiquement

Re,

Votre post #22 n'a pas de sens !

Et mon post #21 non plus !

Comme vous l'avez écrit, la feuille de la forme à copier est Feuil30.

Retirez ou mettez en commentaire ces 2 lignes :

.ReadingOrder = T.ReadingOrder
.AutoSize = T.AutoSize


Elles beuguent sur votre fichier et ne servent à rien sur Excel 2010.

A+
 

picronte

XLDnaute Occasionnel
Re : recopier un texte d'une bulle automatiquement

Re,
merci cela fonctionne trés bien.
dernière question, si j'ai besoin de changer le texte d'une bulle autre que la bulle de la feuil30. es possible?
picronte
 

job75

XLDnaute Barbatruc
Re : recopier un texte d'une bulle automatiquement

Re,

Si vous voulez qu'une forme ne soit plus modifiée il faut un repère.

Par exemple faire précéder le texte par un espace (ou tout autre caractère de votre choix) :

Code:
If Left(.Characters.Text, 1) = " " Then Exit For 'évite toute modification
Fichier (2).

A+
 

Pièces jointes

  • essai-2013 (2).xlsm
    491 KB · Affichages: 33

job75

XLDnaute Barbatruc
Re : recopier un texte d'une bulle automatiquement

Re,

Le repère peut être tout simplement la couleur de remplissage :

Code:
If s.Fill.ForeColor.RGB <> CF Then Exit For 'évite toute modification
Voir la feuille "a".

Fichier (2 bis).

A+
 

Pièces jointes

  • essai-2013 (2 bis).xlsm
    491.2 KB · Affichages: 29

picronte

XLDnaute Occasionnel
Re : recopier un texte d'une bulle automatiquement

re,
merci job75
comme d'habitude c'est de l’excellent travail et je vous tire mon chapeau pour votre patience.
j'ai opté pour la première solution cela m'évitera de changer la couleur de la bulle
encore merci
Picronte
 

Discussions similaires

Réponses
3
Affichages
382
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…