formule vba avec des variables

Le
jean
Bonjour,
J'essaie de faire une macro VBA pour réaliser des
moyennes mobiles sur base de variables :

Sub moy()
' création en e50 de la formule de moy.mob. selon les param en e1 et f1
Dim coco As String, toto As String
' en E1 j'ai construit la première variable soit D50
' en F1 la deuxième variale soit D58
' dans la formule je veux faire = moyenne(d50:d58)
coco = [e1]
toto = [f1]
Range("e50").Select
ActiveCell.Formula = "=average(coco & ":" & toto)" ' mais ici ça coince
????
End Sub

merci pour votre aide

--
merci bises à +
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
isabelle
Le #19893391
bonjour Jean,

si c'est bien des références adresse qu'il y a en E1 et F1
il faut corriger comme ceci ;

ActiveCell.Formula = "=average(" & coco & ":" & toto & ")"

isabelle

jean a écrit :
Bonjour,
J'essaie de faire une macro VBA pour réaliser des
moyennes mobiles sur base de variables :

Sub moy()
' création en e50 de la formule de moy.mob. selon les param en e1 et f1
Dim coco As String, toto As String
' en E1 j'ai construit la première variable soit D50
' en F1 la deuxième variale soit D58
' dans la formule je veux faire = moyenne(d50:d58)
coco = [e1]
toto = [f1]
Range("e50").Select
ActiveCell.Formula = "=average(coco & ":" & toto)" ' mais ici ça coince
????
End Sub

merci pour votre aide




Philippe.R
Le #19893641
Bonsoir,
0 la réponse d'Isabelle, j'ajouterai que la sélection préalable de la
celluel est inutile ; on peut tout aussi bien opérer ainsi :

Range("e50").Formula = "=average(" & coco & ":" & toto & ")"
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"jean" news:

Bonjour,
J'essaie de faire une macro VBA pour réaliser des
moyennes mobiles sur base de variables :

Sub moy()
' création en e50 de la formule de moy.mob. selon les param en e1 et
f1
Dim coco As String, toto As String
' en E1 j'ai construit la première variable soit D50
' en F1 la deuxième variale soit D58
' dans la formule je veux faire = moyenne(d50:d58)
coco = [e1]
toto = [f1]
Range("e50").Select
ActiveCell.Formula = "=average(coco & ":" & toto)" ' mais ici ça coince
????
End Sub

merci pour votre aide

--
merci ... bises à +


Philippe.R
Le #19893631
Re,
Merci de lire :
"A la réponse d'Isabelle, j'ajouterai que la sélection préalable de la
cellule.."
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"Philippe.R" news:
Bonsoir,
0 la réponse d'Isabelle, j'ajouterai que la sélection préalable de la
celluel est inutile ; on peut tout aussi bien opérer ainsi :

Range("e50").Formula = "=average(" & coco & ":" & toto & ")"
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"jean" news:

Bonjour,
J'essaie de faire une macro VBA pour réaliser des
moyennes mobiles sur base de variables :

Sub moy()
' création en e50 de la formule de moy.mob. selon les param en e1 et
f1
Dim coco As String, toto As String
' en E1 j'ai construit la première variable soit D50
' en F1 la deuxième variale soit D58
' dans la formule je veux faire = moyenne(d50:d58)
coco = [e1]
toto = [f1]
Range("e50").Select
ActiveCell.Formula = "=average(coco & ":" & toto)" ' mais ici ça
coince
????
End Sub

merci pour votre aide

--
merci ... bises à +





Caetera
Le #19894611
"jean"

T'as déjà posé la question le 06/08/09 à 10:53
T'as déjà eu largement des réponses !
On en fait quoi ?

Etc
jean
Le #19894811
Bonjour Isabelle et Philippe,

Merci pour vos messages... j'avais déja essayé cette instruction mais elle
n'est pas acceptée ... je reçois en retour un message " erreur de compilation
- erreur de syntaxe " !!!!!
what's wrong ?

Range("e50").formula="=average("&coco&":"&toto&")"


Mettre l'adresse de C50 en une ou deux fois ne change rien...version
Isabelle ou Philippe...
Zavez une idée ?
Merci

--
merci ... bises à +


"isabelle" a écrit :

bonjour Jean,

si c'est bien des références adresse qu'il y a en E1 et F1
il faut corriger comme ceci ;

ActiveCell.Formula = "=average(" & coco & ":" & toto & ")"

isabelle

jean a écrit :
> Bonjour,
> J'essaie de faire une macro VBA pour réaliser des
> moyennes mobiles sur base de variables :
>
> Sub moy()
> ' création en e50 de la formule de moy.mob. selon les param en e1 et f1
> Dim coco As String, toto As String
> ' en E1 j'ai construit la première variable soit D50
> ' en F1 la deuxième variale soit D58
> ' dans la formule je veux faire = moyenne(d50:d58)
> coco = [e1]
> toto = [f1]
> Range("e50").Select
> ActiveCell.Formula = "=average(coco & ":" & toto)" ' mais ici ça coince
> ????
> End Sub
>
> merci pour votre aide
>
>



jean
Le #19894841
Sorry si plusieurs messages sont partis sur ce sujet.. en fait à plusieurs
reprises j'ai essayé d'envoyer ma question mais la boite d'envoi m'affichait
une page blanche avec le message " je ne sais plus quoi momentanément
indisponible, veuillez réessayer plus tard"... ?

--
merci ... bises à +


"Caetera" a écrit :


"jean"

T'as déjà posé la question le 06/08/09 à 10:53
T'as déjà eu largement des réponses !
On en fait quoi ?

Etc





isabelle
Le #19894981
bonjour Jean,

il y a une différence entre :

Range("e50").Formula = "=average(" & coco & ":" & toto & ")"
et

Range("e50").formula="=average("&coco&":"&toto&")"

les espaces sont important, est ce que tu les mets ?

isabelle

jean a écrit :
Bonjour Isabelle et Philippe,

Merci pour vos messages... j'avais déja essayé cette instruction mais elle
n'est pas acceptée ... je reçois en retour un message " erreur de compilation
- erreur de syntaxe " !!!!!
what's wrong ?

Range("e50").formula="=average("&coco&":"&toto&")"


Mettre l'adresse de C50 en une ou deux fois ne change rien...version
Isabelle ou Philippe...
Zavez une idée ?
Merci




Publicité
Poster une réponse
Anonyme