IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Word Discussion :

Créer une macro qui rempli des etiquettes automatiquement


Sujet :

VBA Word

  1. #1
    Nouveau Candidat au Club
    Profil pro
    Inscrit en
    Septembre 2009
    Messages
    1
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2009
    Messages : 1
    Points : 1
    Points
    1
    Par défaut Créer une macro qui rempli des etiquettes automatiquement
    Bonjour,


    Je dois créer pour mon entreprise des étiquettes à partir de wrd 2007 sur lesquelles on retrouve 2 informations :

    - un numéro d'affaire : par exemple 3450

    - un numéro de coulée : par exemple 2943054359

    Je veux que quand un opérateur ouvre le fichier word, un menu s'ouvre pourqu'il n'est qu'a saisir ces 2 informations + un chiffre qui correspond au nombre d'étiquettes à imprimer avec ces mêmes information mentionné au dessus.

    Il faut que se soit simple rapide et efficace.

    J'attends votre aide!!!

    Merci

  2. #2
    Membre régulier
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    Août 2009
    Messages
    86
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : Nouvelle-Calédonie

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Santé

    Informations forums :
    Inscription : Août 2009
    Messages : 86
    Points : 72
    Points
    72
    Par défaut
    Bonjour,

    peut-être peux-tu utiliser les signets dans ton document Word et tu les remplis de cette manière:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    Private Sub CMD01_Click() 'CMD01 = nom de ton bouton
    With ActiveDocument
            .Bookmarks("BK01").Range.Text = TXTBOX1.Text
            .Bookmarks("BK02").Range.Text = TXTBOX1.Text
    End With
    End Sub
    Avec :

    - BK01, le nom du signet qui correspond au numéro d'affaire sur ton étiquette
    - BK02, le nom du signet qui correspond au numéro de coulée sur ton étiquette
    - TXTBOX1, un champ de donnée sur ta UserForm pour le numéro d'affaire
    - TXTBOX2, un champ de donnée sur ta UserForm pour le numéro de coulée

    Voilà, si tu as un problème, n'hésite pas.

    Sylvain

Discussions similaires

  1. [XL-2010] Créer une macro qui ajoute et remplit des lignes
    Par Gianni89 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 20/02/2013, 16h13
  2. [XL-2007] Créer une macro pour supprimer des onglets dans un autre classeur
    Par nicosd54 dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 08/03/2011, 11h01
  3. Créer une macro pour vérifier des prix
    Par lolonico dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 17/04/2009, 11h54
  4. Créer une macro qui reproduit vers le bas
    Par Jimy6000 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 24/01/2008, 11h43
  5. Réponses: 5
    Dernier message: 23/10/2007, 15h56

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo