Signaler

[VBA - Ouvrir un classeur en masqué [Résolu]

Posez votre question DjSKeud 100Messages postés mardi 25 avril 2006Date d'inscription 22 avril 2015 Dernière intervention - Dernière réponse le 11 oct. 2015 à 02:43
Bonjour,

Est-il possible de recuperer des données d'un classeur Excel vers un autre (par exemple de "toto.xls" vers "tata.xls") sans que le classeur d'ou viennent les données s'ouvre. J'ai essayé avec un Workbooks.open, mais la feuille devient visible.
Existe-il un moyen de ne l'ouvrir que en tache de fond, et de la refermer quand toutes les données sont récupérées ?

Merci d'avance
Afficher la suite 
Utile
+19
moins plus
On est jamais si bien servi que par soit même :

Pour ceux que ça intéresse, voici le code qui permet d'ouvrir un workbook caché:

[code]
Option Explicit
Dim xlApp As New Excel.Application ' déclarer Public si dans un module
Dim xlBook As New Excel.Workbook
Dim xlSheet As New Excel.Worksheet

Sub MaSub()

'Ouvrir le classeur dont on a besoin avec tout le chemin...
Set xlBook = xlApp.Workbooks.Open("LeNomDeTonFichier.xls")
Set xlSheet = xlBook.Sheets("Feuil1") ' si on veut utiliser une feuille en particulier

'Pour vérifier que tout fonctionne bien
MsgBox xlSheet.Range("C8")
'si on ne spécifie pas de feuille
' MsgBox xlBook.Activesheet.Range("C8")
' ou MsgBox xlBook.Sheets("Feuil1").Range("C8")

'Important en quittant le programme ou quand on n'en a plus besoin (pas nécessairement ici...)
xlBook.Close
xlApp.Quit
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing

End Sub
/code



DjSkeud,
http://tomleskeud.free.fr
binet- 11 oct. 2015 à 02:43
avec excel 2013 ca ne marche pas erreur de chargemetn de la dll
Répondre
Ajouter un commentaire
Utile
+1
moins plus
Merci beaucoup !

Marche impec :)
Ajouter un commentaire
Utile
+1
moins plus
merci pour ce code
Ajouter un commentaire
Utile
+1
moins plus
Bonjour,
Il convient également d'ajouter à cette discussion, la possibilité d'aller piocher des informations dans un classeur, sans l'ouvrir! Voir la procédure ici.
Ajouter un commentaire

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !