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 :

VBA Copier plusieurs cellules dans uen autre feuille


Sujet :

Macros et VBA Excel

  1. #1
    Futur Membre du Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Septembre 2013
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loiret (Centre)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : Septembre 2013
    Messages : 8
    Points : 7
    Points
    7
    Par défaut VBA Copier plusieurs cellules dans uen autre feuille
    Bonsoir à tous,

    J'ai crée une macro qui me permet de copier des cellules de mes tableaux dans une autre feuille , le problème de mon code est qu'il me prend en compte les formules et le format de mes tableaux ce que je ne souhaite pas.

    Voici mon code

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    Sub test()
     Application.EnableEvents = False
     With Worksheets("Liste Déroulante")
     .Range("B3").Copy Worksheets("Feuille1").Range("L31")
     .Range("C3").Copy Worksheets("Feuille1"").Range("M31")
     .Range("B15").Copy Worksheets("Feuille1"").Range("L32")
     .Range("C15").Copy Worksheets("Feuille1").Range("M32")
     .Range("B27").Copy Worksheets("Feuille1").Range("L33")
     .Range("C27").Copy Worksheets("Feuille1"").Range("M33")
     End With
     Application.EnableEvents = True
     End Sub
    Merci d'avance

  2. #2
    Membre émérite
    Inscrit en
    Octobre 2010
    Messages
    1 401
    Détails du profil
    Informations forums :
    Inscription : Octobre 2010
    Messages : 1 401
    Points : 2 684
    Points
    2 684
    Par défaut
    Si tu veux copier uniquement la valeur de la cellule, utilise plutôt cette syntaxe :


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Worksheets("Feuille1").Range("L31").Value  = .Range("B3").Value

  3. #3
    Futur Membre du Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Septembre 2013
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loiret (Centre)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : Septembre 2013
    Messages : 8
    Points : 7
    Points
    7
    Par défaut
    Merci beaucoup pour votre aide ça fonctionne.

Discussions similaires

  1. Réponses: 2
    Dernier message: 27/02/2015, 10h02
  2. Réponses: 11
    Dernier message: 12/09/2014, 15h02
  3. Réponses: 11
    Dernier message: 24/02/2012, 13h07
  4. copier coller plusieurs ongets dans une autre feuille et ranger
    Par herve L76 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 27/07/2007, 15h41
  5. [VBA-E]Copier une serie de cellules dans une autre feuille
    Par Tartenpion dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 10/03/2006, 17h23

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