Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
anonymousA
Bonjour,
Plusieurs méthodes existent en utilisant soit :
-ADO -une macro Excel4 (ou son équivalent en VBA6) -Query -la possibilité qu'Excel a de faire une liaison avec un fichier fermé
Bref, ce ne sont pas les choix qui manquent selon ce que l'on souhaite faire.
Pour les deux premières possibilités, 2 choix : soit faire une recherche sur ce forum par Google ou aller sur le site de Frédéric Sigonneau ou Laurent Longre
Pour la 3eme, il y a peu d'exemples sur ce forums d'utilisation de Query mais tu peux faire l'essai toi même si tu disposes de cette fonctionnalité sur ton PC autrement il te faudra l'installer à partir du CD d'Excel ou d'Office.
Pour la 1eme possibilité, il existe des exemples sur ce forum (toujours en recherchant par Google).
A+
Bonjour,
J'ai vu quelque part que l'on pouvez, avec une macro, lire un fichier Excel sans l'ouvrir. Je ne trouve plus rien à ce sujet.
Pouvez-vous m'aider
Jean
Bonjour,
Plusieurs méthodes existent en utilisant soit :
-ADO
-une macro Excel4 (ou son équivalent en VBA6)
-Query
-la possibilité qu'Excel a de faire une liaison avec un fichier fermé
Bref, ce ne sont pas les choix qui manquent selon ce que l'on souhaite
faire.
Pour les deux premières possibilités, 2 choix : soit faire une recherche
sur ce forum par Google ou aller sur le site de Frédéric Sigonneau ou
Laurent Longre
Pour la 3eme, il y a peu d'exemples sur ce forums d'utilisation de Query
mais tu peux faire l'essai toi même si tu disposes de cette
fonctionnalité sur ton PC autrement il te faudra l'installer à partir du
CD d'Excel ou d'Office.
Pour la 1eme possibilité, il existe des exemples sur ce forum (toujours
en recherchant par Google).
A+
Bonjour,
J'ai vu quelque part que l'on pouvez, avec une macro, lire un fichier Excel
sans l'ouvrir.
Je ne trouve plus rien à ce sujet.
-ADO -une macro Excel4 (ou son équivalent en VBA6) -Query -la possibilité qu'Excel a de faire une liaison avec un fichier fermé
Bref, ce ne sont pas les choix qui manquent selon ce que l'on souhaite faire.
Pour les deux premières possibilités, 2 choix : soit faire une recherche sur ce forum par Google ou aller sur le site de Frédéric Sigonneau ou Laurent Longre
Pour la 3eme, il y a peu d'exemples sur ce forums d'utilisation de Query mais tu peux faire l'essai toi même si tu disposes de cette fonctionnalité sur ton PC autrement il te faudra l'installer à partir du CD d'Excel ou d'Office.
Pour la 1eme possibilité, il existe des exemples sur ce forum (toujours en recherchant par Google).
A+
Bonjour,
J'ai vu quelque part que l'on pouvez, avec une macro, lire un fichier Excel sans l'ouvrir. Je ne trouve plus rien à ce sujet.
Pouvez-vous m'aider
Jean
RGI
Bonjour
ou comme ceci pour cela il faut que test.xls soit existant et qu'il y aie une valeur en A1
Function RECUP(Fichier As String, Feuille As String, _ Ligne As Long, Col As Integer) With CreateObject("Excel.Application").Workbooks.Open(Fichier) RECUP = .Worksheets(Feuille).Cells(Ligne, Col) .Close False End With End Function Sub test() Dim ouvrir, mavar As Variant ouvrir = "c:test.xls" mavar = "=RECUP(" & Chr$(34) & ouvrir & Chr$(34) & " ,""feuil1"",1," & 1 & ")" Feuil1.Cells(1, 1).Value = mavar Feuil1.Cells(1, 1) = Feuil1.Cells(1, 1).Value End Sub
Salutations
RGI
Bonjour,
J'ai vu quelque part que l'on pouvez, avec une macro, lire un fichier Excel sans l'ouvrir. Je ne trouve plus rien à ce sujet.
Pouvez-vous m'aider
Jean
Bonjour
ou comme ceci
pour cela il faut que test.xls soit existant et qu'il y aie une valeur en A1
Function RECUP(Fichier As String, Feuille As String, _
Ligne As Long, Col As Integer)
With CreateObject("Excel.Application").Workbooks.Open(Fichier)
RECUP = .Worksheets(Feuille).Cells(Ligne, Col)
.Close False
End With
End Function
Sub test()
Dim ouvrir, mavar As Variant
ouvrir = "c:test.xls"
mavar = "=RECUP(" & Chr$(34) & ouvrir & Chr$(34) & "
,""feuil1"",1," & 1 & ")"
Feuil1.Cells(1, 1).Value = mavar
Feuil1.Cells(1, 1) = Feuil1.Cells(1, 1).Value
End Sub
Salutations
RGI
Bonjour,
J'ai vu quelque part que l'on pouvez, avec une macro, lire un fichier Excel
sans l'ouvrir.
Je ne trouve plus rien à ce sujet.
ou comme ceci pour cela il faut que test.xls soit existant et qu'il y aie une valeur en A1
Function RECUP(Fichier As String, Feuille As String, _ Ligne As Long, Col As Integer) With CreateObject("Excel.Application").Workbooks.Open(Fichier) RECUP = .Worksheets(Feuille).Cells(Ligne, Col) .Close False End With End Function Sub test() Dim ouvrir, mavar As Variant ouvrir = "c:test.xls" mavar = "=RECUP(" & Chr$(34) & ouvrir & Chr$(34) & " ,""feuil1"",1," & 1 & ")" Feuil1.Cells(1, 1).Value = mavar Feuil1.Cells(1, 1) = Feuil1.Cells(1, 1).Value End Sub
Salutations
RGI
Bonjour,
J'ai vu quelque part que l'on pouvez, avec une macro, lire un fichier Excel sans l'ouvrir. Je ne trouve plus rien à ce sujet.
