équivalent fonction décaler excel en VBA

bonjour voici la fonction "Decaler" que j'utilise dans une cellule.

Vous remarquerez qu'elle est assez complexe du à son appel dans un autre classeur.

Code:

---

=DECALER(ttotos.xls!contactbiorem;[ttotos.xls]Feuil1!K2-1;0;1;1)

---

pourriez vous me dire comment traduire cette fonction en vba sachant qu'elle serait appelé dans un module que je déclarerais .

en vous remerciant d'avance

fais la avec l'enregistreur de macro. c'est le plus simple pour avoir la base.

et encore une fois... (va falloir mettre ce truc dans la faq à force)
c:\program files\microsoft office\officexx\1036\vbalist.xls

hum; j'en doute pas, parce que moi, je sais pas de quoi tu parle.moi apres microsoftoffice/ j'ai : document theme12 ; média ; office12 ; et template qui est effectivement suivi de 1036 mais qui contient : FAx ; et one note (j'ai le 2007 ).

Citation:

---

Envoyé par Maxence HUBICHE

et encore une fois... (va falloir mettre ce truc dans la faq à force)
c:\program files\microsoft office\officexx\1036\vbalist.xls

---

:koi: http://vb.developpez.com/faqvba/inde...nslatefunction

ok alors, il existe bien chez moi sur ce chemin
C:\Program Files\Microsoft Office\Office12\1036\vbalist.xls
merci

Pour répondre à jstas, c'est quand même le but de la discussion :mouarf:

vas falloir que tu nous en dise plus sur tes intentions .?

que veux tu faire :

1. Ecrire (dans une cellule ) en VBA ta formule décaler .?
   Effectuer en VBA le même calcul que cette formule pour utiliser son résultat dans ton code ?
   ...

Citation:

---

Envoyé par alsimbad

hum; j'en doute pas, parce que moi, [...] apres microsoftoffice/ j'ai [...] office12

---

Cool !
Plus qu'à aller voir Office12/1036 ;)

Citation:

---

Envoyé par JackOuYA

:koi: http://vb.developpez.com/faqvba/inde...nslatefunction

---

Ben, là, on est dans Excel... donc le mettre dans la FAQ Excel serait un bien non ?

Code:

---

1 2	TaCellule.Formula="=OFFSET(ttotos.xls!contactbiorem,[ttotos.xls]Feuil1!K2-1,0,1,1)"

---

ou

Code:

---

1 2	TaCellule.FormulaLocal="=DECALER(ttotos.xls!contactbiorem;[ttotos.xls]Feuil1!K2-1;0;1;1)"

---

devraient fonctionner (quand tu auras mis une référence correcte à la place de TaCellule

Citation:

---

Envoyé par Maxence HUBICHE

Cool !
Plus qu'à aller voir Office12/1036 ;)
Ben, là, on est dans Excel... donc le mettre dans la FAQ Excel serait un bien non ?

---

il y as juste l'auteur qui change :
http://excel.developpez.com/faq/inde...ctionFonctions
:roll:

oulalaaah !
Va falloir que j'arrête l'Irish Coffee moi... ou alors que je commence à mettre le Coffee dedans :lol:

Citation:

---

Envoyé par JackOuYA

Pour répondre à jstas, c'est quand même le but de la discussion :mouarf:

vas falloir que tu nous en dise plus sur tes intentions .?

que veux tu faire :

1. Ecrire (dans une cellule ) en VBA ta formule décaler .?
   Effectuer en VBA le même calcul que cette formule pour utiliser son résultat dans ton code ?
   ...

---

merci à vous tous mais il me semble que certains de vos lien office10.... ne correspondent pas vraiment au lien de mon architecture software. DE plus je ne savais pas quoi chercher....

Pour répondre à la question de JackOuYA .
Ecrire (dans une cellule ) en VBA ma formule décaler .

je test quand même la structure émise en réponse.

merci à vous tous je vous tiens au courant:mrgreen:

bon c'est toujours pas clair pour moi ... mais tu peu faire :
pour mettre ta formule dans la cellule D1 de la feuille active :

Code:

---

Range("D1").FormulaLocal = "=DECALER(ttotos.xls!contactbiorem;[ttotos.xls]Feuil1!K2-1;0;1;1)"

---