Bonjour =E0 tous,
Je d=E9sire executer du code sous=20
l'=E9v=E8nement =ABWorksheet_Deactivate=BB. Le code fait r=E9f=E9rence
=E0 la feuille d=E9sactiv=E9e. Mon probl=E8me est=20
que =ABactivesheet=BB - =E0 l'entr=E9e de Worksheet_Deactivate -=20
fait r=E9f=E9rence =E0 la feuille activ=E9e...Bref J'aimerais=20
conna=EEtre le nom de la feuille d=E9sactiv=E9e lorsque je la=20
d=E9sactive.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Patrick
Bonjour,
Que veux-tu avec la feuille désactivée ? (C'est juste pour savoir quoi te répondre)
-- Patrick
"JF" wrote in message news:0baa01c48b8b$a85bccc0$ Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
Bonjour,
Que veux-tu avec la feuille désactivée ? (C'est juste pour savoir quoi te
répondre)
--
Patrick
"JF" <anonymous@discussions.microsoft.com> wrote in message
news:0baa01c48b8b$a85bccc0$a601280a@phx.gbl...
Bonjour à tous,
Je désire executer du code sous
l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est
que «activesheet» - à l'entrée de Worksheet_Deactivate -
fait référence à la feuille activée...Bref J'aimerais
connaître le nom de la feuille désactivée lorsque je la
désactive.
Que veux-tu avec la feuille désactivée ? (C'est juste pour savoir quoi te répondre)
-- Patrick
"JF" wrote in message news:0baa01c48b8b$a85bccc0$ Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
JF
Salut Patrick, la feuille désactivée est une collection de listes de validation que je veux nommer:
Private Sub Worksheet_Deactivate() Dim iLi As Integer Dim iCo As Integer Dim Sh As Worksheet '------------------------------------ Set Sh = Sh ' la feuille désactivée '------------------------------------ For iCo = 1 To LastCol(Sh, 1) iLi = LastLine(Sh, iCo) Sh.Range(Sh.Cells(1, iCo), Sh.Cells(iLi, iCo)).CreateNames True, False, False, False Next iCo End Sub
-----Message d'origine----- Bonjour,
Que veux-tu avec la feuille désactivée ? (C'est juste pour savoir quoi te
répondre)
-- Patrick
"JF" wrote in message
news:0baa01c48b8b$a85bccc0$ Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
.
Salut Patrick,
la feuille désactivée est une collection de listes de
validation que je veux nommer:
Private Sub Worksheet_Deactivate()
Dim iLi As Integer
Dim iCo As Integer
Dim Sh As Worksheet
'------------------------------------
Set Sh = Sh ' la feuille désactivée
'------------------------------------
For iCo = 1 To LastCol(Sh, 1)
iLi = LastLine(Sh, iCo)
Sh.Range(Sh.Cells(1, iCo), Sh.Cells(iLi,
iCo)).CreateNames True, False, False, False
Next iCo
End Sub
-----Message d'origine-----
Bonjour,
Que veux-tu avec la feuille désactivée ? (C'est juste
pour savoir quoi te
répondre)
--
Patrick
"JF" <anonymous@discussions.microsoft.com> wrote in
message
news:0baa01c48b8b$a85bccc0$a601280a@phx.gbl...
Bonjour à tous,
Je désire executer du code sous
l'évènement «Worksheet_Deactivate». Le code fait
référence
à la feuille désactivée. Mon problème est
que «activesheet» - à l'entrée de Worksheet_Deactivate -
fait référence à la feuille activée...Bref J'aimerais
connaître le nom de la feuille désactivée lorsque je la
désactive.
Salut Patrick, la feuille désactivée est une collection de listes de validation que je veux nommer:
Private Sub Worksheet_Deactivate() Dim iLi As Integer Dim iCo As Integer Dim Sh As Worksheet '------------------------------------ Set Sh = Sh ' la feuille désactivée '------------------------------------ For iCo = 1 To LastCol(Sh, 1) iLi = LastLine(Sh, iCo) Sh.Range(Sh.Cells(1, iCo), Sh.Cells(iLi, iCo)).CreateNames True, False, False, False Next iCo End Sub
-----Message d'origine----- Bonjour,
Que veux-tu avec la feuille désactivée ? (C'est juste pour savoir quoi te
répondre)
-- Patrick
"JF" wrote in message
news:0baa01c48b8b$a85bccc0$ Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
.
Alain CROS
Bonjour
Il y avait plus tôt un fil concernant Me. Voilà une bonne occasion de l'utiliser.
Private Sub Worksheet_Deactivate() MsgBox "La feuille quittée est " & Me.Name & vbNewLine & _ "La nouvelle feuille active est " & ActiveSheet.Name End Sub
Alain CROS
"JF" a écrit dans le message de news: 0baa01c48b8b$a85bccc0$ Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
Bonjour
Il y avait plus tôt un fil concernant Me.
Voilà une bonne occasion de l'utiliser.
Private Sub Worksheet_Deactivate()
MsgBox "La feuille quittée est " & Me.Name & vbNewLine & _
"La nouvelle feuille active est " & ActiveSheet.Name
End Sub
Alain CROS
"JF" <anonymous@discussions.microsoft.com> a écrit dans le message de news: 0baa01c48b8b$a85bccc0$a601280a@phx.gbl...
Bonjour à tous,
Je désire executer du code sous
l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est
que «activesheet» - à l'entrée de Worksheet_Deactivate -
fait référence à la feuille activée...Bref J'aimerais
connaître le nom de la feuille désactivée lorsque je la
désactive.
Il y avait plus tôt un fil concernant Me. Voilà une bonne occasion de l'utiliser.
Private Sub Worksheet_Deactivate() MsgBox "La feuille quittée est " & Me.Name & vbNewLine & _ "La nouvelle feuille active est " & ActiveSheet.Name End Sub
Alain CROS
"JF" a écrit dans le message de news: 0baa01c48b8b$a85bccc0$ Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
Merci Patrick ! Ça fonctionne diguedou.
-----Message d'origine----- Bonjour
Il y avait plus tôt un fil concernant Me. Voilà une bonne occasion de l'utiliser.
Private Sub Worksheet_Deactivate() MsgBox "La feuille quittée est " & Me.Name & vbNewLine & _
"La nouvelle feuille active est " & ActiveSheet.Name
End Sub
Alain CROS
"JF" a écrit dans le message de news: 0baa01c48b8b$a85bccc0
$
Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
.
Merci Patrick ! Ça fonctionne diguedou.
-----Message d'origine-----
Bonjour
Il y avait plus tôt un fil concernant Me.
Voilà une bonne occasion de l'utiliser.
Private Sub Worksheet_Deactivate()
MsgBox "La feuille quittée est " & Me.Name &
vbNewLine & _
"La nouvelle feuille active est " &
ActiveSheet.Name
End Sub
Alain CROS
"JF" <anonymous@discussions.microsoft.com> a écrit dans
le message de news: 0baa01c48b8b$a85bccc0
$a601280a@phx.gbl...
Bonjour à tous,
Je désire executer du code sous
l'évènement «Worksheet_Deactivate». Le code fait
référence
à la feuille désactivée. Mon problème est
que «activesheet» - à l'entrée de Worksheet_Deactivate -
fait référence à la feuille activée...Bref J'aimerais
connaître le nom de la feuille désactivée lorsque je la
désactive.
Il y avait plus tôt un fil concernant Me. Voilà une bonne occasion de l'utiliser.
Private Sub Worksheet_Deactivate() MsgBox "La feuille quittée est " & Me.Name & vbNewLine & _
"La nouvelle feuille active est " & ActiveSheet.Name
End Sub
Alain CROS
"JF" a écrit dans le message de news: 0baa01c48b8b$a85bccc0
$
Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
.
JF
Merci Alain ! C'est parfait!
-----Message d'origine----- Bonjour
Il y avait plus tôt un fil concernant Me. Voilà une bonne occasion de l'utiliser.
Private Sub Worksheet_Deactivate() MsgBox "La feuille quittée est " & Me.Name & vbNewLine & _
"La nouvelle feuille active est " & ActiveSheet.Name
End Sub
Alain CROS
"JF" a écrit dans le message de news: 0baa01c48b8b$a85bccc0
$
Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
.
Merci Alain ! C'est parfait!
-----Message d'origine-----
Bonjour
Il y avait plus tôt un fil concernant Me.
Voilà une bonne occasion de l'utiliser.
Private Sub Worksheet_Deactivate()
MsgBox "La feuille quittée est " & Me.Name &
vbNewLine & _
"La nouvelle feuille active est " &
ActiveSheet.Name
End Sub
Alain CROS
"JF" <anonymous@discussions.microsoft.com> a écrit dans
le message de news: 0baa01c48b8b$a85bccc0
$a601280a@phx.gbl...
Bonjour à tous,
Je désire executer du code sous
l'évènement «Worksheet_Deactivate». Le code fait
référence
à la feuille désactivée. Mon problème est
que «activesheet» - à l'entrée de Worksheet_Deactivate -
fait référence à la feuille activée...Bref J'aimerais
connaître le nom de la feuille désactivée lorsque je la
désactive.
Il y avait plus tôt un fil concernant Me. Voilà une bonne occasion de l'utiliser.
Private Sub Worksheet_Deactivate() MsgBox "La feuille quittée est " & Me.Name & vbNewLine & _
"La nouvelle feuille active est " & ActiveSheet.Name
End Sub
Alain CROS
"JF" a écrit dans le message de news: 0baa01c48b8b$a85bccc0
$
Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
.
Patrick
Je viens d'y penser... Il suffit d'utiliser l'objet "Me". Dans une feuille c'est la feuille elle-même. Comme cela :
Private Sub Worksheet_Deactivate() Dim iLi As Integer Dim iCo As Integer Dim Sh As Worksheet
For iCo = 1 To LastCol(Sh, 1) iLi = LastLine(Sh, iCo) Me.Range(Me.Cells(1, iCo), Me.Cells(iLi, iCo)).CreateNames True, False, False, False Next iCo End Sub
-- Patrick
"JF" wrote in message news:0c2601c48b8f$2cdc8450$ Salut Patrick, la feuille désactivée est une collection de listes de validation que je veux nommer:
Private Sub Worksheet_Deactivate() Dim iLi As Integer Dim iCo As Integer Dim Sh As Worksheet '------------------------------------ Set Sh = Sh ' la feuille désactivée '------------------------------------ For iCo = 1 To LastCol(Sh, 1) iLi = LastLine(Sh, iCo) Sh.Range(Sh.Cells(1, iCo), Sh.Cells(iLi, iCo)).CreateNames True, False, False, False Next iCo End Sub
-----Message d'origine----- Bonjour,
Que veux-tu avec la feuille désactivée ? (C'est juste pour savoir quoi te
répondre)
-- Patrick
"JF" wrote in message
news:0baa01c48b8b$a85bccc0$ Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
Merci d'avance JF
.
Je viens d'y penser... Il suffit d'utiliser l'objet "Me". Dans une feuille
c'est la feuille elle-même. Comme cela :
Private Sub Worksheet_Deactivate()
Dim iLi As Integer
Dim iCo As Integer
Dim Sh As Worksheet
For iCo = 1 To LastCol(Sh, 1)
iLi = LastLine(Sh, iCo)
Me.Range(Me.Cells(1, iCo), Me.Cells(iLi, iCo)).CreateNames True, False,
False, False
Next iCo
End Sub
--
Patrick
"JF" <anonymous@discussions.microsoft.com> wrote in message
news:0c2601c48b8f$2cdc8450$a501280a@phx.gbl...
Salut Patrick,
la feuille désactivée est une collection de listes de
validation que je veux nommer:
Private Sub Worksheet_Deactivate()
Dim iLi As Integer
Dim iCo As Integer
Dim Sh As Worksheet
'------------------------------------
Set Sh = Sh ' la feuille désactivée
'------------------------------------
For iCo = 1 To LastCol(Sh, 1)
iLi = LastLine(Sh, iCo)
Sh.Range(Sh.Cells(1, iCo), Sh.Cells(iLi,
iCo)).CreateNames True, False, False, False
Next iCo
End Sub
-----Message d'origine-----
Bonjour,
Que veux-tu avec la feuille désactivée ? (C'est juste
pour savoir quoi te
répondre)
--
Patrick
"JF" <anonymous@discussions.microsoft.com> wrote in
message
news:0baa01c48b8b$a85bccc0$a601280a@phx.gbl...
Bonjour à tous,
Je désire executer du code sous
l'évènement «Worksheet_Deactivate». Le code fait
référence
à la feuille désactivée. Mon problème est
que «activesheet» - à l'entrée de Worksheet_Deactivate -
fait référence à la feuille activée...Bref J'aimerais
connaître le nom de la feuille désactivée lorsque je la
désactive.
Je viens d'y penser... Il suffit d'utiliser l'objet "Me". Dans une feuille c'est la feuille elle-même. Comme cela :
Private Sub Worksheet_Deactivate() Dim iLi As Integer Dim iCo As Integer Dim Sh As Worksheet
For iCo = 1 To LastCol(Sh, 1) iLi = LastLine(Sh, iCo) Me.Range(Me.Cells(1, iCo), Me.Cells(iLi, iCo)).CreateNames True, False, False, False Next iCo End Sub
-- Patrick
"JF" wrote in message news:0c2601c48b8f$2cdc8450$ Salut Patrick, la feuille désactivée est une collection de listes de validation que je veux nommer:
Private Sub Worksheet_Deactivate() Dim iLi As Integer Dim iCo As Integer Dim Sh As Worksheet '------------------------------------ Set Sh = Sh ' la feuille désactivée '------------------------------------ For iCo = 1 To LastCol(Sh, 1) iLi = LastLine(Sh, iCo) Sh.Range(Sh.Cells(1, iCo), Sh.Cells(iLi, iCo)).CreateNames True, False, False, False Next iCo End Sub
-----Message d'origine----- Bonjour,
Que veux-tu avec la feuille désactivée ? (C'est juste pour savoir quoi te
répondre)
-- Patrick
"JF" wrote in message
news:0baa01c48b8b$a85bccc0$ Bonjour à tous, Je désire executer du code sous l'évènement «Worksheet_Deactivate». Le code fait référence
à la feuille désactivée. Mon problème est que «activesheet» - à l'entrée de Worksheet_Deactivate - fait référence à la feuille activée...Bref J'aimerais connaître le nom de la feuille désactivée lorsque je la désactive.
