C Christian0258 XLDnaute Accro 15 Juillet 2020 #1 Bonjour à tout le forum, J'aimerais votre éclairage sur cette macro, qui fonctionne parfaitement seule, mais lorsqu'elle est associée (call...) dans une autre plante... voir fichier Bien amicalement, Christian Pièces jointes Remise En Stock(1).xlsm 27 KB · Affichages: 14
Bonjour à tout le forum, J'aimerais votre éclairage sur cette macro, qui fonctionne parfaitement seule, mais lorsqu'elle est associée (call...) dans une autre plante... voir fichier Bien amicalement, Christian
_Thierry XLDnaute Barbatruc Repose en paix 15 Juillet 2020 #2 Bonjour @Christian0258 , le Forum Ce n'est pas le Call c'est que ta Feuille "TransfertRT" n'est plus la feuille active quand tu lances depuis "Archives"... Ceci équivaut à dire que tu travailles sur la feuille active pour le Row.Count et le Find ... VB: lgn = fB.Range("B5:B" & fB.Range("B" & Rows.Count).End(xlUp).Row).Find(Range("A" & i), lookat:=xlWhole).Row Essaie comme ceci : VB: lgn = fB.Range("B5:B" & fB.Range("B" & fT.Rows.Count).End(xlUp).Row).Find(fT.Range("A" & i), lookat:=xlWhole).Row Bonne journée @+Thierry Vote positif 0 Vote négatif
Bonjour @Christian0258 , le Forum Ce n'est pas le Call c'est que ta Feuille "TransfertRT" n'est plus la feuille active quand tu lances depuis "Archives"... Ceci équivaut à dire que tu travailles sur la feuille active pour le Row.Count et le Find ... VB: lgn = fB.Range("B5:B" & fB.Range("B" & Rows.Count).End(xlUp).Row).Find(Range("A" & i), lookat:=xlWhole).Row Essaie comme ceci : VB: lgn = fB.Range("B5:B" & fB.Range("B" & fT.Rows.Count).End(xlUp).Row).Find(fT.Range("A" & i), lookat:=xlWhole).Row Bonne journée @+Thierry
C Christian0258 XLDnaute Accro 15 Juillet 2020 #3 Re, le forum, Thierry Merci infiniment, Thierry, pour cette ligne de code qui fonctionne parfaitement. Bien à toi, Christian Vote positif 0 Vote négatif
Re, le forum, Thierry Merci infiniment, Thierry, pour cette ligne de code qui fonctionne parfaitement. Bien à toi, Christian