OVH Cloud OVH Cloud

fonction

5 réponses
Avatar
mfbozo
Bonsoir =E0 tous et merci beaucoup d'avance.
je voudrais rentrer une fonction avec comme argument la=20
cellule elle-m=EAme, qui accepte ensuite l'entr=E9e de donn=E9es=20
dedans.

Ex : la fonction =3DGAUCHE(?,3).

quand je rentre "michel" dans cette cellule, je voudrais=20
que cela affiche automatiquement mic.
que mettre comme symbole =E0 la place du point=20
d'interrogation ?
encore merci et bonne soir=E9e.

5 réponses

Avatar
garnote
Bonsoir mfbozo,

Si une telle chose est possible, je tombe en bas de ma chaise !

;-)))

Serge

"mfbozo" a écrit dans le message de news:
034901c3a251$caba8d20$
Bonsoir à tous et merci beaucoup d'avance.
je voudrais rentrer une fonction avec comme argument la
cellule elle-même, qui accepte ensuite l'entrée de données
dedans.

Ex : la fonction =GAUCHE(?,3).

quand je rentre "michel" dans cette cellule, je voudrais
que cela affiche automatiquement mic.
que mettre comme symbole à la place du point
d'interrogation ?
encore merci et bonne soirée.
Avatar
Philippe.R
Bonsoir Michel,

A défaut de fonction et pour ne pas nuire à la santé de Serge, tu pourrais contourner avec ces lignes :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveCell.Value = Left(ActiveCell.Value2, 3)

End Sub

à coller dans le module de feuille en ayant pris soin de décocher "déplacer la selection" dans l'onglet
général de outils / options
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"mfbozo" a écrit dans le message de
news:034901c3a251$caba8d20$
Bonsoir à tous et merci beaucoup d'avance.
je voudrais rentrer une fonction avec comme argument la
cellule elle-même, qui accepte ensuite l'entrée de données
dedans.

Ex : la fonction =GAUCHE(?,3).

quand je rentre "michel" dans cette cellule, je voudrais
que cela affiche automatiquement mic.
que mettre comme symbole à la place du point
d'interrogation ?
encore merci et bonne soirée.
Avatar
garnote
;-)))

Santé !

"Philippe.R" a écrit dans le message de news:

Bonsoir Michel,

A défaut de fonction et pour ne pas nuire à la santé de Serge, tu pourrais
contourner avec ces lignes :


Private Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveCell.Value = Left(ActiveCell.Value2, 3)

End Sub

à coller dans le module de feuille en ayant pris soin de décocher
"déplacer la selection" dans l'onglet

général de outils / options
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"mfbozo" a écrit dans le message de
news:034901c3a251$caba8d20$
Bonsoir à tous et merci beaucoup d'avance.
je voudrais rentrer une fonction avec comme argument la
cellule elle-même, qui accepte ensuite l'entrée de données
dedans.

Ex : la fonction =GAUCHE(?,3).

quand je rentre "michel" dans cette cellule, je voudrais
que cela affiche automatiquement mic.
que mettre comme symbole à la place du point
d'interrogation ?
encore merci et bonne soirée.




Avatar
AV
je voudrais rentrer une fonction avec comme argument la
cellule elle-même, qui accepte ensuite l'entrée de données
dedans.


Si tu entres une valeur dans une cellule contenant une formule, tu "écrases"
évidemment la formule !

Si tu veux que ta saisie dans une cellule, se transforme en "autre chose" à la
validation, il faut utiliser l'évènement "Worksheet_Change"
Exemple (à mettre dans le module de la feuille) pour une saisie en A1 :

Private Sub Worksheet_Change(ByVal zz As Range)
If zz.Address <> "$A$1" Then Exit Sub
Application.EnableEvents = False
zz = Left(zz, 3)
Application.EnableEvents = True
End Sub

AV

Avatar
merci beaucoup. je vais tester cela de suite.
à+

-----Message d'origine-----
Bonsoir à tous et merci beaucoup d'avance.
je voudrais rentrer une fonction avec comme argument la
cellule elle-même, qui accepte ensuite l'entrée de
données

dedans.

Ex : la fonction =GAUCHE(?,3).

quand je rentre "michel" dans cette cellule, je voudrais
que cela affiche automatiquement mic.
que mettre comme symbole à la place du point
d'interrogation ?
encore merci et bonne soirée.
.