J'ai un classeur qui sur une feuille , il y des cellulles qui doivent être
effacées tout les jour
J'ai créé un bouton pour effacer ces celulles avec le code suivant
Private Sub Cmd_Efface_Tout_Remet_Date_Click()
Range("C3:E5,C8:E14,C16:E16,C19:E26,C28:E29,C31:E39,B1:B2").Select
Range("B1").Activate
Selection.ClearContents
Range("B1") = Date
Range("C8").Select
End Sub
Cette procédure fonctionne
Mais lorsque je veut imprimé la feuille, elle s'imprime et le bouton se
déplace vers la droite de la feuille.
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
Bob Phillips
http://support.microsoft.com/kb/838910/fr
--
HTH
RP (remove nothere from the email address if mailing direct)
"Jean-Luc Robert" wrote in message news:cr9o84$kde$
Bonsoir
J'ai un bug bizare dans une feuille Excel
Windows XP Pro et Office XP Pro
J'ai un classeur qui sur une feuille , il y des cellulles qui doivent être effacées tout les jour
J'ai créé un bouton pour effacer ces celulles avec le code suivant
Private Sub Cmd_Efface_Tout_Remet_Date_Click() Range("C3:E5,C8:E14,C16:E16,C19:E26,C28:E29,C31:E39,B1:B2").Select Range("B1").Activate Selection.ClearContents Range("B1") = Date Range("C8").Select End Sub
Cette procédure fonctionne
Mais lorsque je veut imprimé la feuille, elle s'imprime et le bouton se déplace vers la droite de la feuille.
Merci d'avance
Jean-Luc Robert
http://support.microsoft.com/kb/838910/fr
--
HTH
RP
(remove nothere from the email address if mailing direct)
"Jean-Luc Robert" <NoSpam_jldev@swissonline.ch> wrote in message
news:cr9o84$kde$1@news.hispeed.ch...
Bonsoir
J'ai un bug bizare dans une feuille Excel
Windows XP Pro et Office XP Pro
J'ai un classeur qui sur une feuille , il y des cellulles qui doivent être
effacées tout les jour
J'ai créé un bouton pour effacer ces celulles avec le code suivant
Private Sub Cmd_Efface_Tout_Remet_Date_Click()
Range("C3:E5,C8:E14,C16:E16,C19:E26,C28:E29,C31:E39,B1:B2").Select
Range("B1").Activate
Selection.ClearContents
Range("B1") = Date
Range("C8").Select
End Sub
Cette procédure fonctionne
Mais lorsque je veut imprimé la feuille, elle s'imprime et le bouton se
déplace vers la droite de la feuille.
RP (remove nothere from the email address if mailing direct)
"Jean-Luc Robert" wrote in message news:cr9o84$kde$
Bonsoir
J'ai un bug bizare dans une feuille Excel
Windows XP Pro et Office XP Pro
J'ai un classeur qui sur une feuille , il y des cellulles qui doivent être effacées tout les jour
J'ai créé un bouton pour effacer ces celulles avec le code suivant
Private Sub Cmd_Efface_Tout_Remet_Date_Click() Range("C3:E5,C8:E14,C16:E16,C19:E26,C28:E29,C31:E39,B1:B2").Select Range("B1").Activate Selection.ClearContents Range("B1") = Date Range("C8").Select End Sub
Cette procédure fonctionne
Mais lorsque je veut imprimé la feuille, elle s'imprime et le bouton se déplace vers la droite de la feuille.
Merci d'avance
Jean-Luc Robert
Jean-Luc Robert
Salut
Super ça marche
Encore merci
Jean-Luc
"Bob Phillips" a écrit dans le message de news:%
http://support.microsoft.com/kb/838910/fr
--
HTH
RP (remove nothere from the email address if mailing direct)
"Jean-Luc Robert" wrote in message news:cr9o84$kde$
Bonsoir
J'ai un bug bizare dans une feuille Excel
Windows XP Pro et Office XP Pro
J'ai un classeur qui sur une feuille , il y des cellulles qui doivent être
effacées tout les jour
J'ai créé un bouton pour effacer ces celulles avec le code suivant
Private Sub Cmd_Efface_Tout_Remet_Date_Click() Range("C3:E5,C8:E14,C16:E16,C19:E26,C28:E29,C31:E39,B1:B2").Select Range("B1").Activate Selection.ClearContents Range("B1") = Date Range("C8").Select End Sub
Cette procédure fonctionne
Mais lorsque je veut imprimé la feuille, elle s'imprime et le bouton se déplace vers la droite de la feuille.
Merci d'avance
Jean-Luc Robert
Salut
Super ça marche
Encore merci
Jean-Luc
"Bob Phillips" <bob.phillips@notheretiscali.co.uk> a écrit dans le message
de news:%23jVqLDS8EHA.1596@tk2msftngp13.phx.gbl...
http://support.microsoft.com/kb/838910/fr
--
HTH
RP
(remove nothere from the email address if mailing direct)
"Jean-Luc Robert" <NoSpam_jldev@swissonline.ch> wrote in message
news:cr9o84$kde$1@news.hispeed.ch...
Bonsoir
J'ai un bug bizare dans une feuille Excel
Windows XP Pro et Office XP Pro
J'ai un classeur qui sur une feuille , il y des cellulles qui doivent
être
effacées tout les jour
J'ai créé un bouton pour effacer ces celulles avec le code suivant
Private Sub Cmd_Efface_Tout_Remet_Date_Click()
Range("C3:E5,C8:E14,C16:E16,C19:E26,C28:E29,C31:E39,B1:B2").Select
Range("B1").Activate
Selection.ClearContents
Range("B1") = Date
Range("C8").Select
End Sub
Cette procédure fonctionne
Mais lorsque je veut imprimé la feuille, elle s'imprime et le bouton se
déplace vers la droite de la feuille.
RP (remove nothere from the email address if mailing direct)
"Jean-Luc Robert" wrote in message news:cr9o84$kde$
Bonsoir
J'ai un bug bizare dans une feuille Excel
Windows XP Pro et Office XP Pro
J'ai un classeur qui sur une feuille , il y des cellulles qui doivent être
effacées tout les jour
J'ai créé un bouton pour effacer ces celulles avec le code suivant
Private Sub Cmd_Efface_Tout_Remet_Date_Click() Range("C3:E5,C8:E14,C16:E16,C19:E26,C28:E29,C31:E39,B1:B2").Select Range("B1").Activate Selection.ClearContents Range("B1") = Date Range("C8").Select End Sub
Cette procédure fonctionne
Mais lorsque je veut imprimé la feuille, elle s'imprime et le bouton se déplace vers la droite de la feuille.
