Point 1
Cellule B60 valeur 136.08 point haut en date du 13 08 2021
En B56 mettre la date du changement soit 13 08 2021 et ceci à chaque fois que B60 change
Point 2
Cellule I60 valeur 134.81 point a date du jour 27 08 2021
En I56 mettre la date du changement soit 27 08 2021 et ceci à chaque fois que I60 change
Coucou FFO
Merci pour la modif proposée
J’ai fait un copié collé à partir de ton fichier et de tes cellules
J’ai un souci avec la reproduction de la modif en B66 en vert doit inscrire 16 08 2021
Les autres cellules fonctionnent dans les différents scenarios
Tu sais que je duplique de nombreuses fois ces cellules
Ci dessous le fichier en précision 2021 08 29 Forum Classeur1 (2) (2).xlsm (37,9 Ko)
Finalement j’ai réussi à fabriquer une formule avec une fonction de ma conception
Ce sera plus simple pour toi tu n’auras plus qu’à la recopier dans les cellules à équiper et de l’adapter à leur contexte (plage et valeur)
Bonsoir FFO
Merci pour le dernier fichier
Je te donne du tracas
Désolé
Je testerai demain et te tiendrai au courant
J’ai une adaptation à faire du fait que j’insère une ligne date à chaque module traité
La ligne 69 passe en 70 etc
Je vais analyser ton programme initial et faire un essai sur un module sur un fichier test
Excellente soirée
A demain
PB
Bonjour FFO
J’espère que tu vas bien
J’ai un souci …
Ton commentaire réponse du 30 Aout
Finalement j’ai réussi à fabriquer une formule avec une fonction de ma conception
Ce sera plus simple pour toi tu n’auras plus qu’à la recopier dans les cellules à équiper et de l’adapter à leur contexte (plage et valeur) ???
J’ai fait un copier collé de chaque cellule B56 B66 I56 I66
Les formules sont ok pour chacune
Codes réponses #NOM? pour les 4 je cherche mais …
Bon après midi
A bientôt
Cordialement
PB
car pour I66 la recherche de la somme I70 doit s’effectuer dans la plage des cellule L70 à EV70
Ce qui est décrit dans sa formule : =rechercher(L70:EV70;I70)
Idem pour I56 la recherche de la somme I60 doit s’effectuer dans la plage des cellule L60 à EV60
Ce qui est décrit dans sa formule : =rechercher(L60:EV60;I60)
Tu dois adapter celle-ci au contexte de chaque formule :
Plage: L et ligne:EV et ligne (ligne où est à rechercher la valeur de L à EV)
valeur : cellule qui détient la valeur à rechercher
Les dates doivent impérativement être en ligne 55
Si cela ne fonctionne pas transmets moi ton fichier avec ces anomalies que je regarde
« J’ai fait un copier collé de chaque cellule B56 B66 I56 I66 »
Dans ce classeur ou un autre ?
Si tu veux utiliser ces formules dans un autre classeur il faut faire suivre la fonction ci-aprés :
Function rechercher(plage As Range, valeur As String)
’
’ Macro1 Macro
’
For Each c In plage
If c = valeur Then
cherche = Cells(55, c.Column).Value
Exit For
End If
Next
rechercher = cherche
’
End Function
Bonjour FFO
Merci pour tes réponses et ton analyse
Apres lecture de tes commentaires et recherchessss …
J’ai trouvé une solution (ce matin)
Apres mon copié collé d’un fichier à l’autre
il faut le collage approprié
Dans notre cas « Coller des valeurs » et « Mise en forme des valeurs et nombres »
Excellent exercice de style …
Cela m’occupe bien, bien que …
Je vais mettre à jour l’ensemble de ce fichier
Le tester …
Ensuite je continuerai l’évolution de ce dernier avec ton (si tu veux) et votre concours …
Bonne journée
Cordialement
PB
Attention comme je te l’ai dis si tu utilises les formules que j’ai confectionné dans un autre classeur la fonction en rapport que j’ai élaboré doit elle aussi être intégré dans ce classeur ainsi :
à partir de ce nouveau classeur faire Alt+F11
barre menu de la page qui vient de s’afficher en haut de celle-ci cliquer sur « Insertion » puis dans la liste sélectionner « Module »
Dans la page blanche de droite recopier ces lignes de code :
Function rechercher(plage As Range, valeur As String)
’
’ Macro1 Macro
’
For Each c In plage
If c = valeur Then
cherche = Cells(55, c.Column).Value
Exit For
End If
Next
rechercher = cherche
’
End Function
sortir de l’éditeur par la croix en haut à droite
enregistrer le classeur
La fonction dans ce nouveau classeur sera ainsi prête à fonctionner
Bien actualiser dans la formule la plage et la valeur comme décrit dans une de mes réponses
Si souci transmets moi le fichier en m’indiquant les cellules qui en bénéficient les plages à utiliser pour chacune d’entre elles la cellule qui détient la valeur à rechercher dans cette plage
La liste des dates doit impérativement être en ligne 55
Bonjour FFO
J’espère que tu vas bien
J’ai modifié l’ensemble de mon fichier ( Aie Aie)
Concernant la colonne B ça fonctionne
Sur la colonne I cellule I66 il y a un aléas de fonctionnement
Je te joins un fichier avec le problème rencontré et expliqué
Je suis à ton écoute
Avec tous mes remerciements
PB 2021 08 29 FFO Dde 3.xlsm (38,9 Ko)
Rebonjour FFo
Merci pour ta réactivité
La date à prendre en compte et la dernière date de saisie dans notre cas 31 08 2021
J’ai testé ton fichier en retour " CA MARCHE "
Peux tu me préciser la procédure de mise en application et cela 20 fois sur la colonne I
Très cordialement
Au plaisir de te lire …
PB
Ravi que cela fonctionne
J ai simplement ihnibé une ligne de code dans ma procédure recherche pour que celle-ci ne s arrête pas à la première valeur trouvée
Voilà ainsi mon intervention
N hésites si nécessaire
Au plaisir
Bonjour FFO
Désolé pour le retard en réponse à ta modif de ligne de code (cause congés non payés . Grrr.)
Tout fonctionne comme tu l’as prévu
Très grand merci
Je valide donc la solution dans ton mail du 29 Août
J’ai d’autres demandes concernant ce fichier
En espérant avoir ton concours
Très cordialement
PB