Bonjour,
En VBA, j'ajoute un nouveau classeur: Workbooks.Add.
J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté
comme par exemple "Classeur5".
J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la
compile...
Grand merci a celle ou celui qui saura me dépanner?
Merci
Noégor
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
FFO
Salut à toi
Un classeur ajouté est automatiquement nommé par Excel sans extension .xls selon un compteur sous la forme Classeur(n°x) Il prend le nom que tu lui affectes lorque tu l'enregistre dans un répertoire Pour celà tu mets : ActiveWorkbook.SaveAs "C:CheminTransfert.xls
Un classeur ajouté est automatiquement nommé par Excel sans extension .xls
selon un compteur sous la forme Classeur(n°x)
Il prend le nom que tu lui affectes lorque tu l'enregistre dans un répertoire
Pour celà tu mets :
ActiveWorkbook.SaveAs "C:CheminTransfert.xls
Un classeur ajouté est automatiquement nommé par Excel sans extension .xls selon un compteur sous la forme Classeur(n°x) Il prend le nom que tu lui affectes lorque tu l'enregistre dans un répertoire Pour celà tu mets : ActiveWorkbook.SaveAs "C:CheminTransfert.xls
Un petit supplément, tu peux modifier le texte qu'il a y dans la barre de titre de cette manière :
Sub test() 'Pour remplacer Microsoft Excel Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls" End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" a écrit dans le message de groupe de discussion : Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
Un petit supplément, tu peux modifier
le texte qu'il a y dans la barre de titre de
cette manière :
Sub test()
'Pour remplacer Microsoft Excel
Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX
Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls"
End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" <nospam-rogeon@group-atlantis.com> a écrit dans le message de groupe de
discussion : u5czwYthJHA.448@TK2MSFTNGP05.phx.gbl...
Bonjour,
En VBA, j'ajoute un nouveau classeur: Workbooks.Add.
J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté
comme par exemple "Classeur5".
J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la
compile...
Grand merci a celle ou celui qui saura me dépanner?
Merci
Noégor
Un petit supplément, tu peux modifier le texte qu'il a y dans la barre de titre de cette manière :
Sub test() 'Pour remplacer Microsoft Excel Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls" End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" a écrit dans le message de groupe de discussion : Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
le paramêtre de la méthode add de la collection Workbooks est Template, il permet l'utilisation d'un classeur existant comme modèle. Dans ce cas cela ouvrira toto1 C'est différent mais c'est parfois utile.
-- lSteph
On 4 fév, 15:37, "Noégor" wrote:
Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affec té comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
le paramêtre de la méthode add de la collection Workbooks
est Template, il permet l'utilisation d'un classeur existant comme
modèle.
Dans ce cas cela ouvrira toto1
C'est différent mais c'est parfois utile.
--
lSteph
On 4 fév, 15:37, "Noégor" <nospam-rog...@group-atlantis.com> wrote:
Bonjour,
En VBA, j'ajoute un nouveau classeur: Workbooks.Add.
J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affec té
comme par exemple "Classeur5".
J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la
compile...
Grand merci a celle ou celui qui saura me dépanner?
Merci
Noégor
le paramêtre de la méthode add de la collection Workbooks est Template, il permet l'utilisation d'un classeur existant comme modèle. Dans ce cas cela ouvrira toto1 C'est différent mais c'est parfois utile.
-- lSteph
On 4 fév, 15:37, "Noégor" wrote:
Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affec té comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
Noégor
Merci à tous, je voulais justement eviter d'enregistrer ce classeur de travail. Je pense que la proposition de lSteph va me sortir d'affaire. A bientôt pour progresser encore. Bonne soirée. Noégor "Noégor" a écrit dans le message de news:
Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
Merci à tous, je voulais justement eviter d'enregistrer ce classeur de
travail. Je pense que la proposition de lSteph va me sortir d'affaire.
A bientôt pour progresser encore.
Bonne soirée.
Noégor
"Noégor" <nospam-rogeon@group-atlantis.com> a écrit dans le message de
news:u5czwYthJHA.448@TK2MSFTNGP05.phx.gbl...
Bonjour,
En VBA, j'ajoute un nouveau classeur: Workbooks.Add.
J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté
comme par exemple "Classeur5".
J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la
compile...
Grand merci a celle ou celui qui saura me dépanner?
Merci
Noégor
Merci à tous, je voulais justement eviter d'enregistrer ce classeur de travail. Je pense que la proposition de lSteph va me sortir d'affaire. A bientôt pour progresser encore. Bonne soirée. Noégor "Noégor" a écrit dans le message de news:
Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
garnote
Si tu remplaces le Caption par défault d'Excel par autre chose, comment faire pour afficher à nouveau le caption par défaut ?
Serge
"michdenis" a écrit dans le message de news:
Un petit supplément, tu peux modifier le texte qu'il a y dans la barre de titre de cette manière :
Sub test() 'Pour remplacer Microsoft Excel Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls" End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" a écrit dans le message de groupe de discussion : Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
Si tu remplaces le Caption par défault d'Excel par autre chose,
comment faire pour afficher à nouveau le caption par défaut ?
Serge
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news: A62AA975-59E8-4F34-8167-77B53D828809@microsoft.com...
Un petit supplément, tu peux modifier
le texte qu'il a y dans la barre de titre de
cette manière :
Sub test()
'Pour remplacer Microsoft Excel
Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX
Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls"
End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" <nospam-rogeon@group-atlantis.com> a écrit dans le message de groupe de
discussion : u5czwYthJHA.448@TK2MSFTNGP05.phx.gbl...
Bonjour,
En VBA, j'ajoute un nouveau classeur: Workbooks.Add.
J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté
comme par exemple "Classeur5".
J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la
compile...
Grand merci a celle ou celui qui saura me dépanner?
Merci
Noégor
Si tu remplaces le Caption par défault d'Excel par autre chose, comment faire pour afficher à nouveau le caption par défaut ?
Serge
"michdenis" a écrit dans le message de news:
Un petit supplément, tu peux modifier le texte qu'il a y dans la barre de titre de cette manière :
Sub test() 'Pour remplacer Microsoft Excel Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls" End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" a écrit dans le message de groupe de discussion : Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
michdenis
Application.Caption = "Microsoft Excel"
Ça ne fonctionne pas ?
De toute façon lorsque tu fermes excel et que tu le ré-ouvres l'en-tête reprend ses lettres de noblesse !
"garnote" a écrit dans le message de groupe de discussion :
Si tu remplaces le Caption par défault d'Excel par autre chose, comment faire pour afficher à nouveau le caption par défaut ?
Serge
"michdenis" a écrit dans le message de news:
Un petit supplément, tu peux modifier le texte qu'il a y dans la barre de titre de cette manière :
Sub test() 'Pour remplacer Microsoft Excel Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls" End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" a écrit dans le message de groupe de discussion : Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
Application.Caption = "Microsoft Excel"
Ça ne fonctionne pas ?
De toute façon lorsque tu fermes excel et que tu le ré-ouvres
l'en-tête reprend ses lettres de noblesse !
"garnote" <garnote3RIEN@videotron.ca> a écrit dans le message de groupe de discussion :
uJd3CxuhJHA.448@TK2MSFTNGP05.phx.gbl...
Si tu remplaces le Caption par défault d'Excel par autre chose,
comment faire pour afficher à nouveau le caption par défaut ?
Serge
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
A62AA975-59E8-4F34-8167-77B53D828809@microsoft.com...
Un petit supplément, tu peux modifier
le texte qu'il a y dans la barre de titre de
cette manière :
Sub test()
'Pour remplacer Microsoft Excel
Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX
Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls"
End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" <nospam-rogeon@group-atlantis.com> a écrit dans le message de groupe de
discussion : u5czwYthJHA.448@TK2MSFTNGP05.phx.gbl...
Bonjour,
En VBA, j'ajoute un nouveau classeur: Workbooks.Add.
J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté
comme par exemple "Classeur5".
J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la
compile...
Grand merci a celle ou celui qui saura me dépanner?
Merci
Noégor
De toute façon lorsque tu fermes excel et que tu le ré-ouvres l'en-tête reprend ses lettres de noblesse !
"garnote" a écrit dans le message de groupe de discussion :
Si tu remplaces le Caption par défault d'Excel par autre chose, comment faire pour afficher à nouveau le caption par défaut ?
Serge
"michdenis" a écrit dans le message de news:
Un petit supplément, tu peux modifier le texte qu'il a y dans la barre de titre de cette manière :
Sub test() 'Pour remplacer Microsoft Excel Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls" End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" a écrit dans le message de groupe de discussion : Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
Daniel.C
Bonjour. Application.Caption = "" Cordialement. Daniel
Si tu remplaces le Caption par défault d'Excel par autre chose, comment faire pour afficher à nouveau le caption par défaut ?
Serge
"michdenis" a écrit dans le message de news:
Un petit supplément, tu peux modifier le texte qu'il a y dans la barre de titre de cette manière :
Sub test() 'Pour remplacer Microsoft Excel Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls" End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" a écrit dans le message de groupe de discussion : Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
Bonjour.
Application.Caption = ""
Cordialement.
Daniel
Si tu remplaces le Caption par défault d'Excel par autre chose,
comment faire pour afficher à nouveau le caption par défaut ?
Serge
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
A62AA975-59E8-4F34-8167-77B53D828809@microsoft.com...
Un petit supplément, tu peux modifier
le texte qu'il a y dans la barre de titre de
cette manière :
Sub test()
'Pour remplacer Microsoft Excel
Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX
Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls"
End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" <nospam-rogeon@group-atlantis.com> a écrit dans le message de
groupe de
discussion : u5czwYthJHA.448@TK2MSFTNGP05.phx.gbl...
Bonjour,
En VBA, j'ajoute un nouveau classeur: Workbooks.Add.
J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté
comme par exemple "Classeur5".
J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la
compile...
Grand merci a celle ou celui qui saura me dépanner?
Merci
Noégor
Bonjour. Application.Caption = "" Cordialement. Daniel
Si tu remplaces le Caption par défault d'Excel par autre chose, comment faire pour afficher à nouveau le caption par défaut ?
Serge
"michdenis" a écrit dans le message de news:
Un petit supplément, tu peux modifier le texte qu'il a y dans la barre de titre de cette manière :
Sub test() 'Pour remplacer Microsoft Excel Application.Caption = "MonTexte"
'Et pour afficher autre chose que ClasseurX Application.ActiveWindow.Caption = "LeNomDeMonFichier.xls" End Sub
Mais il faut enregistrer le ficher pour le baptiser vraiment.
"Noégor" a écrit dans le message de groupe de discussion : Bonjour, En VBA, j'ajoute un nouveau classeur: Workbooks.Add. J'aurai souhaité le nommer "Transfert" au lieu du nom automatique affecté comme par exemple "Classeur5". J'ai essayé Workbooks.Add.Name="Transfert", mais ça ne passe pas la compile... Grand merci a celle ou celui qui saura me dépanner? Merci Noégor
