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

Macros et VBA Excel Discussion :

Générer un nom de fichier [XL-2003]


Sujet :

Macros et VBA Excel

  1. #1
    Membre à l'essai
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    Novembre 2014
    Messages
    19
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Technicien maintenance
    Secteur : High Tech - Matériel informatique

    Informations forums :
    Inscription : Novembre 2014
    Messages : 19
    Points : 11
    Points
    11
    Par défaut Générer un nom de fichier
    Bonjour.

    Je cherche a générer un nom de fichier (en cliquant sur un bouton dans un userform) en copiant le contenu de 2 textbox et 1 combobox dans le presse papier pour ensuite renommer un fichier.

    J'aimerai que ça donne ça : matricule_nom_prenom

    J'ai "réussi" a le faire, mais avec une seule Textbox en faisant :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Textbox1.SelStart = 0
      Textbox1.SelLength = Textbox1.TextLength
    Textbox1.Copy
    Je me doute qu'il faut déclarer une variable pour y mettre "l'addition" des 3 éléments, mais je trouve/comprend pas comment faire pour sélectionner les 3, y rajouter le caractère _ entre chaque valeur.

    Merci.

  2. #2
    Membre éclairé Avatar de Nico Chg
    Homme Profil pro
    Apprenti ingénieur Business Development
    Inscrit en
    Juillet 2014
    Messages
    352
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Apprenti ingénieur Business Development
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Juillet 2014
    Messages : 352
    Points : 758
    Points
    758
    Par défaut
    Bonjour,

    Essaie avec

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Dim FileName as string
     
    FileName = Textbox1.value & "_" & Textbox2.value & "_" & Combobox1.value

  3. #3
    Membre habitué
    Homme Profil pro
    Lean Manufacturing
    Inscrit en
    Janvier 2015
    Messages
    132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Activité : Lean Manufacturing

    Informations forums :
    Inscription : Janvier 2015
    Messages : 132
    Points : 197
    Points
    197
    Par défaut
    Bonjour, vous déclarez une variable en...Euh cela doit variant je crois et vous pouvez écrire votre code comme ça

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    dim var as variant
    var = TextBox1 & "_" & TextBox2 & "_" & TextBox3

  4. #4
    Membre à l'essai
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    Novembre 2014
    Messages
    19
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Technicien maintenance
    Secteur : High Tech - Matériel informatique

    Informations forums :
    Inscription : Novembre 2014
    Messages : 19
    Points : 11
    Points
    11
    Par défaut
    Merci pour vos réponses.

    En cherchant un peu, j'ai trouvé ça et je l'ai adapté.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Private Sub CommandButton4_Click()
    Dim identifiant As String, nom As String, nomfichier As String
    Dim MyData As New DataObject
     
    identifiant = TextBox29.Value
    nom = TextBox8.Value
     
    nomfichier = identifiant & "_" & nom
     
    MyData.SetText nomfichier
    MyData.PutInClipboard
     
     
    End Sub

    Ce forum est vraiment une mine d'information et la communauté est au top !!

    Merci

  5. #5
    Membre habitué
    Homme Profil pro
    Lean Manufacturing
    Inscrit en
    Janvier 2015
    Messages
    132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Activité : Lean Manufacturing

    Informations forums :
    Inscription : Janvier 2015
    Messages : 132
    Points : 197
    Points
    197
    Par défaut
    Merci à vous également bien que je reste interrogatif sur le nombre de variable que vous déclarez alors qu'une seule peut-être suffit.
    Ceci dit, si c'est comme ça...C'est parce que c'est comme ça !

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 2
    Dernier message: 12/02/2010, 15h09
  2. Générer le nom d'un fichier pour l'enregistrer
    Par Siguillaume dans le forum Langage
    Réponses: 22
    Dernier message: 30/05/2008, 13h54
  3. [C#] Générer un nom de fichier temporaire
    Par jo_dalton dans le forum C#
    Réponses: 2
    Dernier message: 24/02/2008, 12h05
  4. Réponses: 2
    Dernier message: 27/04/2007, 14h03
  5. [PL/SQL]générer le nom du fichier de spool
    Par moneyinthebank dans le forum Oracle
    Réponses: 2
    Dernier message: 16/11/2006, 12h21

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