j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans
lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au
format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
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
papou
Bonjour Dans ces conditions il te faut supprimer tout le code avant l'enregistrement. Voici une procédure qui supprime tous les composants VBA présents dans un classeur (le classeur actif) : Sub SupprToutCode() Dim Composantvbe As Object With ActiveWorkbook.VBProject 'ou bien ThisWorkbook For Each Composantvbe In .VBComponents If Composantvbe.Type = 100 Then With Composantvbe.CodeModule .DeleteLines 1, .CountOfLines .CodePane.Window.Close End With Else: .VBComponents.Remove Composantvbe End If Next Composantvbe End With End Sub
Cordialement Pascal
"jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
Bonjour
Dans ces conditions il te faut supprimer tout le code avant
l'enregistrement.
Voici une procédure qui supprime tous les composants VBA présents dans un
classeur (le classeur actif) :
Sub SupprToutCode()
Dim Composantvbe As Object
With ActiveWorkbook.VBProject 'ou bien ThisWorkbook
For Each Composantvbe In .VBComponents
If Composantvbe.Type = 100 Then
With Composantvbe.CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With
Else: .VBComponents.Remove Composantvbe
End If
Next Composantvbe
End With
End Sub
Cordialement
Pascal
"jd" <antispam.jean.foisnet@wanadoo.fr> a écrit dans le message de
news:%23FFvDcQsEHA.2764@TK2MSFTNGP14.phx.gbl...
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans
lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au
format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en
tout
Bonjour Dans ces conditions il te faut supprimer tout le code avant l'enregistrement. Voici une procédure qui supprime tous les composants VBA présents dans un classeur (le classeur actif) : Sub SupprToutCode() Dim Composantvbe As Object With ActiveWorkbook.VBProject 'ou bien ThisWorkbook For Each Composantvbe In .VBComponents If Composantvbe.Type = 100 Then With Composantvbe.CodeModule .DeleteLines 1, .CountOfLines .CodePane.Window.Close End With Else: .VBComponents.Remove Composantvbe End If Next Composantvbe End With End Sub
Cordialement Pascal
"jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
jd
Cela marche trés bien merci. Par contre comment faire si je veux conserver certaines macros dans mon fichier. Donc ne supprimer que l'événement workbook_open. Je sais j'abuse de votre gentillesse
Merci
"papou" a écrit dans le message de news:
Bonjour Dans ces conditions il te faut supprimer tout le code avant l'enregistrement. Voici une procédure qui supprime tous les composants VBA présents dans un classeur (le classeur actif) : Sub SupprToutCode() Dim Composantvbe As Object With ActiveWorkbook.VBProject 'ou bien ThisWorkbook For Each Composantvbe In .VBComponents If Composantvbe.Type = 100 Then With Composantvbe.CodeModule .DeleteLines 1, .CountOfLines .CodePane.Window.Close End With Else: .VBComponents.Remove Composantvbe End If Next Composantvbe End With End Sub
Cordialement Pascal
"jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
Cela marche trés bien merci.
Par contre comment faire si je veux conserver certaines macros dans mon
fichier. Donc ne supprimer que l'événement workbook_open.
Je sais j'abuse de votre gentillesse
Merci
"papou" <pasbonparobin@canonplustibco.fr> a écrit dans le message de news:
emyvVpQsEHA.3572@tk2msftngp13.phx.gbl...
Bonjour
Dans ces conditions il te faut supprimer tout le code avant
l'enregistrement.
Voici une procédure qui supprime tous les composants VBA présents dans un
classeur (le classeur actif) :
Sub SupprToutCode()
Dim Composantvbe As Object
With ActiveWorkbook.VBProject 'ou bien ThisWorkbook
For Each Composantvbe In .VBComponents
If Composantvbe.Type = 100 Then
With Composantvbe.CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With
Else: .VBComponents.Remove Composantvbe
End If
Next Composantvbe
End With
End Sub
Cordialement
Pascal
"jd" <antispam.jean.foisnet@wanadoo.fr> a écrit dans le message de
news:%23FFvDcQsEHA.2764@TK2MSFTNGP14.phx.gbl...
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans
lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au
format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait
que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en
tout
Cela marche trés bien merci. Par contre comment faire si je veux conserver certaines macros dans mon fichier. Donc ne supprimer que l'événement workbook_open. Je sais j'abuse de votre gentillesse
Merci
"papou" a écrit dans le message de news:
Bonjour Dans ces conditions il te faut supprimer tout le code avant l'enregistrement. Voici une procédure qui supprime tous les composants VBA présents dans un classeur (le classeur actif) : Sub SupprToutCode() Dim Composantvbe As Object With ActiveWorkbook.VBProject 'ou bien ThisWorkbook For Each Composantvbe In .VBComponents If Composantvbe.Type = 100 Then With Composantvbe.CodeModule .DeleteLines 1, .CountOfLines .CodePane.Window.Close End With Else: .VBComponents.Remove Composantvbe End If Next Composantvbe End With End Sub
Cordialement Pascal
"jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
papou
Re Pas de problème ;-) Sub SupprThisWorkBook() Dim Composantvbe As Object With ActiveWorkbook.VBProject 'ou bien ThisWorkbook For Each Composantvbe In .VBComponents If Composantvbe.Name = "ThisWorkbook" Then With Composantvbe.CodeModule .DeleteLines 1, .CountOfLines .CodePane.Window.Close End With End If Next Composantvbe End With End Sub
Cordialement Pascal
"jd" a écrit dans le message de news:
Cela marche trés bien merci. Par contre comment faire si je veux conserver certaines macros dans mon fichier. Donc ne supprimer que l'événement workbook_open. Je sais j'abuse de votre gentillesse
Merci
"papou" a écrit dans le message de news:
Bonjour Dans ces conditions il te faut supprimer tout le code avant l'enregistrement. Voici une procédure qui supprime tous les composants VBA présents dans un
classeur (le classeur actif) : Sub SupprToutCode() Dim Composantvbe As Object With ActiveWorkbook.VBProject 'ou bien ThisWorkbook For Each Composantvbe In .VBComponents If Composantvbe.Type = 100 Then With Composantvbe.CodeModule .DeleteLines 1, .CountOfLines .CodePane.Window.Close End With Else: .VBComponents.Remove Composantvbe End If Next Composantvbe End With End Sub
Cordialement Pascal
"jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
Re
Pas de problème ;-)
Sub SupprThisWorkBook()
Dim Composantvbe As Object
With ActiveWorkbook.VBProject 'ou bien ThisWorkbook
For Each Composantvbe In .VBComponents
If Composantvbe.Name = "ThisWorkbook" Then
With Composantvbe.CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With
End If
Next Composantvbe
End With
End Sub
Cordialement
Pascal
"jd" <antispam.jean.foisnet@wanadoo.fr> a écrit dans le message de
news:umlYQ1RsEHA.1276@TK2MSFTNGP12.phx.gbl...
Cela marche trés bien merci.
Par contre comment faire si je veux conserver certaines macros dans mon
fichier. Donc ne supprimer que l'événement workbook_open.
Je sais j'abuse de votre gentillesse
Merci
"papou" <pasbonparobin@canonplustibco.fr> a écrit dans le message de news:
emyvVpQsEHA.3572@tk2msftngp13.phx.gbl...
Bonjour
Dans ces conditions il te faut supprimer tout le code avant
l'enregistrement.
Voici une procédure qui supprime tous les composants VBA présents dans
un
classeur (le classeur actif) :
Sub SupprToutCode()
Dim Composantvbe As Object
With ActiveWorkbook.VBProject 'ou bien ThisWorkbook
For Each Composantvbe In .VBComponents
If Composantvbe.Type = 100 Then
With Composantvbe.CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With
Else: .VBComponents.Remove Composantvbe
End If
Next Composantvbe
End With
End Sub
Cordialement
Pascal
"jd" <antispam.jean.foisnet@wanadoo.fr> a écrit dans le message de
news:%23FFvDcQsEHA.2764@TK2MSFTNGP14.phx.gbl...
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans
lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au
format xls (pas modèle), mais le userform est sauvegardé aussi et si
le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait
que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en
tout
Re Pas de problème ;-) Sub SupprThisWorkBook() Dim Composantvbe As Object With ActiveWorkbook.VBProject 'ou bien ThisWorkbook For Each Composantvbe In .VBComponents If Composantvbe.Name = "ThisWorkbook" Then With Composantvbe.CodeModule .DeleteLines 1, .CountOfLines .CodePane.Window.Close End With End If Next Composantvbe End With End Sub
Cordialement Pascal
"jd" a écrit dans le message de news:
Cela marche trés bien merci. Par contre comment faire si je veux conserver certaines macros dans mon fichier. Donc ne supprimer que l'événement workbook_open. Je sais j'abuse de votre gentillesse
Merci
"papou" a écrit dans le message de news:
Bonjour Dans ces conditions il te faut supprimer tout le code avant l'enregistrement. Voici une procédure qui supprime tous les composants VBA présents dans un
classeur (le classeur actif) : Sub SupprToutCode() Dim Composantvbe As Object With ActiveWorkbook.VBProject 'ou bien ThisWorkbook For Each Composantvbe In .VBComponents If Composantvbe.Type = 100 Then With Composantvbe.CodeModule .DeleteLines 1, .CountOfLines .CodePane.Window.Close End With Else: .VBComponents.Remove Composantvbe End If Next Composantvbe End With End Sub
Cordialement Pascal
"jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
Alain CROS
Bonjour.
Dans le modèle
Avec le UserForm nommé UserForm1. Ajouter un module nommé Module1 avec ce code.
Sub Auto_Open() UserForm1.Show With ThisWorkbook.VBProject .VBComponents.Remove .VBComponents("UserForm1") .VBComponents.Remove .VBComponents("Module1") End With End Sub
Alain CROS
"jd" a écrit dans le message de news: #
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
Bonjour.
Dans le modèle
Avec le UserForm nommé UserForm1.
Ajouter un module nommé Module1 avec ce code.
Sub Auto_Open()
UserForm1.Show
With ThisWorkbook.VBProject
.VBComponents.Remove .VBComponents("UserForm1")
.VBComponents.Remove .VBComponents("Module1")
End With
End Sub
Alain CROS
"jd" <antispam.jean.foisnet@wanadoo.fr> a écrit dans le message de news: #FFvDcQsEHA.2764@TK2MSFTNGP14.phx.gbl...
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans
lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au
format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Avec le UserForm nommé UserForm1. Ajouter un module nommé Module1 avec ce code.
Sub Auto_Open() UserForm1.Show With ThisWorkbook.VBProject .VBComponents.Remove .VBComponents("UserForm1") .VBComponents.Remove .VBComponents("Module1") End With End Sub
Alain CROS
"jd" a écrit dans le message de news: #
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
gilbert
Bonjour
Merci de vérifier la date et l' heure de ta bécane
Gilbert
"jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
Bonjour
Merci de vérifier la date et l' heure de ta bécane
Gilbert
"jd" <antispam.jean.foisnet@wanadoo.fr> a écrit dans le message de
news:%23FFvDcQsEHA.2764@TK2MSFTNGP14.phx.gbl...
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans
lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au
format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en
tout
Merci de vérifier la date et l' heure de ta bécane
Gilbert
"jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
twinley
Bonjour jd
Ton horloge est approximative... Nous allons avoir le plaisir de t'avoir en tête pendant 50 jours. Un ajustement ne nuirait pas à l'organisation de tes fichiers et de tes versions.
-- à+twinley "jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
Bonjour jd
Ton horloge est approximative...
Nous allons avoir le plaisir de t'avoir en tête pendant 50 jours.
Un ajustement ne nuirait pas à l'organisation de tes fichiers et de tes
versions.
--
à+twinley
"jd" <antispam.jean.foisnet@wanadoo.fr> a écrit dans le message de
news:%23FFvDcQsEHA.2764@TK2MSFTNGP14.phx.gbl...
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans
lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au
format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en
tout
Ton horloge est approximative... Nous allons avoir le plaisir de t'avoir en tête pendant 50 jours. Un ajustement ne nuirait pas à l'organisation de tes fichiers et de tes versions.
-- à+twinley "jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
jd
Merci Beaucoup à vous tous j'ai tout ce qu'il me faut... et bien + encore
"Alain CROS" a écrit dans le message de news: #
Bonjour.
Dans le modèle
Avec le UserForm nommé UserForm1. Ajouter un module nommé Module1 avec ce code.
Sub Auto_Open() UserForm1.Show With ThisWorkbook.VBProject .VBComponents.Remove .VBComponents("UserForm1") .VBComponents.Remove .VBComponents("Module1") End With End Sub
Alain CROS
"jd" a écrit dans le message de news: #
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
Merci Beaucoup à vous tous
j'ai tout ce qu'il me faut... et bien + encore
"Alain CROS" <Personne@ICI> a écrit dans le message de news:
#kgGQFSsEHA.1336@tk2msftngp13.phx.gbl...
Bonjour.
Dans le modèle
Avec le UserForm nommé UserForm1.
Ajouter un module nommé Module1 avec ce code.
Sub Auto_Open()
UserForm1.Show
With ThisWorkbook.VBProject
.VBComponents.Remove .VBComponents("UserForm1")
.VBComponents.Remove .VBComponents("Module1")
End With
End Sub
Alain CROS
"jd" <antispam.jean.foisnet@wanadoo.fr> a écrit dans le message de news:
#FFvDcQsEHA.2764@TK2MSFTNGP14.phx.gbl...
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans
lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au
format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait
que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en
tout
Merci Beaucoup à vous tous j'ai tout ce qu'il me faut... et bien + encore
"Alain CROS" a écrit dans le message de news: #
Bonjour.
Dans le modèle
Avec le UserForm nommé UserForm1. Ajouter un module nommé Module1 avec ce code.
Sub Auto_Open() UserForm1.Show With ThisWorkbook.VBProject .VBComponents.Remove .VBComponents("UserForm1") .VBComponents.Remove .VBComponents("Module1") End With End Sub
Alain CROS
"jd" a écrit dans le message de news: #
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
jd
Désolé pour la date, je m'en suis aperçu juste aprés, et je ne vous raconte pas les soucis dans les rappels de Rdv avec outlook maintenant
"twinley" <twinleym(at)hotmail.com> a écrit dans le message de news: #
Bonjour jd
Ton horloge est approximative... Nous allons avoir le plaisir de t'avoir en tête pendant 50 jours. Un ajustement ne nuirait pas à l'organisation de tes fichiers et de tes versions.
-- à+twinley "jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
cas il ne s'ouvre plus à chaque ouverture.
Je n'ai pas trouvé d'événenment New pour excel.
Quelqu'un a t-il une piste ?
Merci d'avance.
Désolé pour la date,
je m'en suis aperçu juste aprés, et je ne vous raconte pas les soucis dans
les rappels de Rdv avec outlook maintenant
"twinley" <twinleym(at)hotmail.com> a écrit dans le message de news:
#ppB1kSsEHA.2556@tk2msftngp13.phx.gbl...
Bonjour jd
Ton horloge est approximative...
Nous allons avoir le plaisir de t'avoir en tête pendant 50 jours.
Un ajustement ne nuirait pas à l'organisation de tes fichiers et de tes
versions.
--
à+twinley
"jd" <antispam.jean.foisnet@wanadoo.fr> a écrit dans le message de
news:%23FFvDcQsEHA.2764@TK2MSFTNGP14.phx.gbl...
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans
lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au
format xls (pas modèle), mais le userform est sauvegardé aussi et si le
fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait
que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en
tout
Désolé pour la date, je m'en suis aperçu juste aprés, et je ne vous raconte pas les soucis dans les rappels de Rdv avec outlook maintenant
"twinley" <twinleym(at)hotmail.com> a écrit dans le message de news: #
Bonjour jd
Ton horloge est approximative... Nous allons avoir le plaisir de t'avoir en tête pendant 50 jours. Un ajustement ne nuirait pas à l'organisation de tes fichiers et de tes versions.
-- à+twinley "jd" a écrit dans le message de news:%
Bonjour,
j'ai créé un modèle avec à l'ouverture le lancement d'un userform dans lequel l'utilisateur doit saisir quelques données.
j'ai donc mis ceci dans l'événement workbook.open userform.show
Mon problème c'est que l'utilisateur sauvegarde ensuite le document au format xls (pas modèle), mais le userform est sauvegardé aussi et si le fichier est à nouveau ouvert le userform apparaît aussi.
Sous word, avec les modèles on a l'événement document_new, ce qui fait que
lorsqu'on sauvegarde ensuite le document créé n'a plus le userform, en tout
