Bonjour à tous
voici ce qui m'amene à me retorner vers vous, j'ai une boucle qui a
fonctionnée Vendredi mais j'ai l'impression d'avoir touché quelque chose mais
je ne vois pas quoi peut être l'un de vous aurait une idée sur mon erreur?
Dim Tabl(12)
Tabl(0) = "bckbre"
Tabl(1) = "bckces"
Tabl(2) = "bcklan"
Tabl(3) = "bckorv"
Tabl(4) = "bckren"
Tabl(5) = "bckcol"
Tabl(6) = "bckill"
Tabl(7) = "bckvel"
Tabl(8) = "bckmas"
Tabl(9) = "bckorm"
Tabl(10) = "bcktou"
Tabl(11) = "bckvil"
Tabl(12) = "bckeu"
For i = 0 To 12
Sheets(Tabl(i)).Select
sitex = (Tabl(i))
Application.Run ("extraction_web")
' Application.Run ("traitement")
Next i
merci a vous si vous avez une petite idée sur mon erreure
a bientot et merci d'avance
Jacks
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
lematou
Ne cherchez plus merci tout de meme je ne sais pas trop ce qu'il s'est passé mais j'ai rebooté mon poste et la situation est de nouveau normale. je devais trainer quelque chose , mais quoi ? je n'en sais pas plus. à la prochaine et merci encore ce forum est une mine d'infos jacks
Bonjour à tous voici ce qui m'amene à me retorner vers vous, j'ai une boucle qui a fonctionnée Vendredi mais j'ai l'impression d'avoir touché quelque chose mais je ne vois pas quoi peut être l'un de vous aurait une idée sur mon erreur? Dim Tabl(12) Tabl(0) = "bckbre" Tabl(1) = "bckces" Tabl(2) = "bcklan" Tabl(3) = "bckorv" Tabl(4) = "bckren" Tabl(5) = "bckcol" Tabl(6) = "bckill" Tabl(7) = "bckvel" Tabl(8) = "bckmas" Tabl(9) = "bckorm" Tabl(10) = "bcktou" Tabl(11) = "bckvil" Tabl(12) = "bckeu"
For i = 0 To 12 Sheets(Tabl(i)).Select sitex = (Tabl(i)) Application.Run ("extraction_web") ' Application.Run ("traitement") Next i merci a vous si vous avez une petite idée sur mon erreure a bientot et merci d'avance Jacks
Ne cherchez plus
merci tout de meme
je ne sais pas trop ce qu'il s'est passé mais j'ai rebooté mon poste et la
situation est de nouveau normale.
je devais trainer quelque chose , mais quoi ? je n'en sais pas plus.
à la prochaine et merci encore ce forum est une mine d'infos
jacks
Bonjour à tous
voici ce qui m'amene à me retorner vers vous, j'ai une boucle qui a
fonctionnée Vendredi mais j'ai l'impression d'avoir touché quelque chose mais
je ne vois pas quoi peut être l'un de vous aurait une idée sur mon erreur?
Dim Tabl(12)
Tabl(0) = "bckbre"
Tabl(1) = "bckces"
Tabl(2) = "bcklan"
Tabl(3) = "bckorv"
Tabl(4) = "bckren"
Tabl(5) = "bckcol"
Tabl(6) = "bckill"
Tabl(7) = "bckvel"
Tabl(8) = "bckmas"
Tabl(9) = "bckorm"
Tabl(10) = "bcktou"
Tabl(11) = "bckvil"
Tabl(12) = "bckeu"
For i = 0 To 12
Sheets(Tabl(i)).Select
sitex = (Tabl(i))
Application.Run ("extraction_web")
' Application.Run ("traitement")
Next i
merci a vous si vous avez une petite idée sur mon erreure
a bientot et merci d'avance
Jacks
Ne cherchez plus merci tout de meme je ne sais pas trop ce qu'il s'est passé mais j'ai rebooté mon poste et la situation est de nouveau normale. je devais trainer quelque chose , mais quoi ? je n'en sais pas plus. à la prochaine et merci encore ce forum est une mine d'infos jacks
Bonjour à tous voici ce qui m'amene à me retorner vers vous, j'ai une boucle qui a fonctionnée Vendredi mais j'ai l'impression d'avoir touché quelque chose mais je ne vois pas quoi peut être l'un de vous aurait une idée sur mon erreur? Dim Tabl(12) Tabl(0) = "bckbre" Tabl(1) = "bckces" Tabl(2) = "bcklan" Tabl(3) = "bckorv" Tabl(4) = "bckren" Tabl(5) = "bckcol" Tabl(6) = "bckill" Tabl(7) = "bckvel" Tabl(8) = "bckmas" Tabl(9) = "bckorm" Tabl(10) = "bcktou" Tabl(11) = "bckvil" Tabl(12) = "bckeu"
For i = 0 To 12 Sheets(Tabl(i)).Select sitex = (Tabl(i)) Application.Run ("extraction_web") ' Application.Run ("traitement") Next i merci a vous si vous avez une petite idée sur mon erreure a bientot et merci d'avance Jacks
