OVH Cloud OVH Cloud

temporisation dans une instruction

11 réponses
Avatar
Michel Berthelemy
Bonjour
J'aimerais donner le temps à la machine d'exécuter une instruction qui
prend une ou deux seconde, sinon, elle ne peut pas être éxécutée dans
une macro qui déroule trop vite pour elle..
Comment faire?
merci

10 réponses

1 2
Avatar
isabelle
bonjour Michel,

pour une attente de 15 sec :

Application.Wait Now + TimeValue("00:00:15")

isabelle


Bonjour
J'aimerais donner le temps à la machine d'exécuter une instruction qui
prend une ou deux seconde, sinon, elle ne peut pas être éxécutée dans
une macro qui déroule trop vite pour elle..
Comment faire?
merci


Avatar
isabelle
si les calculs ne se font pas, ce n'est pas par manque de temps mais parce que les cellules doivent être au format texte.

il faut transformer ces données en numérique.
comment sont placer les données, sont t'ils dans une seule colonne ?

isabelle



bonjour Michel,

pour une attente de 15 sec :

Application.Wait Now + TimeValue("00:00:15")

isabelle



merci isabelle
mais ca suffit pas
c'est pour modifier un tableau de chiffres (format standard)qui est
importé avec des points. l'action que je veux réaliser est de remplacer
les points par des virgules pour que les calculs puissent être faits sur
ces chiffres.

J'y arrive très bien à la main, mais avec la macro, ca ne marche pas,
les points sont bien remplacés par des virgules, mais les calculs ne se
font pas..

voici mon script:

Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse

Merci de me secourir

Michel



Avatar
isabelle
Michel, lors de l'importation, tu peux choisir de remplacer le point par une virgule directement dans la fenêtre de l'assitant convertir.

isabelle



si les calculs ne se font pas, ce n'est pas par manque de temps mais
parce que les cellules doivent être au format texte.



Mais ça marche à la main, losque je fais un simple remplacement des
points par des virgules..

il faut transformer ces données en numérique.



Les données sont dans un tableau de plusieurs colonnes sur 31 lignes
elles sont importée en format standard, mais avec un point décimal.
J'ai essayé de les transformer en nombres, mais ça ne marche pas, c'est
sans effet.



Avatar
isabelle
bonjour Michel,

sur la fenêtre Assitant conversion - Étape 3 sur 3
il y a un bouton "Avancé..."
si tu click sur ce bouton tu auras ce choix.

isabelle



Michel, lors de l'importation, tu peux choisir de remplacer le point
par une virgule directement dans la fenêtre de l'assitant convertir.

isabelle

Je n'ai pas cette possibilité, juste le choix entre standard, date, etc..




Avatar
Michel BERTHELEMY
bonjour Michel,

sur la fenêtre Assitant conversion - Étape 3 sur 3
il y a un bouton "Avancé..."
si tu click sur ce bouton tu auras ce choix.

isabelle

Merci, ça marche

bisous

Avatar
Michel Berthelemy
bonjour Michel,

pour une attente de 15 sec :

Application.Wait Now + TimeValue("00:00:15")

isabelle


merci isabelle
mais ca suffit pas
c'est pour modifier un tableau de chiffres (format standard)qui est
importé avec des points. l'action que je veux réaliser est de remplacer
les points par des virgules pour que les calculs puissent être faits sur
ces chiffres.

J'y arrive très bien à la main, mais avec la macro, ca ne marche pas,
les points sont bien remplacés par des virgules, mais les calculs ne se
font pas..

voici mon script:

Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse

Merci de me secourir

Michel

Avatar
Michel Berthelemy

si les calculs ne se font pas, ce n'est pas par manque de temps mais
parce que les cellules doivent être au format texte.



Mais ça marche à la main, losque je fais un simple remplacement des
points par des virgules..

il faut transformer ces données en numérique.


Les données sont dans un tableau de plusieurs colonnes sur 31 lignes
elles sont importée en format standard, mais avec un point décimal.
J'ai essayé de les transformer en nombres, mais ça ne marche pas, c'est
sans effet.

Avatar
Michel Berthelemy

Michel, lors de l'importation, tu peux choisir de remplacer le point par
une virgule directement dans la fenêtre de l'assitant convertir.

isabelle

Je n'ai pas cette possibilité, juste le choix entre standard, date, etc..


Avatar
isabelle
bonjour Michel,

essaie en sélectionnant qu'une seule colonne à la fois et exécute cette macro.

Sub ConvertirTexteEnNumérique()
Selection.TextToColumns Destination:¬tiveCell, FieldInfo:=Array(1, 1)
End Sub

a+
isabelle


bonjour Michel,

sur la fenêtre Assitant conversion - Étape 3 sur 3
il y a un bouton "Avancé..."
si tu click sur ce bouton tu auras ce choix.

Rectificatif:

CA marche à la maison, mais ici au boulot non, sur Excel 2000 il n'y a
pas de bouton "Avancé"



Avatar
Michel Berthelemy
bonjour Michel,

sur la fenêtre Assitant conversion - Étape 3 sur 3
il y a un bouton "Avancé..."
si tu click sur ce bouton tu auras ce choix.

Rectificatif:

CA marche à la maison, mais ici au boulot non, sur Excel 2000 il n'y a
pas de bouton "Avancé"

1 2