[Word]Trouver nom d'un objet pour une macro
Yann
-
Yann -
Yann -
Bonjour,
Je tente (désespérément) de faire une macro pour word2007.
J'ai créé un formulaire (partie développeur, mode création, ajout de mes controle de contenu (texte et liste déroulante)). J'ai une zone de texte dont j'aimerais pouvoir limiter la taille et copier les 5 premier caractère dans un autre cadre de texte.
Je veux pour celà écrire une macro.
Le principe est simple, prendre les n premier caractères.
J'ai pour tenter de comprendre comment faire fait une première version sous excel qui ressemble à ça
Elle marche très bien, mais je n'arrive pas à comprendre comme l'adapter à Word2007.
D'après ce que j'ai lu sur le net il faudrait quelque chose dans ce genre :
Mon gros problème est de trouver quoi mettre à la place de :
Je n'arrive pas à trouver comme nommer ou comment récupérer le nom de mon contrôle de texte.
Dans Excel, il y a un bouton visualiser le code qui amène directement dans l'éditeur VBA et crée une méthode automatiquement
Mais pas de trâce de ce bouton dans word ...
Merci d'avance pour votre aide :)
Je tente (désespérément) de faire une macro pour word2007.
J'ai créé un formulaire (partie développeur, mode création, ajout de mes controle de contenu (texte et liste déroulante)). J'ai une zone de texte dont j'aimerais pouvoir limiter la taille et copier les 5 premier caractère dans un autre cadre de texte.
Je veux pour celà écrire une macro.
Le principe est simple, prendre les n premier caractères.
J'ai pour tenter de comprendre comment faire fait une première version sous excel qui ressemble à ça
Private Sub Worksheet_Change(ByVal Target As Range) Cell1 = Cells(1, 1).Address Cell2 = Cells(1, 2).Address Range(Cell1) = Left(Range(Cell1), 10) Range(Cell2) = Left(Range(Cell1), 5) End Sub
Elle marche très bien, mais je n'arrive pas à comprendre comme l'adapter à Word2007.
D'après ce que j'ai lu sur le net il faudrait quelque chose dans ce genre :
Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) TextBox1.Text = Left(TextBox1.Text, 10) TextBox2.Text = Left(TextBox1.Text, 5) End Sub
Mon gros problème est de trouver quoi mettre à la place de :
TextBox1 et TextBox2
Je n'arrive pas à trouver comme nommer ou comment récupérer le nom de mon contrôle de texte.
Dans Excel, il y a un bouton visualiser le code qui amène directement dans l'éditeur VBA et crée une méthode automatiquement
Sub Zonecombinée4_QuandChangement() End Sub
Mais pas de trâce de ce bouton dans word ...
Merci d'avance pour votre aide :)
A voir également:
- [Word]Trouver nom d'un objet pour une macro
- Word 2013 - Télécharger - Traitement de texte
- Supprimer une page word - Guide
- Tableau word - Guide
- Site pour vendre des objets d'occasion - Guide
- Trouver adresse mac - Guide