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

Access Discussion :

[VBA][excel]comment copier la feuille selectionnée


Sujet :

Access

  1. #1
    Membre habitué
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    344
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 344
    Points : 158
    Points
    158
    Par défaut [VBA][excel]comment copier la feuille selectionnée
    bonjour,

    je souhaiterai copier la feuille en cours (sélectionnée) d 'un classeur excel
    et la renommée tel nom

    voila mon code mais je suis un peu maladroit, en fait ce qui me pose problème c'est comment spécifié que la feuille que je veux du classeur
    c'est celle qui est en cours soit 'selected' et je fais un copy avec le nom

    voila mon code mais ca ne marche pas:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     
     
    Sub copysheet()
     
    Dim mysheet As Worksheet ' declaration de ma feuille,celle qui est en cours
    Dim sheetcontrol As Worksheet ' declaration de mon doublon
     
     
    mysheet = activeworksheet.Select ' j'assigne a mysheet la feuille active en cours
     
    Sheets(mysheet).Select ' je selectionne la feuille mysheet
    Sheets(mysheet).copy before:=Sheets("control invoice test") 'je lui dis de faire une copy avec le nom de la copie
     
    End Sub
    voila merci

  2. #2
    Membre habitué
    Inscrit en
    Août 2004
    Messages
    159
    Détails du profil
    Informations personnelles :
    Âge : 48

    Informations forums :
    Inscription : Août 2004
    Messages : 159
    Points : 131
    Points
    131
    Par défaut
    Hello,

    Un petit conseil : va voir les tutoriel sur la manière de commander Excel depuis Access (je pense que c'est ce que tu veux faire)
    Lire aussi les cours et tutoriels pour apprendre Excel.

    Pour commencer, il te manque des objets pour gérer une feuille excel.
    Il faudrait à minima ouvrir une cession excel.

  3. #3
    Membre habitué
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    344
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 344
    Points : 158
    Points
    158
    Par défaut
    merci pour tes infos

    et j ai trouvé ca qui correspond a ce que je veux faire merci

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
     
    ActiveSheet.copy before:=Worksheets(ActiveSheet.Name) ' copie feuille en cours avant la feuille en cours
    ActiveSheet.Name = "macopy" 'nomme la copie
    merci

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

Discussions similaires

  1. Réponses: 9
    Dernier message: 04/04/2007, 12h01
  2. [VBA EXCEL]comment utiliser les boites a outils control sur une feuille excel
    Par EvaristeGaloisBis dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 13/02/2007, 19h04
  3. Comment copier une feuille EXCEL sous ACCESS?
    Par PAULOM dans le forum Access
    Réponses: 7
    Dernier message: 28/04/2006, 10h01
  4. automation excel : comment indiquer la feuille de travail ?
    Par mat_lefebvre dans le forum Access
    Réponses: 2
    Dernier message: 04/12/2003, 15h14
  5. [VBA Excel] Effacer rapidement une feuille
    Par Invité dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 24/10/2002, 13h12

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