reupération données dans classeur fermer

Question

Bonjour, 

j'ai un ti probleme qui est le suivant...
Alors je sohaite recuperer des donn&#233;es dans un classeur ferm&#233; et j'ai taper le code ci dessous, le pb est qu'il ne veut pas marcher et je ne comprends pas pkoi?

merci d'avance ....

sub recup()
Dim toto As String
Dim titi As String
Dim tata As String
    Dim Chemin As String
    Dim NomFic As String
    Dim Onglet As String
    Dim Ref As String
    Dim A


    NomFic = UserForm1.TextBox1.Value
    Onglet = UserForm1.TextBox2.Value
     toto = "C:\le chemin du fichier"
     tata = " " & NomFic & " .xls"
     Ref = "C11"
    Range("A1").Value = "='" & toto & "\[" & tata & "]" & Onglet & "'!" & Range(Ref)

End Sub

mortalino · Answer

Salut,
Essaie &#231;a :

sub recup()
    Dim Chemin As String
    Dim NomFic As String
    Dim Onglet As String


    NomFic = UserForm1.TextBox1.Text
    Onglet = UserForm1.TextBox2.Text
   Chemin = "C:/chemin complet/" & NomFic
   WorkbooksOpen Filename:=Chemin
   Sheets(Onglet).Select
   
  ' Ici tu place ton code pour r&#233;cup&#233;rer des valeurs dans des variables ou tableau
   ActiveWorkBook.Close
End Sub

Voil&#224;

@ ++

  Mortalino

michelxld · Answer

bonsoir

tu peux faire un essai en rempla&#231;ant la ligne 

Range("A1").Value = "='" & toto & "\[" & tata & "]" & Onglet & "'!" & Range(Ref)

par 

Range("A1").Value = "='" & toto & "\[" & tata & "]" & Onglet & "'!" & Ref

par contre dans cette ligne :

tata = " " & NomFic & " .xls"

tu inseres un espace avant et apres le nom du classeur ...mais c'est peut etre normal dans ton projet ...

bonne soiree
michel

souk69 · Answer

merci pour ta r&#233;ponse  mais la evenement workbookopen ne veut pas se r&#233;aliser..?

mortalino · Answer

Au fait, tu essaies de l'ouvrir &#224; partir de quoi ?
Si c'est pas Excel, il faut cr&#233;er un Object...

http://www.vbfrance.com/infomsg/BONJOUR-LIRE-FEUILLES-EXCEL-AVEC-VBE-ACCESS-0_704182.aspx

Dans cet exemple, &#231;a te dit comment ouvrir Excel depuis une Application Office autre qu'Excel

@ ++

  Mortalino

S4ngo · Answer

Bonsoir, 



j'aurais une question un peu dans le m&#234;me style !!! 



Seulement moi je voudrais envoyer des donn&#233;es dans un excel ferm&#233; !!!
Est ce possible ? parce que j'arrive envoyer les infos dans un excel
ouvert, mais fermer sa ne fonctionne pas :s



Si quelqu'un a une solution, merci d'avance :D

Reupération données dans classeur fermer

5 réponses

Discussions similaires