echap focus

[Evelynetfrancois]

Bonjour le forum
voici ma question :
Quelle ligne de macro permet de quitter le focus d une celulle en restant sur cette celulle ?
(a part par exemple offset droite puis gauche)
merci d'avance pour vos idées , soluces
bonne journée à tous
E et F

 

[mutzik]

Re : echap focus

bonjour,

que dit l'enregistreur de macros ?

 

[Pierrot93]

Re : echap focus

Bonjour EvelyneEtFrancois, Bertrand

je ne comprends pas trop la question, que veux tu faire exactement, peux tu préciser, car à moins de sélectionner un objet présent sur la feuille... vois pas trop...

bonne journée
@+

 

[Orodreth]

Re : echap focus

Bonjour E & F, Mutzik, le fil, le forum, Edit: salut Pierrot

Je me trompe peut-être, mais il me semble que la seule manière de perdre e focus pour une cellule, c'est qu'elle soit déselectionnée.

Mais tu dois pouvoir contourner le problème avec ce code:

Dim CelSource as Range
Set CelSource = activecell
[COLOR="SeaGreen"]'Ton code de traitement sur la cellule suivante/précédente/etc etc[/COLOR]
CelSource.select [COLOR="seagreen"]'ce qui lui rend le focus après tes traitements[/COLOR]

A vérifier, en espérant que ça t'aide.

Cordialement,
Thomas

 

[Evelynetfrancois]

Re : echap focus

merci pour votre intervention
j essaye d expliquer ;
voila , lorsque l on clic sur une celulle, le focus clignote à l interieur.
lorsque l on fait : "touche echap" , la celulle est active mais sans le clignottement du focus à l interieur

l enregistreur ne donne rien !!

je cherche a faire ce "Echap" en macro

j espere etre comprehensible!!

merci

E et F

 

[Orodreth]

Re : echap focus

.select ou .activate, ça ne fonctionne pas ? 😵

 

[mutzik]

Re : echap focus

re,

peut-etre en faisant un sendkeys({ESC}) (à tester)

 

[Pierrot93]

Re : echap focus

Re

en principe c'est par double click que l'on rentre à l'intérieure d'une cellule ou via la barre de formule, tu rentres dans ta cellules via une macro ?

 

[Evelynetfrancois]

Re : echap focus

merci a vous tous
sendkeys({ESC}) me met carractere invalide !!!
Oui pierrot (bonjour) je double clic dans la celulle pour avoir le focus dedans ,
mais comment en resortir par macro ?
sur le clavier : echap le fait trés bien !!
E et F

 

[Pierrot93]

Re : echap focus

Re

essaye peut être avec une macro événementielle alors, annul l'effet du double click, à placer dans le module de feuille concernée.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
End Sub

@+

 

[Evelynetfrancois]

Re : echap focus

re pierrot
bien non malheureusement j avais deja tenté le cancel true
je continu a chercher ................. grrrrrrr !!
merci beaucoup
E et F

 

[Pierrot93]

Re : echap focus

Re

comprends pas, chez moi cela fonctionne lorsque je double click dans une cellule de la feuille...

@+

 

[Evelynetfrancois]

Re : echap focus

pierrot
rien ne vaut un petit exemple
merci
E et F

 

[Pierrot93]

Re : echap focus

Re

modifies ton code comme suit, chez moi cela fonctionne (excel 2003)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
UserForm1.Show
Cancel = True
End Sub

bon après midi
@+

Edition, tu peux mettre le cancel avant le chargement de l'USF.

 

[Evelynetfrancois]

Re : echap focus

MERCI PIERROT C EST SUPER
en fait j avais mis le cancel true à la fin de la macro de mon USF et non pas à la fin de Private Sub Worksheet_BeforeDoubleClick
Sur que ca marché chez toi !!!!
encore un grand merci
bonne soirée
E et F
ps : excuse moi pour ce temp de reaction mais j ai du filer