Je cherche la commande VB pour ouvrir un nouveau classeur,=20
avec comme option une seule feuille de calcul.
Je pense =E0 utiliser Workbooks.open, mais je ne trouve pas=20
l'option "nb de 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
papou
Bonjour Pour n'avoir qu'une seule feuille dans le classeur créé : With Application .SheetsInNewWorkbook = 1 End With Et s'il s'agit de créer un nouveau classeur, il vaut mieux utiliser Workbooks.Add
Cordialement Pascal
"dub" a écrit dans le message de news:924c01c47897$d24e2cf0$ Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur, avec comme option une seule feuille de calcul. Je pense à utiliser Workbooks.open, mais je ne trouve pas l'option "nb de feuille".
Merci d'avance pour vos réponses. R-J
Bonjour
Pour n'avoir qu'une seule feuille dans le classeur créé :
With Application
.SheetsInNewWorkbook = 1
End With
Et s'il s'agit de créer un nouveau classeur, il vaut mieux utiliser
Workbooks.Add
Cordialement
Pascal
"dub" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:924c01c47897$d24e2cf0$a301280a@phx.gbl...
Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur,
avec comme option une seule feuille de calcul.
Je pense à utiliser Workbooks.open, mais je ne trouve pas
l'option "nb de feuille".
Bonjour Pour n'avoir qu'une seule feuille dans le classeur créé : With Application .SheetsInNewWorkbook = 1 End With Et s'il s'agit de créer un nouveau classeur, il vaut mieux utiliser Workbooks.Add
Cordialement Pascal
"dub" a écrit dans le message de news:924c01c47897$d24e2cf0$ Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur, avec comme option une seule feuille de calcul. Je pense à utiliser Workbooks.open, mais je ne trouve pas l'option "nb de feuille".
Merci d'avance pour vos réponses. R-J
michdenis
Bonjour Dud,
Avec cette méthode, tous tes nouveaux classeurs auront une feuille. '------------------ With Application .SheetsInNewWorkbook = 1 End With '------------------
Tu peux modifier la procédure comme suit :
'------------------
'------------------ Dim A As Integer With Application A = .SheetsInNewWorkbook .SheetsInNewWorkbook = 1 .Workbooks.Add .SheetsInNewWorkbook = A End With '------------------
Et si tu préfères plus simple :
Ceci ajoute un classeur contenant seulement une feuille de calcul. Application.Workbooks.Add -4167
Salutations!
"dub" a écrit dans le message de news:924c01c47897$d24e2cf0$ Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur, avec comme option une seule feuille de calcul. Je pense à utiliser Workbooks.open, mais je ne trouve pas l'option "nb de feuille".
Merci d'avance pour vos réponses. R-J
Bonjour Dud,
Avec cette méthode, tous tes nouveaux classeurs auront une feuille.
'------------------
With Application
.SheetsInNewWorkbook = 1
End With
'------------------
Tu peux modifier la procédure comme suit :
'------------------
'------------------
Dim A As Integer
With Application
A = .SheetsInNewWorkbook
.SheetsInNewWorkbook = 1
.Workbooks.Add
.SheetsInNewWorkbook = A
End With
'------------------
Et si tu préfères plus simple :
Ceci ajoute un classeur contenant seulement une feuille de calcul.
Application.Workbooks.Add -4167
Salutations!
"dub" <anonymous@discussions.microsoft.com> a écrit dans le message de news:924c01c47897$d24e2cf0$a301280a@phx.gbl...
Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur,
avec comme option une seule feuille de calcul.
Je pense à utiliser Workbooks.open, mais je ne trouve pas
l'option "nb de feuille".
Avec cette méthode, tous tes nouveaux classeurs auront une feuille. '------------------ With Application .SheetsInNewWorkbook = 1 End With '------------------
Tu peux modifier la procédure comme suit :
'------------------
'------------------ Dim A As Integer With Application A = .SheetsInNewWorkbook .SheetsInNewWorkbook = 1 .Workbooks.Add .SheetsInNewWorkbook = A End With '------------------
Et si tu préfères plus simple :
Ceci ajoute un classeur contenant seulement une feuille de calcul. Application.Workbooks.Add -4167
Salutations!
"dub" a écrit dans le message de news:924c01c47897$d24e2cf0$ Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur, avec comme option une seule feuille de calcul. Je pense à utiliser Workbooks.open, mais je ne trouve pas l'option "nb de feuille".
Merci d'avance pour vos réponses. R-J
dub
Re-bonjour. J'ai inseré ta commande, mais j'ai systématiquement l'erreur sur le mot "with" dans mon module suivant: Set Newbook = Workbooks.Add ActiveWorkbook.SaveAs Filename:= _ "C:TEMPREFACT_1 2004.xls" ' With Application.SheetsInNewWorkbook = 1 ' End With J'ai mis les côtes pour le moment, peux tu me dire ce qu'il me manque ? Merci
-----Message d'origine----- Bonjour Pour n'avoir qu'une seule feuille dans le classeur créé : With Application .SheetsInNewWorkbook = 1 End With Et s'il s'agit de créer un nouveau classeur, il vaut mieux utiliser
Workbooks.Add
Cordialement Pascal
"dub" a écrit dans le message de
news:924c01c47897$d24e2cf0$ Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur, avec comme option une seule feuille de calcul. Je pense à utiliser Workbooks.open, mais je ne trouve pas l'option "nb de feuille".
Merci d'avance pour vos réponses. R-J
.
Re-bonjour.
J'ai inseré ta commande, mais j'ai systématiquement
l'erreur sur le mot "with" dans mon module suivant:
Set Newbook = Workbooks.Add
ActiveWorkbook.SaveAs Filename:= _
"C:TEMPREFACT_1 2004.xls"
' With Application.SheetsInNewWorkbook = 1
' End With
J'ai mis les côtes pour le moment, peux tu me dire ce
qu'il me manque ?
Merci
-----Message d'origine-----
Bonjour
Pour n'avoir qu'une seule feuille dans le classeur créé :
With Application
.SheetsInNewWorkbook = 1
End With
Et s'il s'agit de créer un nouveau classeur, il vaut
mieux utiliser
Workbooks.Add
Cordialement
Pascal
"dub" <anonymous@discussions.microsoft.com> a écrit dans
le message de
news:924c01c47897$d24e2cf0$a301280a@phx.gbl...
Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur,
avec comme option une seule feuille de calcul.
Je pense à utiliser Workbooks.open, mais je ne trouve pas
l'option "nb de feuille".
Re-bonjour. J'ai inseré ta commande, mais j'ai systématiquement l'erreur sur le mot "with" dans mon module suivant: Set Newbook = Workbooks.Add ActiveWorkbook.SaveAs Filename:= _ "C:TEMPREFACT_1 2004.xls" ' With Application.SheetsInNewWorkbook = 1 ' End With J'ai mis les côtes pour le moment, peux tu me dire ce qu'il me manque ? Merci
-----Message d'origine----- Bonjour Pour n'avoir qu'une seule feuille dans le classeur créé : With Application .SheetsInNewWorkbook = 1 End With Et s'il s'agit de créer un nouveau classeur, il vaut mieux utiliser
Workbooks.Add
Cordialement Pascal
"dub" a écrit dans le message de
news:924c01c47897$d24e2cf0$ Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur, avec comme option une seule feuille de calcul. Je pense à utiliser Workbooks.open, mais je ne trouve pas l'option "nb de feuille".
Merci d'avance pour vos réponses. R-J
.
papou
modifies comme ceci : Application.SheetsInNewWorkbook = 1 Set Newbook = Workbooks.Add ...etc
NB: tu dois spécifier le nombre de feuilles *avant* de créer ton nouveau classeur
Cordialement Pascal
"dub" a écrit dans le message de news:938f01c4789e$31223db0$ Re-bonjour. J'ai inseré ta commande, mais j'ai systématiquement l'erreur sur le mot "with" dans mon module suivant: Set Newbook = Workbooks.Add ActiveWorkbook.SaveAs Filename:= _ "C:TEMPREFACT_1 2004.xls" ' With Application.SheetsInNewWorkbook = 1 ' End With J'ai mis les côtes pour le moment, peux tu me dire ce qu'il me manque ? Merci
-----Message d'origine----- Bonjour Pour n'avoir qu'une seule feuille dans le classeur créé : With Application .SheetsInNewWorkbook = 1 End With Et s'il s'agit de créer un nouveau classeur, il vaut mieux utiliser
Workbooks.Add
Cordialement Pascal
"dub" a écrit dans le message de
news:924c01c47897$d24e2cf0$ Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur, avec comme option une seule feuille de calcul. Je pense à utiliser Workbooks.open, mais je ne trouve pas l'option "nb de feuille".
Merci d'avance pour vos réponses. R-J
.
modifies comme ceci :
Application.SheetsInNewWorkbook = 1
Set Newbook = Workbooks.Add
...etc
NB: tu dois spécifier le nombre de feuilles *avant* de créer ton nouveau
classeur
Cordialement
Pascal
"dub" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:938f01c4789e$31223db0$a601280a@phx.gbl...
Re-bonjour.
J'ai inseré ta commande, mais j'ai systématiquement
l'erreur sur le mot "with" dans mon module suivant:
Set Newbook = Workbooks.Add
ActiveWorkbook.SaveAs Filename:= _
"C:TEMPREFACT_1 2004.xls"
' With Application.SheetsInNewWorkbook = 1
' End With
J'ai mis les côtes pour le moment, peux tu me dire ce
qu'il me manque ?
Merci
-----Message d'origine-----
Bonjour
Pour n'avoir qu'une seule feuille dans le classeur créé :
With Application
.SheetsInNewWorkbook = 1
End With
Et s'il s'agit de créer un nouveau classeur, il vaut
mieux utiliser
Workbooks.Add
Cordialement
Pascal
"dub" <anonymous@discussions.microsoft.com> a écrit dans
le message de
news:924c01c47897$d24e2cf0$a301280a@phx.gbl...
Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur,
avec comme option une seule feuille de calcul.
Je pense à utiliser Workbooks.open, mais je ne trouve pas
l'option "nb de feuille".
modifies comme ceci : Application.SheetsInNewWorkbook = 1 Set Newbook = Workbooks.Add ...etc
NB: tu dois spécifier le nombre de feuilles *avant* de créer ton nouveau classeur
Cordialement Pascal
"dub" a écrit dans le message de news:938f01c4789e$31223db0$ Re-bonjour. J'ai inseré ta commande, mais j'ai systématiquement l'erreur sur le mot "with" dans mon module suivant: Set Newbook = Workbooks.Add ActiveWorkbook.SaveAs Filename:= _ "C:TEMPREFACT_1 2004.xls" ' With Application.SheetsInNewWorkbook = 1 ' End With J'ai mis les côtes pour le moment, peux tu me dire ce qu'il me manque ? Merci
-----Message d'origine----- Bonjour Pour n'avoir qu'une seule feuille dans le classeur créé : With Application .SheetsInNewWorkbook = 1 End With Et s'il s'agit de créer un nouveau classeur, il vaut mieux utiliser
Workbooks.Add
Cordialement Pascal
"dub" a écrit dans le message de
news:924c01c47897$d24e2cf0$ Bonjour à tous,
Je cherche la commande VB pour ouvrir un nouveau classeur, avec comme option une seule feuille de calcul. Je pense à utiliser Workbooks.open, mais je ne trouve pas l'option "nb de feuille".
