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 :

Modification source existante d'un TCD en vba [XL-2010]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Candidat au Club
    Homme Profil pro
    Inscrit en
    Août 2011
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Août 2011
    Messages : 3
    Par défaut Modification source existante d'un TCD en vba
    Bonjour à tous,

    J'ai un petit problème sur un de mes fichiers excel:
    LE CONTEXTE:
    j'ai sur une Feuil1 une saisie de données de A3:I50, avec une ligne d'entête en ligne n°2, qui est la source de mon TCD
    En Feuil2, j'ai créé un TCD qui fait appel à la source de la feuil1.
    Sur cette même feuille, j'ai un graphique dynamique lié à ce TCD.
    L'EXISTANT:
    J'ai une macro qui copie Feuil1 en Feuil3 (avec de modif) et une autre macro qui copie Feuil2 en Feuil4.
    LE HIC:
    c'est que mon TCD de Feuil4 est lié avec Feuil1. J'aimerai le lié avec Feuil3 en sachant que seul le nom de l'onglet change pas la zone des données (A3:I50).

    Par la même occasion, est il possible de remplacer mon I50 (de ma zone de données) par nume = Sheets("Feuil3!").Range("A65536").End(xlUp).Row afin d'avoir une zone auto ajustable?

    Merci d'avance de vos réponses en espérant avoir été assez clair et précis.

    Salutations,

    PJ

  2. #2
    Expert confirmé Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 756
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 51
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    Bonjour,

    Par la même occasion, est il possible de remplacer mon I50 (de ma zone de données) par nume = Sheets("Feuil3!").Range("A65536").End(xlUp).Row afin d'avoir une zone auto ajustable?
    Pour éviter ce genre d'inconvénient, et si la feuille ne contient pas plusieurs plages de données, le mieux est de déclarer ta plage sur toute les lignes

    A:I


    Edit :
    En utilisant l'enregistreur de macro pour changer la plage de données ainsi que la feuille
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _
            "Feuil3!R1C1:R3C2"

  3. #3
    Candidat au Club
    Homme Profil pro
    Inscrit en
    Août 2011
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Août 2011
    Messages : 3
    Par défaut
    Merci de ton aide mais,

    Pour éviter ce genre d'inconvénient, et si la feuille ne contient pas plusieurs plages de données, le mieux est de déclarer ta plage sur toute les lignes
    J'ai essayé cela mais cela me génère un case vide sur mon camembert...c'est pas super...

    Pour le reste cela fonctionne merci!
    Mais sais-tu comment rafraichir en instantané et non à la réouverture du fichier?

    Merci encore de ton aide.

    Bonne soirée

    PJ

    Re,

    Pour le rafraichissement, j'ai trouver

    Mais pour le reste j'y travaille.
    N'hesites pas si tu as une idée.

    Salutations,

    PJ

  4. #4
    Expert confirmé Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 756
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 51
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    'ai essayé cela mais cela me génère un case vide sur mon camembert...c'est pas super...
    décoche dans la liste des données l’occurrence vide

  5. #5
    Candidat au Club
    Homme Profil pro
    Inscrit en
    Août 2011
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Août 2011
    Messages : 3
    Par défaut
    bonjour Jérome et merci du tuyau,

    En effet, cela marche.
    Entre temps j'ai néanmoins trouver la solution en appelant la dernière ligne non vide.

    Encore merci pour tout et bonne journée.

    PJ

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

Discussions similaires

  1. [XL-2003] VBA : Macro pour modifier source externe de plusieurs TCD
    Par McQwark dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 07/11/2013, 12h15
  2. [XL-2007] Modification TCD en VBA
    Par Tinoudu72 dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 14/11/2011, 10h04
  3. Mise à jour de la source d'un TCD via VBA
    Par alex830001 dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 22/01/2009, 10h41
  4. Modification d'une application sous Excel language Vba
    Par Mézeau Emilien dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 18/04/2008, 09h13
  5. Changer le format d'un champ d'un TCD en vba
    Par patate5555 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 13/07/2007, 06h49

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