[E-00] Macro trop rapide

Mmmm...


Regarde ce que je fais, tu me diras (pas :P) ce que t'en penses:

Code:

---

1 2 3 4 5 6 7

Sub bidon() Dim taille As Integer, tableau() On Error Resume Next taille = Ubound(tableau) On Error Goto 0 Msgbox "Le tableau contient " & taille & " élément(s)." End Sub

---

Bien sûr, pour une deuxième utilisation dans la même procédure (ce que je n'ai jamais eu à faire pour l'instant), il faut réinitialiser la variable.

Ceci dit, ta méthode est un poil plus courte que la mienne (qui ne se base pas sur le On Error Resume Next) pour un traitement séparé tableau vide/non vide: pas bête le double Not, je parie que ça marche également pour d'autres trucs.

Re,

ta méthode est celle qu'utilisent la grande majorité des développeurs, le On Error Resume Next les soulageant...
Elle marche, bien sûr, mais évite-là, maintenant que tu sais comment faire...

Allez, je vais te montrer comment faire de ce que je t'ai montré une fonction (car ce n'est pas vraiment évident ;)) :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub Command1_Click() Dim toto() As String MsgBox MonUbound(Not toto, toto) Dim titi(4) As String MsgBox MonUbound(Not titi, titi) End Sub   Private Function MonUbound(ByRef quoi, qui) As Integer MonUbound = 0 'cette ligne n'est d'ailleurs même pas nécessaire, puisque la fonction est typée en integer (donc 0 si rien) If Not quoi Then MonUbound = UBound(qui) End Function

---

Et voilà ! La même fonction servira pour plkusieurs tableaux... Mets ce truc dans un de tes tiroirs. (je te laisse ajouter par toi-même ce qu'il convient de faire - c'est facile- pour extraire les Ubounds d'un tableau à plusieurs dimensions).

Citation:

---

Envoyé par DarkVader

Si ton exposé est très complet, ton exemple nécessite d'être complété par une numérotation de ligne
et l'usage d'Erl pour une efficacité maximum.
D'autre part, pour un programme compilé, j'aime à utiliser la compilation conditionnelle
qui permet de gérer à l'aide d'une seule variable, l'expression du traitement de l'erreur (msgbox, fichier log ...)

---

Je partage tout à fait ton avis.
C'est pourquoi j'ai précisé à la fin :

Citation:

---

Ceci n'est qu'un petit aperçu, mais si tu veux en savoir plus, je crois que SilkyRoad a écrit un super article quelque part à ce sujet...
Atta... je vais chercher le lien :wink:
voilà : http://silkyroad.developpez.com/VBA/GestionErreurs/

---

Mon objectif n'était pas de refaire un tutoriel sur la gestion des erreurs. Simplement d'expliquer les différences entre les manières de gérer les erreurs, et pour montrer l'inutilité générale d'un On Error Resume Next.

Bonjour, Maxence HUBICHE ,

Oserais-je ? (oui j'ose...) rajouter que dans plus de 99% des cas, même la gestion d'erreurs peut (et doit alors) être évitée.
Il est extrêmement rare que je l'utilise, donnant la préférence à la prévention, puis (dans certains cas) à la décision.
Celà m'arrive, certes, de gérer une erreur... mais c'est très exceptionnel et pour faire face à des situations TOTALEMENT imprévisibles (et "pesées" comme telles).

Ouaip...
Il est toujours préférable de prévenir plutôt que guérir.
Cependant, notamment lorsqu'il s'agit d'accéder à des fichiers, je préfère prévoir une gestion d'erreur... car... comme chacun sait... un serveur ou une connexion réseau ne "tombe" jamais et on a toujours accès à tout ce qu'on cherche. D'ailleurs, jamais personne n'a supprimé de fichier par inadvertance...
:lol:
Dans ce cas-là, ma gestion d'erreur est une prévoyance ;)

C'est certain ! La panne, l'indisponibilité brutale, etc... ne sont en effet pas des situations "attendues"... et on ne peut pas TOUJOURS vérifier juste avant.
C'est dans ces cas là que la gestion d'erreur est justifiée.
Je m'en sers, par exemple, dans un ocx de redimensionnement en fonction de la résolution de l'écran client un "peu" plus perfectionné que la simple application d'un coefficient correcteur (qui convient pour la plupart des contrôles mais se montre très "faible" en ce qui concerne les polices de caractères qui, selon la police, ne se "plient" pas à toutes les tailles au prorata... Il me faut alors chercher sur la machine cliente, tâtonner, etc... et alors là oui, je n'ai pas d'autre choix que celui d'accepter la gestion d'erreurs).
C'est un exemple, bien sûr (parmi d'autres, hélàs). Il reste que, chaque fois que la possibilité m'est donnée de vérifier avant, je l'utilise, y compris en ajoutant plusieurs lignes de codes pour ce faire.

Il y a aussi un autre cas où je me sers énormément de la gestion des erreurs : quand je les génère moi-même :)

Citation:

---

Envoyé par Maxence HUBICHE

Il y a aussi un autre cas où je me sers énormément de la gestion des erreurs : quand je les génère moi-même :)

---

Oui (ton "miam-miam" ne m'a pas échappé ;)). J'en fais autant, mais ce ne sont pas là des erreurs subies.
Voilà ... j'espère que tout a maintenant été dit et que plusieurs forumeurs sauront "fouiller" et en tirer profit.

Citation:

---

Envoyé par Maxence HUBICHE

Je partage tout à fait ton avis.
C'est pourquoi j'ai précisé à la fin :

Code:

---

1 2 3

Ceci n'est qu'un petit aperçu, mais si tu veux en savoir plus, je crois que SilkyRoad a écrit un super article quelque part à ce sujet... Atta... je vais chercher le lien :wink: voilà : http://silkyroad.developpez.com/VBA/GestionErreurs/

---

Mon objectif n'était pas de refaire un tutoriel sur la gestion des erreurs. Simplement d'expliquer les différences entre les manières de gérer les erreurs, et pour montrer l'inutilité générale d'un On Error Resume Next.

---

Bonjour,
Beaucoup d'intervenants survole une telle file sans prendre le temps de suivre en plus les liens,
et pour peu que la lecture soit consécutive à une recherche et que celle-ci ait retourné un nombre de threads conséquents,
la plupart empruntera la voie de la lecture en diagonale ...
D'ailleurs, en apparté, il serait bon qu'une telle file soit renommée (d'ici quelques temps où quand l'initiateur y aura trouvé sa réponse)
avec un titre plus explicite pour le moteur de recherche (Gestion d'erreurs, par exemple) - ce serait dommage qu'elle s'égare dans la masse.
En attendant, il serait peut-être bon d'attendre son intervention pour préciser un post initial plutôt vague
car le traitement des exceptions ne résout pas tous les problèmes que l'on peut rencontrer.

Citation:

---

Envoyé par ucfoutu

Il reste que, chaque fois que la possibilité m'est donnée de vérifier avant, je l'utilise, y compris en ajoutant plusieurs lignes de codes pour ce faire.

---

J'en prends bonne note et je m'applique dès à présent à suivre ce principe qui s'avère bien à propos. ;)

En effet temporairement disparu.
Le code n'est pas de moi, mais il me semble totalement correct. JE peux tenter le On error, mais je ne pense pas que ce soit une bonne solution.
Qui ne tente à rien n'a rien.

Salut Vovor,
rassuré d'apprendre que tu es toujours vivant. ;)