Ouverture d'un classeur xls en lecture seul

Bonjour,

Est-il possible au moyen d'une macro VBA d'ouvrir un classeur excel directement en lecture seul et de manière automatique sans boite de dialogue demandant de la valider ?

D'avance merci et bonne journée

Bonjour,

Oui c'est possible.
Par exemple :

Code:

---

1 2	Dim wbAllData As Workbook Set wbAllData = Workbooks.Open(Filename:=<nom du fichier>, ReadOnly:=True)

---

Mon classeur s'appelle "Mon annuaire.xlsm"

J'ai essayé de poser la macro dans:ThisWorkbook

Code:

---

1 2 3 4

Private Sub Workbook_Open() Dim wbAllData As Workbook Set wbAllData = Workbooks.Open(Filename:=<Mon annuaire.xlsm>, ReadOnly:=True) End Sub

---

Et cela ne fonctionne pas !

Sorry, je suis un novice :oops:

Re.

Pour que ça fonctionne :
- le nom de fichier retire les caractères < et >.
- ajoute à la place des < et > le caractère "
- si le fichier ne se trouve pas dans le même dossier que le classeur ouvert qui contient la macro,
précise le dossier dans lequel se trouve le classer avec un chemin absolu (ex : C:\MesDocuments\Dusoir\) dans lequel se trouve le fichier.

Merci à tous cela fonctionne très bien :ccool: