Recalcul automatique de la feuille. Résolu/Fermé

Question

Bonjour à tous,
J'ai créé une fonction qui marche correctement et qui renvoie une valeur dans la cellule active, sauf dans le cas où une cellule venait à être changée. La macro fonction ne se recalcule pas automatiquement. Quelqu'un pourrait m'aider pour résoudre mon problème?
Merci à tous. 



Configuration: iPad / Safari 9.0

eriiic · Answer

Bonjour,

Il faut que cette cellule qui change apparaisse dans les paramètres passés à la fonction.
eric

Kab213 · Answer

Bjr Eric,
Merci pour ta réactivité. 
Je ne peux pas passer la cellule en paramètre car elle est déterminée à l'intérieur de la fonction. 
Ma fonction est juste une copie de cellules selon des conditions. 
J'espère que mon problème est identifié. 
Merci par avance. 
Dany.

Kab213 · Answer

Bsr Eric,
Ci-joint le code que j'ai préparé. 
Merci pour ton aide. 


Function CopieBL(exemple As Range)

Dim Colonne As Integer
Dim Ligne   As Integer
Dim I       As Integer
Dim Trouve  As Boolean


Application.Calculation = xlCalculationAutomatic
I = 1
Trouve = False

Colonne = ActiveCell.Column
Ligne = (ActiveCell.Row)
Cells(Colonne, Ligne).Select
Set example = Range("B5:AF5")
While (I <= 2) And Trouve = False

' MsgBox "Cellule Active is  " & Cells(Ligne, Colonne).Value
' MsgBox "Cellule Active BL   " & Cells(I + 1, 2).Value

If Cells(Ligne - 2, Colonne) = Cells(2, I + 1) Then
CopieBL = Cells(5, I + 1)
Trouve = True
Else
End If
I = I + 1
Wend

End Function

Kab213 · Answer

Bsr Eric,
Ma fonction copie une valeur d'une cellule non connue à priori sous condition (deux valeurs de cellules égales) vers une nouvelle cellule. 
J'ai une série de valeurs réparties par jour. Je dois recopier une partie de ces valeurs vers une autre sélection de cellules qui se présente sous forme de relevé d'heures.
J'espère avoir été clair. 
Je peux t'envoyer un exemple. 
Merci à toi.

Kab213 · Answer

Ci joint lien du fichier en question. 
https://www.cjoint.com/c/FDfrCSTsDYs

Kab213 · Answer

Bsr Eric,
Le fichier transmis est juste une infime partie de la réalité. 
Tout se passe dans le même classeur et même feuille. 
Les cellules AS4:AU52 représente le mois reparti par semaine qui commence obligatoirement par le Lundi. 
Dans la cellule AS8, je dois rapatrier la valeur de la cellule B5 car AS6= B2, car je ne sais pas quand commence le mois courant, et ainsi de suite. 
Merci à toi.

Kab213 · Answer

Bsr Eric,
Essaies avec celui-là :
https://www.cjoint.com/c/FDfrCSTsDYs

Kab213 · Answer

Bjr Eric,
Avec toutes mes excuses. Ce n'est pas du tout un gag comme tu dis, mais je suis novice et je n'y comprends pas grand chose. 
J'ai vérifié le fichier avec le nouveau lien : 
https://www.cjoint.com/c/FDgmteGLhBs

Explication: 
S1= La sélection A1:AF52 est une zone de saisie par jour pour différents postes
S2= La sélection AN1:AV50 me permet de créer une feuille de pointage basée sur la sélection précédente à savoir S1. 
Chaque mois,
1/ Je dois reproduire dans S2  les jours du mois répartis par semaine commençant obligatoirement par un lundi. 
2/ A la fin de la saisie dans S1, je dois reproduire les cellules B2:AF2 dans les cases correspondantes au même jour dans la sélection S2
Ex : Si AS5=B2 alors AS7=B5. 
Le premier problème : Trouver le premier jour du mois dans la sélection S2, et particulièrement dans AO5:AU5
Recopier la cellule B5 dans la cellule trouvée ci-dessous avec offset +2, dans ce cas AS7 et ainsi de suite. 
La saisie peut évoluer en cours de mois et il faut que la grille S2 se mette constamment à jour. 
J'espère avoir été suffisamment. 
Avec tous mes remerciements.

Kab213 · Answer

Bsr Eric,
Ce n'est obligatoirement une fonction. Si tu as une autre idée 
1/ Les cellules AO5:AU5 doivent recevoir la date
2/Les cellules AO6:AU6 doivent recevoir la valeur de la cellule de la ligne 5 si les dates correspondent. C'est pour cela que j'ai parlé d'Offset Ligne. 
3/ La ligne BL est divisée par jour où je dois saisir des valeurs quotidiennes. 
J'ai parlé des sélections S1 et S2 juste à titre indicatif. 
Peut-on simplement utiliser la fonction RechercheH?
Merci pour ton aide.

Kab213 · Answer

Bjr Eric,
Merci pour ton aide. 
Le nom Toto est celui d'un employé. Il n'intervient pas dans la formule de calcul.
Par contre les lignes A5 et A9 dénommées BL et BL1 sont reportées dans AO2:AW50 comme indiqué dans le fichier joint. 
https://www.cjoint.com/c/FDhoDV7B63s
Merci encore. 
A+

Kab213 · Answer

Bjr Eric. 
Merci pour ton aide précieuse. 
Mon probleme est résolu grâce à toi. 
J'ai un autre souci. Je mettrais en ligne un autre post. 
Bon WE. 
A+
Dany.

Recalcul automatique de la feuille.

11 réponses

Discussions similaires