OVH Cloud OVH Cloud

Sheets(1) et 'erreur 40036'

11 réponses
Avatar
Galatajoe
Bonjour à tous,
qui peut m'expliquer pourquoi le code suivant ne marche plus ... alors qu'il
marchait :

Sub aaaaTEST()

For i = 1 To 159
Sheets(i).Select
Cells("a1").Select
Next

End Sub

Qu'est-ce que j'ai bien pu changer, puisque ça marche dans d'autres modules
pour d'autres classeurs ?
J'ai oublié une déclaration,? j'ai changé des références ?
Je n'y comprends plus rien.
Merci d'avance à celui ou celle qui me donnera la logique d'Excel.

1 réponse

1 2
Avatar
Galatajoe
Une nuit de sommeil et on repart frais comme un gardon de huit semaines ...

Donc, pas de End Sub en trop , mais un contrôle ActiveX qui faisait se
mettre Excel et VBA dans un état proche de l'oHio.
L'aventure du Québecois m'a aidé à chercher ailleurs que dans le code
lui-même. Merci du lien et bonne journée


voir ceci
http://groups.google.fr/group/microsoft.public.fr.excel/browse_thread/thread/f75efafa4b89dbc5/e6844e9dabb5688b%23e6844e9dabb5688b


Merci RGI,
non, ça plante pareil au même endroit:
sheets(i).select
avec indiquée, cette erreur 40036 dont je ne trouve la référence nulle part.






1 2