copie d'une cellule spéciale vba

[jeromestas]

Bonjour


j'ai réussi grâce à votre aide de pouvoir écrire dans une cellule des éléments provennant d'un autre classeur.

J'ai tout d'abord appliquer la notion de liste de zone déroulante. Celle-ci me permettant de sélectionné une plage de nom dans un classeur X.

Tous les éléments possédant plusieur infos; il me fallait pouvoir écrire dans d'autres cellules de mon classeur des élément de la m^me ligne que celui-ci sélectionné dans mon combobox.

Chose faite au moyen de la fonction : décaler[/I.


Ma question est la suivante.

Je n'arrive pas à effectuer une copie du contenu d'une cellule contenant cette formule on dirait qu'il modifie la formule. Il est vrai que j'essaye d'utiliser le vba.

voici la formule présente dans mon premier classeur cellule E6:

=DECALER(contactbiorem;K2-1;0;1;1)

ou contact biorem est ma liste dans un autre classeur.

je ne serai pas vous mettre les fichiers en annexe car ils sont trop gros.

Si quelqu'un désire les recevoirs je peux vous les envoyer par email.

Voilà


merci à vous

😱

 

[Catrice]

Re : copie d'une cellule spéciale vba

Bonjour,

Tu n'arrives pas à faire quoi exactement ?
Il ne se pase rien ou le résultat n'est pas celui attendu ?
Tu veux copier la valeur ou la formule ?

Tu peux mettre ta formule dans un fichier vierge avec 3 ou 4 données pour illustrer ce que tu veux faire et le poster.

Par exemple :
Range("A1") = Range("B10") .Value
Permet de copier la valeur renvoyée par une formule en B10 dans la cellule A1.

 

[job75]

Re : copie d'une cellule spéciale vba

bonjour jeromestas, Catrice,

Votre plage étant définie dans un autre classeur (par exemple Classeur1.xls), il faut qu'Excel puisse toujours la retrouver, donc essayez la formule :

=DECALER(Classeur1.xls!contactbiorem;K2-1;0;1;1)

A+

 

[jeromestas]

Re : copie d'une cellule spéciale vba

bonjour jeromestas, Catrice,

Votre plage étant définie dans un autre classeur (par exemple Classeur1.xls), il faut qu'Excel puisse toujours la retrouver, donc essayez la formule :

=DECALER(Classeur1.xls!contactbiorem;K2-1;0;1;1)

A+

impéccable

je l'ai même amélioré :
=DECALER(Classeur1.xls!contactbiorem;[ttotos.xls]Feuil1!K2-1;0;1;1)


y aurait'il moyen de dynamiser cette fourmule lors d'un applel de module ( macro).

quelqu'un connaitrait il l'équivalent vba cette formule.

merci à vous

 

[job75]

Re : copie d'une cellule spéciale vba

Bonsoir jeromestas,

1) je ne comprends pas trop l'intérêt qu'il y a à copier cette formule (qui se trouve à l'origine dans [ttotos.xls]Feuil1!E6). Pourquoi ne pas écrire tout simplement :

=[ttotos.xls]Feuil1!E6 ?????

2) Si vous voulez absolument entrer la formule par VBA en E6 de Feuil2, utilisez le code :

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

ou si vous préférez simplifier :

Sheets("Feuil2").Range("E6").FormulaLocal = "=[ttotos.xls]Feuil1!E6"

A+