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

[bérylion]

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 :

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]

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]

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 ]