Est-il possible de figer l'écran lors du déroulement d'un code de UF ceci
meme apres l'avoir "unloadé" ?
Private Sub CommandButton1_Click()
Unload Me
Application.ScreenUpdating = False
Sheets("DATA").Range("R2").Value = "Nantes"
Sheets("Présentation").Select
Application.ScreenUpdating = True
End Sub
Dans ce cas là j'ai droit à l'affichage de la feuille "DATA"
Un moyen pour remédier à cela ?
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
michdenis
Bonjour Michael,
As-tu essayé ceci :
(pas tester) '------------------- Private Sub CommandButton1_Click() Application.ScreenUpdating = False Me.Hide Sheets("DATA").Range("R2").Value = "Nantes" Sheets("Présentation").Select Application.ScreenUpdating = True Unload Me
End Sub '-------------------
Salutations!
Salutations!
"Michael" a écrit dans le message de news: %
Bonjour !
Est-il possible de figer l'écran lors du déroulement d'un code de UF ceci meme apres l'avoir "unloadé" ?
Private Sub CommandButton1_Click() Unload Me Application.ScreenUpdating = False Sheets("DATA").Range("R2").Value = "Nantes" Sheets("Présentation").Select Application.ScreenUpdating = True End Sub
Dans ce cas là j'ai droit à l'affichage de la feuille "DATA" Un moyen pour remédier à cela ?
Merci d'avance ! Ciao !
Bonjour Michael,
As-tu essayé ceci :
(pas tester)
'-------------------
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Me.Hide
Sheets("DATA").Range("R2").Value = "Nantes"
Sheets("Présentation").Select
Application.ScreenUpdating = True
Unload Me
End Sub
'-------------------
Salutations!
Salutations!
"Michael" <michael_bas@yahoo.fr> a écrit dans le message de news: %23mxZSei2FHA.1268@TK2MSFTNGP10.phx.gbl...
Bonjour !
Est-il possible de figer l'écran lors du déroulement d'un code de UF ceci
meme apres l'avoir "unloadé" ?
Private Sub CommandButton1_Click()
Unload Me
Application.ScreenUpdating = False
Sheets("DATA").Range("R2").Value = "Nantes"
Sheets("Présentation").Select
Application.ScreenUpdating = True
End Sub
Dans ce cas là j'ai droit à l'affichage de la feuille "DATA"
Un moyen pour remédier à cela ?
(pas tester) '------------------- Private Sub CommandButton1_Click() Application.ScreenUpdating = False Me.Hide Sheets("DATA").Range("R2").Value = "Nantes" Sheets("Présentation").Select Application.ScreenUpdating = True Unload Me
End Sub '-------------------
Salutations!
Salutations!
"Michael" a écrit dans le message de news: %
Bonjour !
Est-il possible de figer l'écran lors du déroulement d'un code de UF ceci meme apres l'avoir "unloadé" ?
Private Sub CommandButton1_Click() Unload Me Application.ScreenUpdating = False Sheets("DATA").Range("R2").Value = "Nantes" Sheets("Présentation").Select Application.ScreenUpdating = True End Sub
Dans ce cas là j'ai droit à l'affichage de la feuille "DATA" Un moyen pour remédier à cela ?
Merci d'avance ! Ciao !
JLuc
*Bonjour Michael*, Pourquoi veux tu unloader le userform avant d'avoir fini ? au mieux tu pourrais (si ca marche, et c'est pas sur) gagner quelques microsecondes et encore, au pire gagner un terrible mal de crane pour trouver une hypothetique solution ;-)
Bonjour !
Est-il possible de figer l'écran lors du déroulement d'un code de UF ceci meme apres l'avoir "unloadé" ?
Private Sub CommandButton1_Click() Unload Me Application.ScreenUpdating = False Sheets("DATA").Range("R2").Value = "Nantes" Sheets("Présentation").Select Application.ScreenUpdating = True End Sub
Dans ce cas là j'ai droit à l'affichage de la feuille "DATA" Un moyen pour remédier à cela ?
Merci d'avance ! Ciao !
-- JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs et astuces ! http://www.excelabo.net http://jacxl.free.fr/ http://dj.joss.free.fr/
*Bonjour Michael*,
Pourquoi veux tu unloader le userform avant d'avoir fini ? au mieux tu
pourrais (si ca marche, et c'est pas sur) gagner quelques microsecondes
et encore, au pire gagner un terrible mal de crane pour trouver une
hypothetique solution ;-)
Bonjour !
Est-il possible de figer l'écran lors du déroulement d'un code de UF ceci
meme apres l'avoir "unloadé" ?
Private Sub CommandButton1_Click()
Unload Me
Application.ScreenUpdating = False
Sheets("DATA").Range("R2").Value = "Nantes"
Sheets("Présentation").Select
Application.ScreenUpdating = True
End Sub
Dans ce cas là j'ai droit à l'affichage de la feuille "DATA"
Un moyen pour remédier à cela ?
Merci d'avance !
Ciao !
--
JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs
et astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/
*Bonjour Michael*, Pourquoi veux tu unloader le userform avant d'avoir fini ? au mieux tu pourrais (si ca marche, et c'est pas sur) gagner quelques microsecondes et encore, au pire gagner un terrible mal de crane pour trouver une hypothetique solution ;-)
Bonjour !
Est-il possible de figer l'écran lors du déroulement d'un code de UF ceci meme apres l'avoir "unloadé" ?
Private Sub CommandButton1_Click() Unload Me Application.ScreenUpdating = False Sheets("DATA").Range("R2").Value = "Nantes" Sheets("Présentation").Select Application.ScreenUpdating = True End Sub
Dans ce cas là j'ai droit à l'affichage de la feuille "DATA" Un moyen pour remédier à cela ?
Merci d'avance ! Ciao !
-- JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs et astuces ! http://www.excelabo.net http://jacxl.free.fr/ http://dj.joss.free.fr/
Michael
Désolé pour le dérangement mais la probleme venait en fait d'ailleurs !
Une macro qui s'exececutait sur activation de ma feuille data !
Merci qd meme !
Désolé pour le dérangement mais la probleme venait en fait d'ailleurs !
Une macro qui s'exececutait sur activation de ma feuille data !
