[RESOLU]Récupérer des valeurs provenant d'une autre feuille - VB

job75

XLDnaute Barbatruc

• 6 Janvier 2014

• #16

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Re,

Nouveau problème, alors joignez votre nouveau fichier si vous voulez de l'aide 🙄

Quand un filtre est appliqué, il faut savoir que .End(xlUp) renvoie la dernière cellule visible.

A+

 

Vote positif 0 Vote négatif

T

Ternoise

XLDnaute Occasionnel

• 6 Janvier 2014

• #17

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Re

Mon classeur d'essai en pièce jointe

Merci une nouvelle fois de l'aide. Je pensais en avoir fini !

 

Pièces jointes

• Report.xls

  156 KB · Affichages: 42

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 6 Janvier 2014

• #18

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Re,

Votre fichier en retour.

Il n'y avait pas grand-chose à modifier, j'ai ajouté quelques explications.

A+

 

Pièces jointes

• Report(2).xls

  150 KB · Affichages: 41

Vote positif 0 Vote négatif

T

Ternoise

XLDnaute Occasionnel

• 6 Janvier 2014

• #19

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Re,

Merci pour les explications...c'est impeccable

Pour les deux tableaux du haut de la feuille "RECUP", il faut que je me base sur la même chose je suppose ?
Mais la c'est des totaux !

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 6 Janvier 2014

• #20

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Ternoise à dit:

Pour les deux tableaux du haut de la feuille "RECUP", il faut que je me base sur la même chose je suppose ?

Cliquez pour agrandir...

Vous avez mis de formules dans ces tableaux, et bien sûr vous pouvez les entrer par macro.

A+

 

Vote positif 0 Vote négatif

T

Ternoise

XLDnaute Occasionnel

• 6 Janvier 2014

• #21

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Oui avec formule, cela fait ramer mon fichier

L'idéal c'est avec macro

 

Vote positif 0 Vote négatif

T

Ternoise

XLDnaute Occasionnel

• 6 Janvier 2014

• #22

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Re

Après essai de toute sorte et comme je m'y attendais, je n'y arrive pas avec les tableau du haut.

Après j'espère avoir fini !

 

Pièces jointes

• Report.xls

  160.5 KB · Affichages: 25

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Janvier 2014

• #23

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Bonjour Ternoise, le forum,

Plutôt que d'entrer les formules par macro il vaut mieux les laisser en permanence dans les cellules.

Mais à une condition : qu'elles ne soient pas volatiles.

Donc ne pas utiliser les fonctions volatiles DECALER ou SOUS.TOTAL.

C'est le cas de toutes les formules de la feuille RECUP du fichier (3) joint.

Toujours pour éviter la fonction DECALER, le tableau T est redéfini dynamiquement à chaque activation de la feuille :

Code:

Private Sub Worksheet_Activate()
'End(xlUp) ne donne pas le bon résultat si le tableau est filtré
Sheets("DIRECTION").Range("C9:R" & Application.Match("zzz", Sheets("DIRECTION").[C:C])).Name = "T"
End Sub

Nota : en H7 et J7:O7 de la feuille DIRECTION vous utilisez la fonction volatile SOUS.TOTAL.

Les formules de ces 7 cellules sont donc recalculées à chaque modification du classeur.

Je ne pense pas que ce soit très gênant.

A+

 

Pièces jointes

• Report(3).xls

  143.5 KB · Affichages: 26

Vote positif 0 Vote négatif

T

Ternoise

XLDnaute Occasionnel

• 7 Janvier 2014

• #24

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Bonjour Job75

C'est nickel pour la feuille "RECUP". Je pensais que les macros permettaient d'aller plus vite. Donc je me suis, une nouvelle fois borné à cela !

Concernant le calcul avec SOUS.TOTAL de la Feuille "DIRECTION". Cela fait ralentir tout le classeur.
En sachant que ces données proviennent d'un UserForm, à chaque fois qu'une validation est faite, le calcul s'effectue donc le traitement est super long.
Mais étant donné que ces totaux sont effectués dans la feuille "RECUP", je peux donc virer ces formules...L'affaire est clause !!!

Merci de votre aide depuis tout ce temps
Bonne journée
David

 

Vote positif 0 Vote négatif

T

Ternoise

XLDnaute Occasionnel

• 7 Janvier 2014

• #25

Re : [RESOLU]Récupérer des valeurs provenant d'une autre feuille - VB

Re,

Un petit truc, dans le tableaux du bas de la Feuille "RECUP", à la place des cellules vides j'aimerais avoir "REPOS" avec cellule en jaune. Le format conditionnel avec ma version ne le permet pas.

Et pour rechercher la dernière date inscrite, je pensais faire comme ceci mais cela fonctionne pas.
=SOMMEPROD((INDEX(T;;2)>=$C$6)*(INDEX(T;;2)<=$E$6)*(INDEX(T;;1)=$B9);BDMAX(T;;2))

Merci de l'aide
David

 

Dernière édition: 7 Janvier 2014

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Janvier 2014

• #26

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Re,

Les cellules "vides" ne le sont pas, elles contiennent des zéros.

Pour inscrire "REPOS" il suffit de modifier la formule en testant la valeur zéro, mais cela alourdira les calculs.

Aucune difficulté pour créer une MFC en testant la valeur de la cellule.

A+

 

Vote positif 0 Vote négatif

T

Ternoise

XLDnaute Occasionnel

• 7 Janvier 2014

• #27

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Re

Oui j'ai bien modifié les formules et mis une MFC pour les couleurs de cellules mais cela alourdi énormément les calculs.
Je pensais plus à une macro justement.

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Janvier 2014

• #28

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Re,

En fait pas besoin de modifier les formules, mettre le tableau au format 0,00;-0,00;"REPOS"

Ainsi les calculs ne devraient pas être alourdis.

Fichier (4).

A+

 

Pièces jointes

• Report(4).xls

  134.5 KB · Affichages: 24

Vote positif 0 Vote négatif

T

Ternoise

XLDnaute Occasionnel

• 7 Janvier 2014

• #29

Re : Récupérer des valeurs provenant d'une autre feuille - VB

A oui bien vu. nickel.

Je n'arrive toujours pas à rechercher la dernière date inscrite.

Merci

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Janvier 2014

• #30

Re : Récupérer des valeurs provenant d'une autre feuille - VB

Re,

S'il s'agit de connaître la dernière date (en bas) de la feuille DIRECTION :

Code:

=RECHERCHE(9^9;DIRECTION!D:D)

A+

 

Vote positif 0 Vote négatif