XL 2010 [RÉSOLU]comment ''ouvrir une copie'' par vba ?

bérylion · 26 Avril 2017

bonjour la foule,

quand on veut ouvrir un classeur, (Fichier>ouvrir...) on peut choisir d'ouvrir en lecture seule en cliquant sur le menu déroulant à coté du bouton ''ouvrir"

ça je sais faire par vba :

VB:

Workbooks.Open Filename:="MonDrive:\MonPath\MonWorkbook.xlsx", ReadOnly:=True

quand on veut ouvrir un classeur, (Fichier>ouvrir...) on peut choisir d'ouvrir une copie en cliquant sur le menu déroulant à coté du bouton ''ouvrir"

ça, j'ai pas trouvé comment le faire par vba ?!..
c'est possible ou pas ??
et si oui, comment ?!

à vot' bon coeur...

Dranreb · 26 Avril 2017

Bonjour.
L'enregistreur donne Workbooks.Add Template:= suivi du chemin.
Le classeur semble avoir le statut d'un nouveau classeur, non enregistré donc, sauf qu'au lieu de s'appeler "Classeur1" il porte quand même déjà le nom du classeur source, mais sans extension.

bérylion · 26 Avril 2017

Dranreb à dit:
VB:

Set MonWorkbook = Workbooks.Add (Template:= "MonDrive:\MonPath\MonWorkbook.xlsx")

Royal !!

le classeur s'appelle MonWorkbook1 sans extension, c'est parfait pour ce que je veux en faire (copie locale du classeur pour consultation...)

Merci à toi

[EDIT: sur excel 2010, l'enregistreur me donne pas la même chose ]

XL 2010 [RÉSOLU]comment ''ouvrir une copie'' par vba ?

bérylion

XLDnaute Occasionnel

Dranreb

XLDnaute Barbatruc

bérylion

XLDnaute Occasionnel

Discussions similaires