Une macro qui fait ralentir le programme

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Avatar du membre
dhany
Passionné d'Excel
Passionné d'Excel
Messages : 6'898
Appréciations reçues : 694
Inscrit le : 3 octobre 2017
Version d'Excel : 2007 FR

Message par dhany » 20 août 2018, 07:50

je comprends pas ta demande ; tu écris « le résultat doit toujours rester en ligne 2 » et après tu écris « 578 devrait venir en ligne 3 » ; alors si c'est 3, c'est pas 2 !  :wink:  et précise sur quelle feuille c'est !

pour le nombre de feuilles, ça gêne pas : tu peux avoir la feuille « n75 ».

dhany
Avatar du membre
dhany
Passionné d'Excel
Passionné d'Excel
Messages : 6'898
Appréciations reçues : 694
Inscrit le : 3 octobre 2017
Version d'Excel : 2007 FR

Message par dhany » 20 août 2018, 07:53

ajout : est-ce que tu veux dire que les résultats doivent toujours commencer à partir de la ligne 2 ?
l
luky123
Jeune membre
Jeune membre
Messages : 45
Inscrit le : 3 juin 2018
Version d'Excel : 2007

Message par luky123 » 20 août 2018, 08:23

bonjour
oui quand on va sur la feuille on voir les dernier résultat. du jour
si il descend on le voie pas il faut faire ALT END pour voir
bien à toi
luky
Avatar du membre
dhany
Passionné d'Excel
Passionné d'Excel
Messages : 6'898
Appréciations reçues : 694
Inscrit le : 3 octobre 2017
Version d'Excel : 2007 FR

Message par dhany » 20 août 2018, 15:44

@luky
tu a écrit :il faut faire ALT END pour voir
il me semble que c'est plutôt avec CTRL END  :wink:

autre version du fichier :
test 5.xlsm
(21.24 Kio) Téléchargé 1 fois
* la dernière feuille est "n75" ; y'a uniquement les entêtes
* idem pour les autres feuilles dont le nom commence par "n"
* va sur la feuille "travail" ; fais Ctrl d ; vérifie les résultats

tu as fourni un fichier avec trop peu de données
➯ y'a qu'une seule ligne par feuille !  :(

dhany
l
luky123
Jeune membre
Jeune membre
Messages : 45
Inscrit le : 3 juin 2018
Version d'Excel : 2007

Message par luky123 » 23 août 2018, 00:11

salut j ais sue mettre tous sur un fichier et sa marche merci
comment je pourrai faire pour la feuille de résultat une VBA
la feuille de recherche est sur la première ligne jais des commentaire sur le tableau
puis il dois aller par le nom dans les feuille N1 N2 N3 ex dans la colonne G QT prendre les ligne de 2 a 32 pour 31 jour 31 pour 30 jour et 29 pour 28 jour et le mettre ex harrit ligne 4
bien a toi
luky et un grand merci sa me fait plaisir de travaillé avec toi tu es sympa ;;)
test 6.xlsm
(42.77 Kio) Téléchargé 1 fois
Avatar du membre
dhany
Passionné d'Excel
Passionné d'Excel
Messages : 6'898
Appréciations reçues : 694
Inscrit le : 3 octobre 2017
Version d'Excel : 2007 FR

Message par dhany » 24 août 2018, 11:36

Bonjour luky,

je te retourne ton fichier modifié :
test 6.xlsm
(46.14 Kio) Téléchargé 1 fois
tu es sur la feuille "RESULTAT" ; note bien que y'a aucune donnée sous les entêtes J1 à J31 ; fais Ctrl f

Alt F11 pour voir le code VBA : c'est dans le Module2, sub CpyQT()

si besoin, tu peux demander une adaptation.
merci de me dire si ça te convient.

attention : pour la 1ère sub Dispatch() tu as fait quelques erreurs !  ::(  alors regarde dans le Module1 ma sub Dispatch() et compare attentivement mon code VBA avec le tien.  :wink:

dhany  Image
Avatar du membre
eriiic
Passionné d'Excel
Passionné d'Excel
Messages : 9'718
Appréciations reçues : 446
Inscrit le : 7 février 2010
Version d'Excel : 2010fr

Message par eriiic » 24 août 2018, 13:25

Bonjour,

Désolé d'intervenir pour ça mais je pense qu'il faut le dire.
Dhany, il y a des raccourcis clavier très utilisés à éviter pour les macros :
Ctrl+F (Rechercher), Ctrl+H (Remplacer), Ctrl+C et Ctrl+Ins (Copier), Ctrl+X (Couper), Ctrl+V et Maj+Ins(Coller), Ctrl+S (Enregistrer), Ctr+Z (Défaire), Ctrl+Y (Refaire)
Et d'autres dans une moindre mesures comme Ctrl+B (Gras), Ctrl+I (Italique), Ctrl+U (Souligner), Ctrl+P (Imprimer) et sûrement d'autres selon les utilisateurs.
Ce n'est pas sympa de les obliger à aller dans les menus pour un simple copier (déjà vu) ou rechercher.
eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.
(les Shadoks)

En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
Avatar du membre
dhany
Passionné d'Excel
Passionné d'Excel
Messages : 6'898
Appréciations reçues : 694
Inscrit le : 3 octobre 2017
Version d'Excel : 2007 FR

Message par dhany » 24 août 2018, 13:47

Bonjour eriiic,

tu as raison pour Ctrl f, par exemple ; mais y'a un équivalent simple pour ces 3 là :

* au lieu de Ctrl c faire Ctrl Inser (touche Insertion)
* au lieu de Ctrl x faire Maj Suppr (touche Suppression)
* au lieu de Ctrl v faire Maj Inser

ces 3 raccourcis sont valables dans toutes les applications, même Word et le Bloc-notes de Windows (c'est pas spécifique à Excel) ; pour les autres raccourcis clavier, le demandeur est bien sûr libre de choisir une autre lettre que celle que j'ai choisie.  ;;)

d'un autre côté, personnellement, je suis habitué à utiliser des raccourcis clavier : c'est plus rapide que d'utiliser la souris pour cliquer sur un bouton ; et y'a aussi qu'un bouton prend de la place sur l'écran et quand c'est déjà encombré, c'est parfois difficile de trouver un endroit où le mettre ! parfois aussi, une macro doit être lancée sur plusieurs feuilles de classeur ; ça oblige à mettre un bouton sur chaque feuille du classeur ! alors qu'un raccourci clavier n'a pas cet inconvénient.

après, je laisse le demandeur choisir selon ses goûts, et ça m'est déjà arrivé de remplacer un raccourci clavier par un bouton quand il le réclame.  :wink:

dhany
l
luky123
Jeune membre
Jeune membre
Messages : 45
Inscrit le : 3 juin 2018
Version d'Excel : 2007

Message par luky123 » 24 août 2018, 14:55

bonjour
merci grand chef manitou lollll
luky est contant lol la calumet la paix .
passe un bon weekend
luky
merci ecricc je connais les raccourci clavier et des fait sa me ces bien sur internet je c'est copier des chose que en fessant normal je ces pas le faire bon weekend
luky
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message