Prgm(Index).SetFocus
frm!Prgm(Index).SetFocus
frm.SetFocus Prgm(Index).SetFocus
Prgm(Index).SetFocusEst réalisé sur la fenêtre active, et non présent lors de l’exécution."
Prgm(Index).SetFocus Exit Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPrivate Sub Programme_Click(Index As Integer) MyFocus(Index) End sub Public Sub MyFocus(Index As Integer) For Each frm In Forms Doevents If frm Is Prgm(Index) Then Prgm(Index).SetFocus Exit Sub End If Next Load Prgm(Index) End sub