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 :

transfert vers une clef usb?


Sujet :

Macros et VBA Excel

  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2008
    Messages
    66
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2008
    Messages : 66
    Par défaut transfert vers une clef usb?
    Salut voila mon code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    Dim nomination As Variant
    nomination = "F:\rapport de production semaine " & ActiveSheet.Name & ".xls"
    ActiveSheet.Unprotect
        ActiveSheet.Select
          ActiveSheet.Copy
          Columns("D:E").Select
          Selection.Delete Shift:=xlToLeft
          Columns("F:F").Select
          Selection.Delete Shift:=xlToLeft
       ActiveWorkbook.SaveAs Filename:= _
            nomination, FileFormat:= _
            xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
            , CreateBackup:=False
            MsgBox "Transfert effectué vers clef USB.", 0, "Confirmation de transfert."
        ActiveWindow.Close
        On Error Resume Next
    je souhaite transferer vers la clef usb une copie de feuille. seulement voilà si il n'y a pas de clef c'est le bug et pareil si la clef se nomme G ou I
    Comment faire pour détécter une clef et executer la macro en toute securité?
    Merci pour vottre aide les vbistes

  2. #2
    Expert confirmé

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2008
    Messages
    66
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2008
    Messages : 66
    Par défaut
    Merci silkyroad je n'ai pas employé les bons mots pour ma recherche dans les faq. Merci pour ton aide à bientôt.
    cordialement

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

Discussions similaires

  1. Vérifier une Clef USB (Flash disk)
    Par kmaniche dans le forum C++Builder
    Réponses: 12
    Dernier message: 23/09/2006, 21h08
  2. Utiliser une clef USB comme de la ram de mémoire vive
    Par Lorponos dans le forum Composants
    Réponses: 28
    Dernier message: 18/08/2006, 18h32
  3. Transfert vers une table selon condition
    Par Monsieur Peck dans le forum Requêtes et SQL.
    Réponses: 8
    Dernier message: 13/06/2006, 13h34
  4. [Nero] Utiliser un CD-RW comme une clef USB
    Par Furius dans le forum Périphériques
    Réponses: 6
    Dernier message: 24/10/2005, 17h22
  5. [Système] Trouver une clef USB avec PHP
    Par chico_du_33 dans le forum Langage
    Réponses: 8
    Dernier message: 05/10/2005, 17h29

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