Ouvrir un fichier Excel en lecture avec VBA sans l'afficher
Ouvrir un fichier Excel en lecture avec VBA sans l'afficher
Comment ouvrir un fichier Excel en arrière-plan (sans le montrer à l'utilisateur) en VBA ?
Re: Ouvrir un fichier Excel en lecture avec VBA sans l'afficher
```vba
Application.ScreenUpdating = False
Dim wb As Workbook
Set wb = Workbooks.Open("C:\fichier.xlsx", ReadOnly:=True)
' Faire vos opérations...
Dim valeur As Variant
valeur = wb.Sheets(1).Range("A1").Value
' Fermer sans enregistrer
wb.Close SaveChanges:=False
Application.ScreenUpdating = True
```
Pour complètement cacher le classeur :
```vba
Application.Visible = False
' ... opérations ...
Application.Visible = True
```
Application.ScreenUpdating = False
Dim wb As Workbook
Set wb = Workbooks.Open("C:\fichier.xlsx", ReadOnly:=True)
' Faire vos opérations...
Dim valeur As Variant
valeur = wb.Sheets(1).Range("A1").Value
' Fermer sans enregistrer
wb.Close SaveChanges:=False
Application.ScreenUpdating = True
```
Pour complètement cacher le classeur :
```vba
Application.Visible = False
' ... opérations ...
Application.Visible = True
```