Re:Textbox alimentée /fontion & mise-à-jour en dir
>
myDearFriend! : En fait c'est comme ça que j'avais fait au début mais je voulais éviter les riques de fausse manip et aussi savoir comment ça pouvait se faire 'normalement'.
...Mais grâce à toi j'ai compris que je pouvais éviter tout risque en mettant la fomule dans une page cachée où je mets déjà pas mal de données transitoires (un jour il faudra que je vous en parle de cette bidouille mais ça peut attendre.)
Merci beaucoup !
>
Hervé : Désolé de ne pas être allé au bout du test hier soir, ce n'est que tout à l'heure en voyant ton exemple que j'ai compris qu'il fallait que je sauvegarde/quitte :lol:
Pourrais-tu m'expliquer en 2 mots la signification de cette ligne :
If Intersect(Target, plage) Is Nothing Then Exit Sub
En fait, une fois que j'ai eu compris ton code, j'ai tout compacté (j'adore mettre un gros paquet illisible sur une seule ligne
) et ça fonctionne toujours de cette manière :
Private Sub Worksheet_Change(ByVal Target As Range)
TextBox2 = Application.WorksheetFunction.Max(Worksheets('OOO').Range('A5:A705'))
End Sub
D'ailleurs là je me dis que je pourrais probablement virer le (ByVal Target As Range)...
Merci beaucoup à tous les 2 deux et à bientôt !