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
Paul V
Hello à tous
Plusieurs solutions
1. Le plus simple ;-) Ajouter à l'interieur de ta boucle une autre boucle for - next vide que tu regles de 1 à 1000000 par exemple. En changeant la limite tu ajuste plus ou moins la durée.
2. Tu peux utiliser l'instruction timer. Très clair dans l'aide avec exemple
3. Il existe des activeX spécialisés que tu trouve avec une petite recherche dans Google
HTH
Paul V
"Patrice" a écrit dans le message de news: 458d13a9$0$26487$
Bonjour,
Je cherche un moyen pour ajouter une tempo (quelques miliseconde)dans un boucle DO While
With Sheets(f) Do While .Range("H" & i2) <> pièce i2 = i2 + 1
Loop Comment = .Cells(i2, "W").Value
End With
Connaissez-vous une possibilité pour cela?
Cordialement.
Hello à tous
Plusieurs solutions
1. Le plus simple ;-)
Ajouter à l'interieur de ta boucle une autre boucle for - next vide que tu
regles de 1 à 1000000 par exemple. En changeant la limite tu ajuste plus ou
moins la durée.
2. Tu peux utiliser l'instruction timer. Très clair dans l'aide avec exemple
3. Il existe des activeX spécialisés que tu trouve avec une petite recherche
dans Google
HTH
Paul V
"Patrice" <pat@yaou.fr> a écrit dans le message de news:
458d13a9$0$26487$426a34cc@news.free.fr...
Bonjour,
Je cherche un moyen pour ajouter une tempo (quelques miliseconde)dans un
boucle DO While
With Sheets(f)
Do While .Range("H" & i2) <> pièce
i2 = i2 + 1
1. Le plus simple ;-) Ajouter à l'interieur de ta boucle une autre boucle for - next vide que tu regles de 1 à 1000000 par exemple. En changeant la limite tu ajuste plus ou moins la durée.
2. Tu peux utiliser l'instruction timer. Très clair dans l'aide avec exemple
3. Il existe des activeX spécialisés que tu trouve avec une petite recherche dans Google
HTH
Paul V
"Patrice" a écrit dans le message de news: 458d13a9$0$26487$
Bonjour,
Je cherche un moyen pour ajouter une tempo (quelques miliseconde)dans un boucle DO While
With Sheets(f) Do While .Range("H" & i2) <> pièce i2 = i2 + 1
Loop Comment = .Cells(i2, "W").Value
End With
Connaissez-vous une possibilité pour cela?
Cordialement.
J exel on you
Bonsour® Patrice
Je cherche un moyen pour ajouter une tempo (quelques miliseconde)dans un boucle DO While
Declarer en début de module : Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
puis ensuite inserer la ligne de code dans une proc :
Sleep 5000 'Sleep for 5000 milliseconds
autre façon sans passer par une temporisation on peut utiliser l'instruction DoEvents qui rend pendant quelques millisecondes la main au systeme ( lectures des évenements entrées sorties, touches, périphériques etc...)
@+
Bonsour® Patrice
Je cherche un moyen pour ajouter une tempo (quelques miliseconde)dans un
boucle DO While
Declarer en début de module :
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
puis ensuite inserer la ligne de code dans une proc :
Sleep 5000 'Sleep for 5000 milliseconds
autre façon sans passer par une temporisation
on peut utiliser l'instruction DoEvents
qui rend pendant quelques millisecondes la main au systeme ( lectures des
évenements entrées sorties, touches, périphériques etc...)
Je cherche un moyen pour ajouter une tempo (quelques miliseconde)dans un boucle DO While
Declarer en début de module : Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
puis ensuite inserer la ligne de code dans une proc :
Sleep 5000 'Sleep for 5000 milliseconds
autre façon sans passer par une temporisation on peut utiliser l'instruction DoEvents qui rend pendant quelques millisecondes la main au systeme ( lectures des évenements entrées sorties, touches, périphériques etc...)
@+
Patrice
Bonsoir,
Merci pour vos réponses à vous deux! Je teste vos codes dès que possible.
Bonnes fêtes.
Bonsour® Patrice
Je cherche un moyen pour ajouter une tempo (quelques miliseconde)dans un boucle DO While
Declarer en début de module : Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
puis ensuite inserer la ligne de code dans une proc :
Sleep 5000 'Sleep for 5000 milliseconds
autre façon sans passer par une temporisation on peut utiliser l'instruction DoEvents qui rend pendant quelques millisecondes la main au systeme ( lectures des évenements entrées sorties, touches, périphériques etc...)
@+
Bonsoir,
Merci pour vos réponses à vous deux!
Je teste vos codes dès que possible.
Bonnes fêtes.
Bonsour® Patrice
Je cherche un moyen pour ajouter une tempo (quelques miliseconde)dans un
boucle DO While
Declarer en début de module :
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
puis ensuite inserer la ligne de code dans une proc :
Sleep 5000 'Sleep for 5000 milliseconds
autre façon sans passer par une temporisation
on peut utiliser l'instruction DoEvents
qui rend pendant quelques millisecondes la main au systeme ( lectures des
évenements entrées sorties, touches, périphériques etc...)
Merci pour vos réponses à vous deux! Je teste vos codes dès que possible.
Bonnes fêtes.
Bonsour® Patrice
Je cherche un moyen pour ajouter une tempo (quelques miliseconde)dans un boucle DO While
Declarer en début de module : Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
puis ensuite inserer la ligne de code dans une proc :
Sleep 5000 'Sleep for 5000 milliseconds
autre façon sans passer par une temporisation on peut utiliser l'instruction DoEvents qui rend pendant quelques millisecondes la main au systeme ( lectures des évenements entrées sorties, touches, périphériques etc...)
