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 EXCEL - reduire le temps d'un copier/coller [XL-2003]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Septembre 2007
    Messages
    12
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 12
    Par défaut VBA EXCEL - reduire le temps d'un copier/coller
    Bonjour,

    Certes ce titre peut paraitre un peu alambiqué mais je ne vois pas d'autre moyen d'expliquer mon probleme.
    Pour faire simple voici ce que je fais :
    Dans un fichier d'environ 50000 lignes j'insere 3 colonnes 3 fois (Donc 9 colonnes en tout) a des endroits differents.
    Ensuite dans les trois premieres cellules des colonnes inserées je saisis (via VB) une formule de recherche vertical sur une reference dans une colonne a coté.
    cette formule quasi identique dans les 3 celulles (avec juste une reference differente).
    Ensuite je vais jusqu'en bas de mes données, fait une selection etendue jusqu'a mes trois cellule avec mes formules et je les "recopier vers le bas"...
    cette Opération prend disons 1 minutes.
    Ensuite je fais un "copier/collage special-valeurs" sur toutes les cellules ou il y a la formule.
    Donc je me retrouve avec mes 3 premieres colonnes inserées pleines de valeurs, donc plus de formule dans les cellules.
    Ensuite je recommence exactement la meme operation sur ma deuxieme serie de 3 colonnes insérées.(je boucle avec un while donc c'est exactement les meme instruction et les meme formules). Le probleme (on y arrive enfin ) c'est que la deuxieme fois l'action met disons 3 minutes.... Et pour les trois dernieres colonnes cela met 6 minutes.
    Alors ma question est : Quelqu'un serait t'il comment faire en sorte que le temps de traitement des 3 actions soient le meme ?
    Y a t'il une instruction qui permet de "vider" la memoire "copier/coller" sans reinitialiser les variables (et autre que "Apllication.CutCopyMode = False" que j'utilise deja)
    Je ne peux pas vous mettre mon code pour le moment car c'est sur mon lieu de travail... mais peut etre que quelqu'un comprendra ma description (quelque peu hasardeuse certe... mais comprehensible je l'espere).

    je vous remercie par avance.

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 682
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 41
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 682
    Par défaut
    salut,
    si tu mets des formules dans les cellules, elles peuvent nécessiter de faire des calculs à chaque fois que tu modifies le contenu de certaines cellules.

    pistes possibles :
    - mettre en dur les valeurs dans les cellules
    - utiliser
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.ScreenUpdate = False
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  3. #3
    Membre averti
    Inscrit en
    Septembre 2007
    Messages
    12
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 12
    Par défaut
    Tout d'abord Merci... je guettais les réponses avidemment ...
    Mais tout en attendant fébrillement une réponse, j'ai reflechi... et j'ai compris d'ou venais mon probleme.
    En fait dans les cellule "référence" de mes formules "(rechercheV) je me suis rendu compte que bcp était vide (genre pas d' info pour ce champs) et en fait il semblerai (enfin c'est meme sur) que quand il ne trouve pas la reference dans la table de recherche il (excel) tourne pas mal de temps avant d'enfin avouer son ignorance et afficher un fatidique "#N/A"...
    Donc la solution a mon probleme a été de remplacer ces cellule vide par un texte type "noref" et ensuite d'ajouter dans ma table de recherche une ligne identifiant la recherche des "noref" dans la table (hummm pas tres clair tout ca ...) mais bon quoi qu'i en soit !!! Eureka !!!

    En tout cas... Merci bcp (je vais regarder ce que donne ton indice .... histoire de...)

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

Discussions similaires

  1. [VBA][Excel]Copier une feuille dans un nouveau classeur
    Par illight dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 02/10/2020, 12h51
  2. [2013] boucle VBA (recherche à partir d'un nom et copier coller)
    Par billy255 dans le forum Microsoft Office
    Réponses: 2
    Dernier message: 21/05/2014, 10h43
  3. [VBA][excel]comment copier la feuille selectionnée
    Par megapacman dans le forum Access
    Réponses: 2
    Dernier message: 21/03/2006, 13h03
  4. [VBA Excel]probleme de copier/coller
    Par ogenki dans le forum Macros et VBA Excel
    Réponses: 13
    Dernier message: 31/01/2006, 14h22
  5. [vba-excel] Le temps de fermeture trop court ?
    Par Damsou dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 11/01/2005, 10h03

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