XL 2019 Reporter cellule en fonction de plusieurs critère

GALOUGALOU

XLDnaute Accro

• 29 Janvier 2020

• #2

bonjour vba95
question
les valeurs en jaune doivent elle être reportées dans l'onglet reservé OF ?
les valeurs en jaune sont dans les colonnes cdef , mais les tableaux figurant dans les autres colonnes sont-ils concernés ?
cordialement
galougalou

 

Vote positif 0 Vote négatif

laurent3372

XLDnaute Impliqué

Supporter XLD

• 29 Janvier 2020

• #3

Avec des formules, ça me parait difficile. Avec une macro en VBA, ce serait facile.
Cela te convient-il?

 

Vote positif 0 Vote négatif

V

vba95

XLDnaute Nouveau

• 2 Février 2020

• #4

Bonjour,

Oui avec une macro ca serait très bien.

Merci pour votre aide

 

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 2 Février 2020

• #5

Oui , vrai en VBA mais une approche est bienvenue , car souvent le code rebute par manque de connaissance et la suite est parfois difficile
donc juste savoir si vba95 est capable de suivre même de base ?

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 2 Février 2020

• #6

Bonsoir à tous,

Le VBA ne simplifiera pas le problème, restons avec des formules.

Dans le fichier joint je me suis limité à remplir le tableau C13:F40 (2ème feuille) :

- entrer les formules en C13:F13, matricielles en C13 D13 E13 à valider par Ctrl+Maj+Entrée

- copier C13:F13 et Collage spécial-Formules sur C14:F40

- sélectionner C17:E20 et remplacer $13 par $17

- faire la même chose sur les plages de 4 lignes suivantes C21:E24 etc...

A+

 

Pièces jointes

• TEST(1).xlsx

  17.2 KB · Affichages: 8

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 3 Février 2020

• #7

Fichier (2) avec les 3 autres tableaux remplis :

- copier C13:F40 et coller sur H13:K40

- sur H13:K40 remplacer $C$5 par $H$5 et $D$5 par $I$5 (commande Remplacer)

- mêmes choses sur M13: P40 et R13:U40.

 

Pièces jointes

• TEST(2).xlsx

  21.6 KB · Affichages: 11

Vote positif 0 Vote négatif

laurent3372

XLDnaute Impliqué

Supporter XLD

• 3 Février 2020

• #8

Les formules ne tiennent pas compte des critères Date de début et date de fin

 

Vote positif 0 Vote négatif

laurent3372

XLDnaute Impliqué

Supporter XLD

• 3 Février 2020

• #9

En C13, formule matricielle:

VB:

=SIERREUR(INDEX('Réservé OF'!$F:$F;PETITE.VALEUR(SI(($C$2<='Réservé OF'!$J$2:$J$12)*($L$2>='Réservé OF'!J2:J12)*(""&$A$13=""&'Réservé OF'!$B$2:$B$12)*(""&$C$5=""&'Réservé OF'!$C$2:$C$12)*($D$5='Réservé OF'!$D$2:$D$12);LIGNE('Réservé OF'!$D$2:$D$12));LIGNES(C$13:C13)));"")

Reporter la modif sur les autres cellules

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 3 Février 2020

• #10

laurent3372 à dit:

Les formules ne tiennent pas compte des critères Date de début et date de fin

Cliquez pour agrandir...

Exact, je viens de compléter les formules de mes fichiers (1) et (2).

 

Vote positif 0 Vote négatif