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 :

Relier les données de 2 feuilles [XL-2003]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éprouvé
    Homme Profil pro
    Assistant aux utilisateurs
    Inscrit en
    Septembre 2007
    Messages
    1 896
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France

    Informations professionnelles :
    Activité : Assistant aux utilisateurs
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 896
    Par défaut Relier les données de 2 feuilles
    Bonjour,

    J'ai donc 2 feuilles de calcul. Une nommée RIB et l'autre Compte.

    Je souhaiterai faire une impression de la feuille RIB avec des données se trouvant dans la feuille Compte. Le bouton de commande est dans la feuille Compte

    J'ai donc fais ceci mais ça ne marche pas, "Incompatibilité de type".
    Je n'ai mis qu'une ligne des données à copier, mais il y en à d'autres.
    Pouvez-vous me dire où j'ai commis une erreur ?
    Merci par avance

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
     
    Private Sub CommandButton1_Click()
    'j'active la feuille RIB
    Sheets("RIB").Activate
    'les données de la cellule B5 de la feuille compte vont se copier dans la cellule A7 de la feuille RIB
    [A7].Value = Sheets("Compte").Cells("B5").Value
    'ensuite j'imprime
    Sheets("RIB").PageSetup.PrintArea = "$A$1:$I$65"
    Sheets("RIB").Visible = True
    Sheets("RIB").PrintOut Copies:=1
    Sheets("RIB").Visible = False
    End Sub

  2. #2
    Membre Expert Avatar de aalex_38
    Inscrit en
    Septembre 2007
    Messages
    1 631
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 631
    Par défaut
    Et comme ça :


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    WorkSheets("RIB").range("A7") = workSheets("Compte").range("B5")

    L'erreur je pense qu'elle est la :


  3. #3
    Membre éprouvé
    Homme Profil pro
    Assistant aux utilisateurs
    Inscrit en
    Septembre 2007
    Messages
    1 896
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France

    Informations professionnelles :
    Activité : Assistant aux utilisateurs
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 896
    Par défaut
    Bonjour aalex 38,

    ça marche, c'est simple, mais je n'y ai pas pensé. On va chercher compliqué parfois.
    Merci pour ton aide

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

Discussions similaires

  1. Réponses: 3
    Dernier message: 04/10/2007, 12h00
  2. Triez les données d'une feuille
    Par lolo1664 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 06/08/2007, 16h02
  3. Réponses: 3
    Dernier message: 31/01/2007, 17h46
  4. Réponses: 2
    Dernier message: 16/10/2006, 11h24
  5. Importer les données d'une feuille EXCEL
    Par codial dans le forum Bases de données
    Réponses: 4
    Dernier message: 05/02/2006, 09h07

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