Y aurait-il parmi les grands sp=E9cialistes d'Excel=20
quelqu'un qui aurait la solution =E0 mon probl=E8me?
Ne pouvant pas mettre de fichier sur le forum merci de=20
regarder le lien
http://www.excel-
downloads.com/html/French/forum/messages/1_101898_101898.h
tm
pour avoir tous les d=E9tails.
Cependant graphiquement ta solution était un peu mieux. Un grand Merc quand même et ne soit pas vexé.
-----Message d'origine----- Ok Nicolas
C'est tout l'avantage d'avoir plusieurs solutions : Pouvoir choisir ;-))
j-p
.
nicolas65
Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait qu'à 99,9% . En effet elle est assez lourde puisque pour sortir du userform il faut cliquer sur masquer ou sur la croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_101898. h
tm pour avoir tous les détails.
Merci
.
Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait
qu'à 99,9% . En effet elle est assez lourde puisque pour
sortir du userform il faut cliquer sur masquer ou sur la
croix.
J'aurais souhaité que le Userform soit "transparent"
c'est à dire que pour le masquer il suffise de déplacer
le curseur par les touches de tabulations par exemple ou
en tapant sur les flèches de déplacement du curseur.
Pour moi le bouton Masquer n'a qu'une utilité limitée.
Nouvelle version du fichier corrigé accessible à:
Merci
-----Message d'origine-----
Bonjour, dans ta boîte,
je t'ai envoyé ton fichier modifié avec un userform qui
fera ce que tu
demandes.
Amicalement
Sitting Hoax
"nicolas65" <anonymous@discussions.microsoft.com> a
écrit dans le message de
Y aurait-il parmi les grands spécialistes d'Excel
quelqu'un qui aurait la solution à mon problème?
Ne pouvant pas mettre de fichier sur le forum merci de
regarder le lien
http://www.excel-
downloads.com/html/French/forum/messages/1_101898_101898.
h
Fichier bien reçu et testé Cette solution ne me satisfait qu'à 99,9% . En effet elle est assez lourde puisque pour sortir du userform il faut cliquer sur masquer ou sur la croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_101898. h
tm pour avoir tous les détails.
Merci
.
JpPradier
Non, non, pas vexé du tout. Et puis un deuxième avantage d'avoir plusieurs solutions : tu peux piocher dans chacune ce qui t'interesse pour te faire ta propre solution.
j-p
"nicolas 65" wrote in message news:2d43601c469a9$d1397650$ Cependant graphiquement ta solution était un peu mieux. Un grand Merc quand même et ne soit pas vexé.
-----Message d'origine----- Ok Nicolas
C'est tout l'avantage d'avoir plusieurs solutions : Pouvoir choisir ;-))
j-p
.
Non, non, pas vexé du tout. Et puis un deuxième avantage d'avoir plusieurs solutions : tu peux
piocher dans chacune ce qui t'interesse pour te faire ta propre solution.
j-p
"nicolas 65" <anonymous@discussions.microsoft.com> wrote in message
news:2d43601c469a9$d1397650$a301280a@phx.gbl...
Cependant graphiquement ta solution était un peu mieux.
Un grand Merc quand même et ne soit pas vexé.
-----Message d'origine-----
Ok Nicolas
C'est tout l'avantage d'avoir plusieurs solutions :
Pouvoir choisir ;-))
Non, non, pas vexé du tout. Et puis un deuxième avantage d'avoir plusieurs solutions : tu peux piocher dans chacune ce qui t'interesse pour te faire ta propre solution.
j-p
"nicolas 65" wrote in message news:2d43601c469a9$d1397650$ Cependant graphiquement ta solution était un peu mieux. Un grand Merc quand même et ne soit pas vexé.
-----Message d'origine----- Ok Nicolas
C'est tout l'avantage d'avoir plusieurs solutions : Pouvoir choisir ;-))
j-p
.
Sitting Hoax \(BM\)
salut, comme disait Flo, j'en reçois aussi parfois signé de moi même. Pourtant, j'ai bien scanné mon ordi avec scuser, aucun virus ne m'infectant. Inexplicable:-( Amicalement Sitting Hoax "JpPradier" a écrit dans le message de news:%23%
Bonjour Laurent
Je viens de recevoir un mail de ta part que Norton m'a signalé comme virus ?!
j-p
salut,
comme disait Flo, j'en reçois aussi parfois signé de moi même.
Pourtant, j'ai bien scanné mon ordi avec scuser, aucun virus ne m'infectant.
Inexplicable:-(
Amicalement
Sitting Hoax
"JpPradier" <jp.pradier.JVeuxPasDeSpam@wanadoo.fr> a écrit dans le message
de news:%23%23f924ZaEHA.1248@TK2MSFTNGP11.phx.gbl...
Bonjour Laurent
Je viens de recevoir un mail de ta part que Norton m'a signalé comme virus
?!
salut, comme disait Flo, j'en reçois aussi parfois signé de moi même. Pourtant, j'ai bien scanné mon ordi avec scuser, aucun virus ne m'infectant. Inexplicable:-( Amicalement Sitting Hoax "JpPradier" a écrit dans le message de news:%23%
Bonjour Laurent
Je viens de recevoir un mail de ta part que Norton m'a signalé comme virus ?!
j-p
J-Dan
salut Nicolas,
dans le fichier que je t'ai envoye tout a l'heure, l'as tu recu ? tu peux modifier les procedures Private Sub Worksheet_SelectionChange(ByVal Target As Range) en ajoutant une ligne pour que le Userform disparaisse des que tu cliques sur une cellule hors colonne B (ou vide) :
If Target.Column <> 2 Or Target.Row < 7 Or Target.Value = "" Then UserForm1.Hide Exit Sub: End If
En ce qui concerne la possibilite de travailler au clavier sur une feuille quand un UserForm est affiche .... lance un appel aux pros de chez Pro (attention, un jour de fete, ca doit banquer ;-)))
bon courage
-----Message d'origine----- Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait
qu'à 99,9% . En effet elle est assez lourde puisque pour sortir du userform il faut cliquer sur masquer ou sur la croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_101898 .
h
tm pour avoir tous les détails.
Merci
.
.
salut Nicolas,
dans le fichier que je t'ai envoye tout a l'heure, l'as
tu recu ? tu peux modifier les procedures
Private Sub Worksheet_SelectionChange(ByVal Target As
Range) en ajoutant une ligne pour que le Userform
disparaisse des que tu cliques sur une cellule hors
colonne B (ou vide) :
If Target.Column <> 2 Or Target.Row < 7 Or Target.Value
= "" Then
UserForm1.Hide
Exit Sub: End If
En ce qui concerne la possibilite de travailler au
clavier sur une feuille quand un UserForm est
affiche .... lance un appel aux pros de chez Pro
(attention, un jour de fete, ca doit banquer ;-)))
bon courage
-----Message d'origine-----
Merci Laurent
Fichier bien reçu et testé Cette solution ne me
satisfait
qu'à 99,9% . En effet elle est assez lourde puisque pour
sortir du userform il faut cliquer sur masquer ou sur la
croix.
J'aurais souhaité que le Userform soit "transparent"
c'est à dire que pour le masquer il suffise de déplacer
le curseur par les touches de tabulations par exemple ou
en tapant sur les flèches de déplacement du curseur.
Pour moi le bouton Masquer n'a qu'une utilité limitée.
Nouvelle version du fichier corrigé accessible à:
Merci
-----Message d'origine-----
Bonjour, dans ta boîte,
je t'ai envoyé ton fichier modifié avec un userform qui
fera ce que tu
demandes.
Amicalement
Sitting Hoax
"nicolas65" <anonymous@discussions.microsoft.com> a
écrit dans le message de
Y aurait-il parmi les grands spécialistes d'Excel
quelqu'un qui aurait la solution à mon problème?
Ne pouvant pas mettre de fichier sur le forum merci de
regarder le lien
http://www.excel-
downloads.com/html/French/forum/messages/1_101898_101898
.
dans le fichier que je t'ai envoye tout a l'heure, l'as tu recu ? tu peux modifier les procedures Private Sub Worksheet_SelectionChange(ByVal Target As Range) en ajoutant une ligne pour que le Userform disparaisse des que tu cliques sur une cellule hors colonne B (ou vide) :
If Target.Column <> 2 Or Target.Row < 7 Or Target.Value = "" Then UserForm1.Hide Exit Sub: End If
En ce qui concerne la possibilite de travailler au clavier sur une feuille quand un UserForm est affiche .... lance un appel aux pros de chez Pro (attention, un jour de fete, ca doit banquer ;-)))
bon courage
-----Message d'origine----- Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait
qu'à 99,9% . En effet elle est assez lourde puisque pour sortir du userform il faut cliquer sur masquer ou sur la croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_101898 .
h
tm pour avoir tous les détails.
Merci
.
.
Sitting Hoax \(BM\)
Bonjour, ajoute ceci dans la macro du bouton
Private Sub UserForm_Initialize() CommandButton1.SetFocus 'dans le module de ThisWorkbook
Private Sub Workbook_SheetSelectionChange _ (ByVal Sh As Object, ByVal Target As Range) ligne = Cells(ActiveCell.Row, 2).Value If ActiveCell.Column = 2 Then Application.ScreenUpdating = False Workbooks("Base chevaux2.xls").Activate Columns(1).Select Selection.Find(What:=ligne, After:¬tiveCell, LookIn:= _ xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection: _ xlNext, MatchCase:úlse).Activate Application.ScreenUpdating = True UserForm1.Show Workbooks("Oloron3.xls").Activate End If End Sub
ça devrait suffire, en appuyant sur entrée et sur la touche de défilement vertical. Amicalement Sitting Hoax (qui part au feu d'artifice)
"nicolas65" a écrit dans le message de news:2d46b01c469ab$33e5d180$ Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait qu'à 99,9% . En effet elle est assez lourde puisque pour sortir du userform il faut cliquer sur masquer ou sur la croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_101898. h
tm pour avoir tous les détails.
Merci
.
Bonjour,
ajoute ceci dans la macro du bouton
Private Sub UserForm_Initialize()
CommandButton1.SetFocus
'dans le module de ThisWorkbook
Private Sub Workbook_SheetSelectionChange _
(ByVal Sh As Object, ByVal Target As Range)
ligne = Cells(ActiveCell.Row, 2).Value
If ActiveCell.Column = 2 Then
Application.ScreenUpdating = False
Workbooks("Base chevaux2.xls").Activate
Columns(1).Select
Selection.Find(What:=ligne, After:¬tiveCell, LookIn:= _
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection: _
xlNext, MatchCase:úlse).Activate
Application.ScreenUpdating = True
UserForm1.Show
Workbooks("Oloron3.xls").Activate
End If
End Sub
ça devrait suffire, en appuyant sur entrée et sur la touche de défilement
vertical.
Amicalement
Sitting Hoax (qui part au feu d'artifice)
"nicolas65" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:2d46b01c469ab$33e5d180$a301280a@phx.gbl...
Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait
qu'à 99,9% . En effet elle est assez lourde puisque pour
sortir du userform il faut cliquer sur masquer ou sur la
croix.
J'aurais souhaité que le Userform soit "transparent"
c'est à dire que pour le masquer il suffise de déplacer
le curseur par les touches de tabulations par exemple ou
en tapant sur les flèches de déplacement du curseur.
Pour moi le bouton Masquer n'a qu'une utilité limitée.
Nouvelle version du fichier corrigé accessible à:
Merci
-----Message d'origine-----
Bonjour, dans ta boîte,
je t'ai envoyé ton fichier modifié avec un userform qui
fera ce que tu
demandes.
Amicalement
Sitting Hoax
"nicolas65" <anonymous@discussions.microsoft.com> a
écrit dans le message de
Y aurait-il parmi les grands spécialistes d'Excel
quelqu'un qui aurait la solution à mon problème?
Ne pouvant pas mettre de fichier sur le forum merci de
regarder le lien
http://www.excel-
downloads.com/html/French/forum/messages/1_101898_101898.
h
Private Sub UserForm_Initialize() CommandButton1.SetFocus 'dans le module de ThisWorkbook
Private Sub Workbook_SheetSelectionChange _ (ByVal Sh As Object, ByVal Target As Range) ligne = Cells(ActiveCell.Row, 2).Value If ActiveCell.Column = 2 Then Application.ScreenUpdating = False Workbooks("Base chevaux2.xls").Activate Columns(1).Select Selection.Find(What:=ligne, After:¬tiveCell, LookIn:= _ xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection: _ xlNext, MatchCase:úlse).Activate Application.ScreenUpdating = True UserForm1.Show Workbooks("Oloron3.xls").Activate End If End Sub
ça devrait suffire, en appuyant sur entrée et sur la touche de défilement vertical. Amicalement Sitting Hoax (qui part au feu d'artifice)
"nicolas65" a écrit dans le message de news:2d46b01c469ab$33e5d180$ Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait qu'à 99,9% . En effet elle est assez lourde puisque pour sortir du userform il faut cliquer sur masquer ou sur la croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_101898. h
tm pour avoir tous les détails.
Merci
.
nicolas65
Bonjour le forum J'ai bien reçu ta proposition graphiquement une dès plus aboutie mais j'attends toujours les "pro". Merci
-----Message d'origine----- salut Nicolas,
dans le fichier que je t'ai envoye tout a l'heure, l'as tu recu ? tu peux modifier les procedures Private Sub Worksheet_SelectionChange(ByVal Target As Range) en ajoutant une ligne pour que le Userform disparaisse des que tu cliques sur une cellule hors colonne B (ou vide) :
If Target.Column <> 2 Or Target.Row < 7 Or Target.Value = "" Then UserForm1.Hide Exit Sub: End If
En ce qui concerne la possibilite de travailler au clavier sur une feuille quand un UserForm est affiche .... lance un appel aux pros de chez Pro (attention, un jour de fete, ca doit banquer ;-)))
bon courage
-----Message d'origine----- Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait
qu'à 99,9% . En effet elle est assez lourde puisque pour
sortir du userform il faut cliquer sur masquer ou sur la
croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou
en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui
fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_10189 8
..
h
tm pour avoir tous les détails.
Merci
.
.
.
Bonjour le forum
J'ai bien reçu ta proposition graphiquement une dès plus
aboutie mais j'attends toujours les "pro".
Merci
-----Message d'origine-----
salut Nicolas,
dans le fichier que je t'ai envoye tout a l'heure, l'as
tu recu ? tu peux modifier les procedures
Private Sub Worksheet_SelectionChange(ByVal Target As
Range) en ajoutant une ligne pour que le Userform
disparaisse des que tu cliques sur une cellule hors
colonne B (ou vide) :
If Target.Column <> 2 Or Target.Row < 7 Or Target.Value
= "" Then
UserForm1.Hide
Exit Sub: End If
En ce qui concerne la possibilite de travailler au
clavier sur une feuille quand un UserForm est
affiche .... lance un appel aux pros de chez Pro
(attention, un jour de fete, ca doit banquer ;-)))
bon courage
-----Message d'origine-----
Merci Laurent
Fichier bien reçu et testé Cette solution ne me
satisfait
qu'à 99,9% . En effet elle est assez lourde puisque
pour
sortir du userform il faut cliquer sur masquer ou sur
la
croix.
J'aurais souhaité que le Userform soit "transparent"
c'est à dire que pour le masquer il suffise de déplacer
le curseur par les touches de tabulations par exemple
ou
en tapant sur les flèches de déplacement du curseur.
Pour moi le bouton Masquer n'a qu'une utilité limitée.
Nouvelle version du fichier corrigé accessible à:
Merci
-----Message d'origine-----
Bonjour, dans ta boîte,
je t'ai envoyé ton fichier modifié avec un userform
qui
fera ce que tu
demandes.
Amicalement
Sitting Hoax
"nicolas65" <anonymous@discussions.microsoft.com> a
écrit dans le message de
Y aurait-il parmi les grands spécialistes d'Excel
quelqu'un qui aurait la solution à mon problème?
Ne pouvant pas mettre de fichier sur le forum merci de
regarder le lien
http://www.excel-
downloads.com/html/French/forum/messages/1_101898_10189
8
Bonjour le forum J'ai bien reçu ta proposition graphiquement une dès plus aboutie mais j'attends toujours les "pro". Merci
-----Message d'origine----- salut Nicolas,
dans le fichier que je t'ai envoye tout a l'heure, l'as tu recu ? tu peux modifier les procedures Private Sub Worksheet_SelectionChange(ByVal Target As Range) en ajoutant une ligne pour que le Userform disparaisse des que tu cliques sur une cellule hors colonne B (ou vide) :
If Target.Column <> 2 Or Target.Row < 7 Or Target.Value = "" Then UserForm1.Hide Exit Sub: End If
En ce qui concerne la possibilite de travailler au clavier sur une feuille quand un UserForm est affiche .... lance un appel aux pros de chez Pro (attention, un jour de fete, ca doit banquer ;-)))
bon courage
-----Message d'origine----- Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait
qu'à 99,9% . En effet elle est assez lourde puisque pour
sortir du userform il faut cliquer sur masquer ou sur la
croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou
en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui
fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_10189 8
..
h
tm pour avoir tous les détails.
Merci
.
.
.
nicolas65
Je ne sais pas ou rajouter. Peux tu me poster le fichier modifié. Merci
-----Message d'origine----- Bonjour, ajoute ceci dans la macro du bouton
Private Sub UserForm_Initialize() CommandButton1.SetFocus 'dans le module de ThisWorkbook
Private Sub Workbook_SheetSelectionChange _ (ByVal Sh As Object, ByVal Target As Range) ligne = Cells(ActiveCell.Row, 2).Value If ActiveCell.Column = 2 Then Application.ScreenUpdating = False Workbooks("Base chevaux2.xls").Activate Columns(1).Select Selection.Find(What:=ligne, After:¬tiveCell, LookIn:= _
_ xlNext, MatchCase:úlse).Activate Application.ScreenUpdating = True UserForm1.Show Workbooks("Oloron3.xls").Activate End If End Sub
ça devrait suffire, en appuyant sur entrée et sur la touche de défilement
vertical. Amicalement Sitting Hoax (qui part au feu d'artifice)
"nicolas65" a écrit dans le message de
news:2d46b01c469ab$33e5d180$ Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait qu'à 99,9% . En effet elle est assez lourde puisque pour sortir du userform il faut cliquer sur masquer ou sur la croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_101898 .
h
tm pour avoir tous les détails.
Merci
.
.
Je ne sais pas ou rajouter. Peux tu me poster le fichier
modifié.
Merci
-----Message d'origine-----
Bonjour,
ajoute ceci dans la macro du bouton
Private Sub UserForm_Initialize()
CommandButton1.SetFocus
'dans le module de ThisWorkbook
Private Sub Workbook_SheetSelectionChange _
(ByVal Sh As Object, ByVal Target As Range)
ligne = Cells(ActiveCell.Row, 2).Value
If ActiveCell.Column = 2 Then
Application.ScreenUpdating = False
Workbooks("Base chevaux2.xls").Activate
Columns(1).Select
Selection.Find(What:=ligne, After:=ActiveCell,
LookIn:= _
Fichier bien reçu et testé Cette solution ne me satisfait
qu'à 99,9% . En effet elle est assez lourde puisque pour
sortir du userform il faut cliquer sur masquer ou sur la
croix.
J'aurais souhaité que le Userform soit "transparent"
c'est à dire que pour le masquer il suffise de déplacer
le curseur par les touches de tabulations par exemple ou
en tapant sur les flèches de déplacement du curseur.
Pour moi le bouton Masquer n'a qu'une utilité limitée.
Nouvelle version du fichier corrigé accessible à:
Merci
-----Message d'origine-----
Bonjour, dans ta boîte,
je t'ai envoyé ton fichier modifié avec un userform qui
fera ce que tu
demandes.
Amicalement
Sitting Hoax
"nicolas65" <anonymous@discussions.microsoft.com> a
écrit dans le message de
Y aurait-il parmi les grands spécialistes d'Excel
quelqu'un qui aurait la solution à mon problème?
Ne pouvant pas mettre de fichier sur le forum merci de
regarder le lien
http://www.excel-
downloads.com/html/French/forum/messages/1_101898_101898
.
Je ne sais pas ou rajouter. Peux tu me poster le fichier modifié. Merci
-----Message d'origine----- Bonjour, ajoute ceci dans la macro du bouton
Private Sub UserForm_Initialize() CommandButton1.SetFocus 'dans le module de ThisWorkbook
Private Sub Workbook_SheetSelectionChange _ (ByVal Sh As Object, ByVal Target As Range) ligne = Cells(ActiveCell.Row, 2).Value If ActiveCell.Column = 2 Then Application.ScreenUpdating = False Workbooks("Base chevaux2.xls").Activate Columns(1).Select Selection.Find(What:=ligne, After:¬tiveCell, LookIn:= _
_ xlNext, MatchCase:úlse).Activate Application.ScreenUpdating = True UserForm1.Show Workbooks("Oloron3.xls").Activate End If End Sub
ça devrait suffire, en appuyant sur entrée et sur la touche de défilement
vertical. Amicalement Sitting Hoax (qui part au feu d'artifice)
"nicolas65" a écrit dans le message de
news:2d46b01c469ab$33e5d180$ Merci Laurent
Fichier bien reçu et testé Cette solution ne me satisfait qu'à 99,9% . En effet elle est assez lourde puisque pour sortir du userform il faut cliquer sur masquer ou sur la croix. J'aurais souhaité que le Userform soit "transparent" c'est à dire que pour le masquer il suffise de déplacer le curseur par les touches de tabulations par exemple ou en tapant sur les flèches de déplacement du curseur. Pour moi le bouton Masquer n'a qu'une utilité limitée. Nouvelle version du fichier corrigé accessible à: Merci
-----Message d'origine----- Bonjour, dans ta boîte, je t'ai envoyé ton fichier modifié avec un userform qui fera ce que tu
demandes. Amicalement Sitting Hoax "nicolas65" a écrit dans le message de
news:2b9a501c46921$38e426d0$ Bonjour,
Y aurait-il parmi les grands spécialistes d'Excel quelqu'un qui aurait la solution à mon problème? Ne pouvant pas mettre de fichier sur le forum merci de regarder le lien http://www.excel- downloads.com/html/French/forum/messages/1_101898_101898 .
