OVH Cloud OVH Cloud

report résultat dans une cellule

11 réponses
Avatar
Zoltan
Salut à tous,
comment rapporter le résultat d'une cellule dans une autre?
par exemple j'ai une cellule en C8 dans laquelle j'entre de sommes
en euros, le problème c'est que j'ai parfois des sommes en Francs,
j'ai alors fait un convertisseur, j'entre les Francs en C12, ils sont
convertis en euros en C14
et je voudrais le rapporter en C8

comment faire en fait pour que une fois la cellule C12 validée,
le résultat de C14 se reporte ?

merci de vos conseils

10 réponses

1 2
Avatar
Ellimac
Salut Zoltan,

A mettre dans le code de la feuille concernée :

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address <> "$C$12" Then Exit Sub
[c8] = [c14]
End Sub

Camille

-----Message d'origine-----
Salut à tous,
comment rapporter le résultat d'une cellule dans une
autre?

par exemple j'ai une cellule en C8 dans laquelle j'entre
de sommes

en euros, le problème c'est que j'ai parfois des sommes
en Francs,

j'ai alors fait un convertisseur, j'entre les Francs en
C12, ils sont

convertis en euros en C14
et je voudrais le rapporter en C8

comment faire en fait pour que une fois la cellule C12
validée,

le résultat de C14 se reporte ?

merci de vos conseils


.



Avatar
Zoltan
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address <> "$C$12" Then Exit Sub
[c8] = [c14]
End Sub

ok, je viens d'essayer et quand je valide la macro plante
et le débogueur affiche :
[c8] = [c14]

en jaune ??


Avatar
Zoltan
copier...collage spécial/valeur


ben non, parce que s'il faut faire à chaque opération un copier
collage spécial valeur, autant entrer le chiffre à la main


merci quand même

Avatar
Zoltan
ok, ça marche, ma cellule de résultat n'était pas "C8" mais "B8"
et la "C8" était protégée en écriture,
donc tout est ok
autant pour moi,

merci beaucoup bonne journée
Avatar
Starwing
Je ne veux pas me mêler de ce qui me regarde pas, mais
n'aurait-il pas fallu plutôt metttre cette formule dans
une cellule pour simplifier?

ÎLLULE("contenu";cellule en question)

Starwing
-----Message d'origine-----
Salut Zoltan,

A mettre dans le code de la feuille concernée :

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address <> "$C$12" Then Exit Sub
[c8] = [c14]
End Sub

Camille

-----Message d'origine-----
Salut à tous,
comment rapporter le résultat d'une cellule dans une
autre?

par exemple j'ai une cellule en C8 dans laquelle j'entre
de sommes

en euros, le problème c'est que j'ai parfois des sommes
en Francs,

j'ai alors fait un convertisseur, j'entre les Francs en
C12, ils sont

convertis en euros en C14
et je voudrais le rapporter en C8

comment faire en fait pour que une fois la cellule C12
validée,

le résultat de C14 se reporte ?

merci de vos conseils


.

.





Avatar
Ellimac
Bonjour,

Le problème est que Zoltan veut pouvoir saisir soit en C8
soit en C12 donc il ne peut pas y avoir de formule en C8.
Sinon on aurait mis en C8 "Á4".

Camille
-----Message d'origine-----
Je ne veux pas me mêler de ce qui me regarde pas, mais
n'aurait-il pas fallu plutôt metttre cette formule dans
une cellule pour simplifier?

ÎLLULE("contenu";cellule en question)

Starwing
-----Message d'origine-----
Salut Zoltan,

A mettre dans le code de la feuille concernée :

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address <> "$C$12" Then Exit Sub
[c8] = [c14]
End Sub

Camille

-----Message d'origine-----
Salut à tous,
comment rapporter le résultat d'une cellule dans une
autre?

par exemple j'ai une cellule en C8 dans laquelle
j'entre



de sommes
en euros, le problème c'est que j'ai parfois des sommes
en Francs,

j'ai alors fait un convertisseur, j'entre les Francs en
C12, ils sont

convertis en euros en C14
et je voudrais le rapporter en C8

comment faire en fait pour que une fois la cellule C12
validée,

le résultat de C14 se reporte ?

merci de vos conseils


.

.


.






Avatar
Zoltan
Le problème est que Zoltan veut pouvoir saisir soit en C8
euh "B8"
yé mé souis trompé ;-))


et tout va bien sauf que maintenant j'aimerais bien aussi que
le résultat aille en "B8" mais aussi en "E8"

et c'est pourtant pas la bataille navale,
peut être faire :

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address <> "$C$12" Then Exit Sub
[b8]:[e8] = [c14]
End Sub

non?

Avatar
Zoltan
Il faut 2 lignes d'instructions :
[b8] = [c14]
[e8] = [c14]

ok, ça roule
ah que c'est beau Excel !
j'aime de plus en plus,
sauf pour mon problème de Matchentry = 1
qui plante Excel :-(((
Avatar
AV
[b8]:[e8] = [c14]


Une petite erreur de syntaxe !
Corrigée : [B8, E8] = [C14]

AV

Avatar
Zoltan
Une petite erreur de syntaxe !
Corrigée : [B8, E8] = [C14]
ok, mais

[b8] = [c14]
[e8] = [c14]

ça fonctionnait aussi,
mais c'est vrai que [B8, E8] = [C14]
c'est mieux

1 2