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 :

Macro VBA aide svp


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Lycéen
    Inscrit en
    Avril 2013
    Messages
    12
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Lycéen
    Secteur : Finance

    Informations forums :
    Inscription : Avril 2013
    Messages : 12
    Par défaut Macro VBA aide svp
    Bonjour, j'essaie de regrouper plusieurs tableau à la suite à l'aide d'une fonction Macro.
    Je rajoute des lignes chaque jours dans chaque tableau, ainsi ils peuvent devenir très long.
    Le problème ici est que j'ai copié le debut de mon 1er tableau en cellule A2 jusqu'a sa dernière ligne, mais la dernière ligne augmente chaque jour, je ne sais donc pas quel numéro de ligne utilisé pour placé mon second tableau, car si je le place en cellule A18, au bout de 6 jours mon premier tableau atteindra cette ligne, et ce tableau sera donc ecrasé. voici mon code pour le 1er tableau :

    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
    Sub Macro2()
    '
      Range("A22:W" & Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row).Select
      ActiveWindow.ScrollColumn = 1
      Selection.Copy
      Windows("Fichier Global.xlsm").Activate
      Range("A2").Select
      ActiveSheet.Paste
      Windows("Cdes en cours - Chine.xlsm").Activate
      Range("C19").Select
      Application.CutCopyMode = False
      ActiveCell.FormulaR1C1 = ""
      Range("C23").Select
      Windows("Cdes en cours - Chine.xlsm").Activate
    End Sub
    Voila, le code pour mon 1er tableau.
    On s'appercoit qu'on le colle dans la cellule "A2", mais pour mon 2ème tableau, je ne sais pas quelle cellule mettre, j'aimerai bien avoir une formule pour que la macro colle mon second tableau juste après le premier tableau voila merci.

  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,

    Avec le code ci-dessous la copie se fera toujours sur la prochaine ligne vide

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Range("A" & Range("A" & Rows.Count).End(XlUp).Row + 1).Paste

  3. #3
    Membre averti
    Homme Profil pro
    Lycéen
    Inscrit en
    Avril 2013
    Messages
    12
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Lycéen
    Secteur : Finance

    Informations forums :
    Inscription : Avril 2013
    Messages : 12
    Par défaut
    merci, la formule marche mais le problème est que lorsque j'active la macro, la formule ne cesse de se repeter et le tableau apparait alors autant de fois que j'active la macro.
    je voudrai que la macro activé remplace celle qui était présente.

    Merci !

  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
    je voudrai que la macro activé remplace celle qui était présente.
    Que veux tu dire par la ?

  5. #5
    Membre averti
    Homme Profil pro
    Lycéen
    Inscrit en
    Avril 2013
    Messages
    12
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Lycéen
    Secteur : Finance

    Informations forums :
    Inscription : Avril 2013
    Messages : 12
    Par défaut
    Je voudrai simplement que lorsque je clique sur le bouton qui applique la macro, ben que le tableau ne se duplique pas, je voudrai qu'il active les modification afin de remplacer l'ancien...

  6. #6
    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
    Si je comprend bien, tu veux redémarrer sur une feuille blanche?

Discussions similaires

  1. Aide pour complèter une macro VBA
    Par NEC14 dans le forum Macros et VBA Excel
    Réponses: 18
    Dernier message: 24/11/2008, 13h07
  2. Besoin d'aide SVP Requete en VBA sous access
    Par Kalvin_20 dans le forum VBA Access
    Réponses: 2
    Dernier message: 24/04/2008, 16h39
  3. Programme VBA : besoin d'aide svp
    Par antoine21 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 07/06/2007, 22h44
  4. VBA excel aide svp
    Par melodyyy dans le forum Macros et VBA Excel
    Réponses: 9
    Dernier message: 18/10/2006, 15h17

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