Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1289 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  prob Variable et fonction moyenne

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

prob Variable et fonction moyenne

n°890308
jeradam
Posté le 04-11-2004 à 15:57:53  profilanswer
 

j'ai enregistré une macro comme celle-ci:  
 
ActiveCell.FormulaR1C1 = "=AVERAGE(RC[-4]:RC[-1])"
 Selection.AutoFill Destination:=Range("G6:G52" ), Type:=xlFillDefault
 Range("G6:G52" ).Select
 
je voudrais la modifier pour y ajouter des variables mais j'ai des pitit probleme!
je voudrais avoir ça:
 
Sheets("tableau" ).Cells(6, 4 + 2 * x).Select
ActiveCell.FormulaR1C1 = "=AVERAGE(RC[-x]:RC[-1])"
Selection.AutoFill Destination:=Range(Cells(6, 4 + 2 * x), Cells(6 + y, 4+ 2 * x)), Type:=xlFillDefault
 
X et y sont des valeurs égal à une valeur que je mets dans 2 cases d'une feuille
 
qq'un peut m'aider svp?

mood
Publicité
Posté le 04-11-2004 à 15:57:53  profilanswer
 

n°890389
Arjuna
Aircraft Ident.: F-MBSD
Posté le 04-11-2004 à 17:30:31  profilanswer
 

ActiveCell.FormulaR1C1 = "=AVERAGE(RC[" & cstr(-x) & "]:RC[-1])"

n°890458
jeradam
Posté le 04-11-2004 à 18:12:38  profilanswer
 

  Cells(6, 4 + 2 * x).Select
    ActiveCell.FormulaR1C1 = "=AVERAGE(RC[" & CStr(-x) & "]:RC[-1])"
    Selection.AutoFill Destination:=Cells(6 + CStr(y), 4 + 2 * CStr(x)), Type:=xlFillDefault
 
merci alors j'ai fais ça maintenant mais la dernière ligne ne marche toujours pas (j'ai l'idée de faire une boucle avec un "for...to" mais y'a pas plus simple?

n°890523
Arjuna
Aircraft Ident.: F-MBSD
Posté le 04-11-2004 à 19:20:23  profilanswer
 

Selection.AutoFill "Cells(6 + " & CStr(y) & ", 4 + 2 * " & CStr(x) & " )", xlFillDefault
 
PS: j'ai un doute sur la syntaxe de la méthode autofill, que je n'ai jamais utilisé... c'est quoi ?
 
je ne suis pas familier avec les truc:=machin je ne sais pas trop à quoi ça correspond en VB, normalement on n'utilise pas cette syntaxe, et je suis un peu perdu :)


Message édité par Arjuna le 04-11-2004 à 19:21:12
n°890572
jeradam
Posté le 04-11-2004 à 20:09:40  profilanswer
 

Selection.AutoFill c'est la fonction que créé la macro quand tu fais une formule puis tu clique en bas à droite de la cellule et tu descend (s'a incremente ta formule au fur et à mesure)
Ex:
A1=(A2+A3)/2
B1=(B2+B3)/2
C1=(C2+C3)/2....

n°890596
Arjuna
Aircraft Ident.: F-MBSD
Posté le 04-11-2004 à 20:41:08  profilanswer
 

ha ok

n°890665
jeradam
Posté le 04-11-2004 à 21:24:26  profilanswer
 

t'as vu ton mail? j't'en ai envoyé un

n°890814
Arjuna
Aircraft Ident.: F-MBSD
Posté le 04-11-2004 à 23:23:17  profilanswer
 

nope, tu l'as envoyé où ? :)

n°890977
jeradam
Posté le 05-11-2004 à 08:39:20  profilanswer
 

ici: sylvain.devidal@med.ge.com

n°891027
jeradam
Posté le 05-11-2004 à 10:04:08  profilanswer
 

j'ai trouvé une solution assez simple, j'ai fait ça:
For i = 1 To y + 1
  Cells(5 + i, 9 + 7 * x).Select
 ActiveCell.FormulaR1C1 = "=AVERAGE(RC[" & CStr(-x) & "]:RC[-1])"
 Next i

mood
Publicité
Posté le 05-11-2004 à 10:04:08  profilanswer
 

n°891315
Arjuna
Aircraft Ident.: F-MBSD
Posté le 05-11-2004 à 15:10:14  profilanswer
 

OK :)
 
désolé, j'ai vu ton mail ce matin, mais je ne l'ai même pas ouvert. On est en plein migration d'un tas d'outils au boulot, et ça se passe assez mal, du coup je disparais sous les problèmes et bugs divers... :sweat:


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  prob Variable et fonction moyenne

 

Sujets relatifs
gros pb avec la fonction mail ... helpfonction mail() -> adresse du messager[resolu]
Récupérer variable dans fichier textePlusieurs valeurs pour une variable
Probleme fonction et tableau d'objet[BATCH] fichier txt et variable
variable numérique et affectation aléatoire[wsh - vbs]Comment appeler une fonction externe?
Flash/Php Modification Variable[Javascript] Problème de récupération de variable dans un menu dynamiq
Plus de sujets relatifs à : prob Variable et fonction moyenne


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR