En tant que lol professionnel y a qlq chose que je comprend pas dans le tut : Réalisation d'une grille hierarchique UPDATABLE de MR MALATIER()
La fonction Private Sub MiseAJour() n'est jamais appelé
Le Exit Sub ne me permet pas d'acceder a la fonction MiseAJour()
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Sub GrilleMSH_LeaveCell() 'Avant un changement de cellule active If TxtEdit.Visible = False Then Exit Sub GrilleMSH = TxtEdit 'Une modification est en cours TxtEdit.Visible = False MiseAJour End Sub Private Sub MiseAJour() Dim i As Long With GrilleMSH ....
Partager