Bonjour à tout le forum,
je viens vers vous car je rencontre un souci avec une macro qui fonctionnait très bien avant mais qui maintenant ne marche plus.
Je m'explique, je fais des calculs de moyenne sur un tableau de mesure où je précise les durées des temps (t1 et t2). exemple t1 = 0 s et t2= 2s et j'appuie sur le bouton "Correction puissance à vide"
Je moyenne les valeurs entre 0 et 2 s et je stock la valeur dans une feuille Pvide.
Ensuite je fais un décalage et je crée une formule sur mon tableau d'origine qui est
= valeur actuelle - Pvide (calculée précédement).
Mon souci c'est que cette formule ne fonctionne que si la valeur actuelle du tableau est une valeur entière ! Pourquoi ?
j'obtiens erreur exécution 1004
erreur définie par l'application ou l'objet
je suis sous excel 2010.
Avant cela marchait bien.
je n'arrive pas à voir d'où vient le probléme.
Ci dessous le code de la macro et le fichier excel qui va avec.
Merci à tous pour m'aider à résoudre mon souci.
Bonne journée
Cordialement,
Jo
Sub puissance_corrige()
colonnepuissancevide = 3
coco = 2
k = 2
r = 2
Sheets("data").Select
Do While Sheets("Pvide").Cells(r, colonnepuissancevide) <> ""
i = 3
Do While Sheets("data").Cells(i, coco) <> ""
formule4 = "=" & Sheets("data").Cells(i, coco).Value & " - Pvide!C" & k & ""
Sheets("data").Cells(i, coco).Value = formule4
i = i + 1
Loop
k = k + 1
r = r + 1
coco = coco + 1
Loop
Sheets("data").Select
End Sub
je viens vers vous car je rencontre un souci avec une macro qui fonctionnait très bien avant mais qui maintenant ne marche plus.
Je m'explique, je fais des calculs de moyenne sur un tableau de mesure où je précise les durées des temps (t1 et t2). exemple t1 = 0 s et t2= 2s et j'appuie sur le bouton "Correction puissance à vide"
Je moyenne les valeurs entre 0 et 2 s et je stock la valeur dans une feuille Pvide.
Ensuite je fais un décalage et je crée une formule sur mon tableau d'origine qui est
= valeur actuelle - Pvide (calculée précédement).
Mon souci c'est que cette formule ne fonctionne que si la valeur actuelle du tableau est une valeur entière ! Pourquoi ?
j'obtiens erreur exécution 1004
erreur définie par l'application ou l'objet
je suis sous excel 2010.
Avant cela marchait bien.
je n'arrive pas à voir d'où vient le probléme.
Ci dessous le code de la macro et le fichier excel qui va avec.
Merci à tous pour m'aider à résoudre mon souci.
Bonne journée
Cordialement,
Jo
Sub puissance_corrige()
colonnepuissancevide = 3
coco = 2
k = 2
r = 2
Sheets("data").Select
Do While Sheets("Pvide").Cells(r, colonnepuissancevide) <> ""
i = 3
Do While Sheets("data").Cells(i, coco) <> ""
formule4 = "=" & Sheets("data").Cells(i, coco).Value & " - Pvide!C" & k & ""
Sheets("data").Cells(i, coco).Value = formule4
i = i + 1
Loop
k = k + 1
r = r + 1
coco = coco + 1
Loop
Sheets("data").Select
End Sub