OVH Cloud OVH Cloud

erreur sur fonction

2 réponses
Avatar
Mike Perchoir
Bonjour
Je voudrais comprendre pourqoui j'ai un message d'erreur sur cette ligne:
Sheets(FeuilleDestination).Cells(ligne, colonne).Formula =
"=(19981,1882918624*452)/19981,1882918624"

En fait ma ligne de code exact est:
Sheets(FeuilleDestination).Cells(ligne, colonne).Formula = _
"=(" & Sheets(FeuilleSource).Cells(ligne, colonne).Value & _
"*" & Base & ") / " & ValeurEntete


Cordialement,
Mike

2 réponses

Avatar
isabelle
bonjour Mike,

j'ai tester sur un nouveau classeur avec Feuil1 et Feuil2 et je
n'obtient pas d'erreur, quel est le message d'erreur ?

FeuilleSource = "Feuil1"
FeuilleDestination = "Feuil2"
ligne = 1
colonne = 1
Sheets(FeuilleSource).Cells(ligne, colonne) = 19981.1882918624
Base = 452
ValeurEntete = 19981.1882918624

Sheets(FeuilleDestination).Cells(ligne, colonne).Formula = _
"=(" & Sheets(FeuilleSource).Cells(ligne, colonne).Value & _
"*" & Base & ") / " & ValeurEntete

isabelle



Bonjour
Je voudrais comprendre pourqoui j'ai un message d'erreur sur cette ligne:
Sheets(FeuilleDestination).Cells(ligne, colonne).Formula > "=(19981,1882918624*452)/19981,1882918624"

En fait ma ligne de code exact est:
Sheets(FeuilleDestination).Cells(ligne, colonne).Formula = _
"=(" & Sheets(FeuilleSource).Cells(ligne, colonne).Value & _
"*" & Base & ") / " & ValeurEntete

Cordialement,
Mike


Avatar
Mike VB
Merci Isabelle
(l'erreur:1004)
je n'ai pas vraiment compris pourquoi,mais apparemment avec formulalocal sa
fonctionne.

Mike

"isabelle" a écrit dans le message de
news:
bonjour Mike,

j'ai tester sur un nouveau classeur avec Feuil1 et Feuil2 et je
n'obtient pas d'erreur, quel est le message d'erreur ?

FeuilleSource = "Feuil1"
FeuilleDestination = "Feuil2"
ligne = 1
colonne = 1
Sheets(FeuilleSource).Cells(ligne, colonne) = 19981.1882918624
Base = 452
ValeurEntete = 19981.1882918624

Sheets(FeuilleDestination).Cells(ligne, colonne).Formula = _
"=(" & Sheets(FeuilleSource).Cells(ligne, colonne).Value & _
"*" & Base & ") / " & ValeurEntete

isabelle



Bonjour
Je voudrais comprendre pourqoui j'ai un message d'erreur sur cette
ligne:


Sheets(FeuilleDestination).Cells(ligne, colonne).Formula > > "=(19981,1882918624*452)/19981,1882918624"

En fait ma ligne de code exact est:
Sheets(FeuilleDestination).Cells(ligne, colonne).Formula = _
"=(" & Sheets(FeuilleSource).Cells(ligne, colonne).Value & _
"*" & Base & ") / " & ValeurEntete

Cordialement,
Mike