néné06
XLDnaute Accro
Bonjour à tous
Dans un ne mes programme , j'ai entré l'instruction suivante , sans placer
Dim q as integer
For q = 11 To 18
Controls("OB" & q).Value = ActiveCell.Offset(q - 10, 7)
Next q
Sur mon ordi et quelques autres, le programme tourne.
Sur l'ordi d'un membre du Forum ,le message alerte apparait "Projet ou bibliothèque introuvable"
dés le lancement avec le premier "q" en grisé.
Oû est l'erreur ??
Le programme complet est dans la discussion d'hier "Visites médicales".
Merci à vous
Dans un ne mes programme , j'ai entré l'instruction suivante , sans placer
Dim q as integer
For q = 11 To 18
Controls("OB" & q).Value = ActiveCell.Offset(q - 10, 7)
Next q
Sur mon ordi et quelques autres, le programme tourne.
Sur l'ordi d'un membre du Forum ,le message alerte apparait "Projet ou bibliothèque introuvable"
dés le lancement avec le premier "q" en grisé.
Oû est l'erreur ??
Le programme complet est dans la discussion d'hier "Visites médicales".
Merci à vous