vba download und speichern Sie in C:\user

Möchte ich excel VBA verwenden, um eine Datei zu downloaden aus dem internet. Diese Datei ist eine Datenbank mit Informationen über die Liste der Mitarbeiter. Ich möchte die Datei gespeichert C:\Users\"name des Benutzers"\FCMMIS\

Dies ist der Schritt-für-Schritt-Prozess, den ich erreichen will:

Excel mit VBA, downloads, eine Datei von einem angegebenen web-Adresse.
*Die heruntergeladene Datei gespeichert ist C:\Users\"name des Benutzers"\FCMMIS*
Excel-Verknüpfungen mit der heruntergeladenen Datenbank per VBA Daten zu erhalten, die erforderlich sein können.

Als weiterer Hinweis, die excel-Datei in der Frage wird von verschiedenen Menschen mit laptops. Ich bin nicht sicher, ob Sie die Datei speichern in, den Ordner "Benutzer" möglich ist, oder sollten es sein muss-Berechtigungen gegeben werden, um zu ermöglichen, speichern.

Ich weiß, dass es bessere Lösungen wie das schreiben einer vollständigen Anwendung, sondern auch aufgrund der Anforderung, ich bin stecken mit excel und VBA.

BEARBEITEN (dann gemacht werden, nachdem zusammen mit Teil 3):

3.1: Sobald die Datenbank heruntergeladen wurde, dann wird die excel-Datei ruft Datensätze aus der employee-Tabelle und druckt diese in einem neuen Arbeitsblatt in der gleichen excel-Datei.

3.2: Die gedruckten Daten werden dann verwendet für verschiedene Funktionen im Arbeitsblatt.

Allerdings bin ich in eine Debatte darüber, ob es viel effizienter, einfach zu manipulieren die Daten in der Datenbank selbst oder der Arbeit aus den erstellten Arbeitsblatt.

a) was haben Sie bisher ausprobiert? b) Wie denken Sie, können wir möglicherweise helfen, auf Teil 3 - es gibt keinen Spielraum?
Danke für die Antwort brettdj. Ich habe eine grundlegende Idee, was ich tun soll mit Teil 3: 3.1: Sobald die Datenbank heruntergeladen wurde, dann wird die excel-Datei ruft Datensätze aus der employee-Tabelle und druckt diese in einem neuen Arbeitsblatt in der gleichen excel-Datei. 3.2: Die gedruckten Daten werden dann verwendet für verschiedene Funktionen im Arbeitsblatt. Allerdings bin ich in eine Debatte darüber, ob es viel effizienter, einfach zu manipulieren die Daten in der Datenbank selbst oder der Arbeit aus den erstellten Arbeitsblatt.

InformationsquelleAutor Sancho Almeda | 2012-10-10

Folgende code stammt aus ein Artikel von Matt Vidas

Und warten auf Ihre Antwort auf Punkt 3, kein Spielraum?

Function Download_File(ByVal vWebFile As String, ByVal vLocalFile As String) As Boolean
    Dim oXMLHTTP As Object, i As Long, vFF As Long, oResp() As Byte

    'You can also set a ref. to Microsoft XML, and Dim oXMLHTTP as MSXML2.XMLHTTP
    Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP")
    oXMLHTTP.Open "GET", vWebFile, False 'Open socket to get the website
    oXMLHTTP.Send 'send request

    'Wait for request to finish
    Do While oXMLHTTP.readyState <> 4
    DoEvents
    Loop

    oResp = oXMLHTTP.responseBody 'Returns the results as a byte array

    'Create local file and save results to it
    vFF = FreeFile
    If Dir(vLocalFile) <> "" Then Kill vLocalFile
    Open vLocalFile For Binary As #vFF
    Put #vFF, , oResp
    Close #vFF

    'Clear memory
    Set oXMLHTTP = Nothing
End Function



Sub Testing()
    Download_File "http://example.org/yourDataBaseFile", "C:\Users\" & Environ("username") & "\yourDataBaseFile"
End Sub

Danke Larry, sowie brettdj für die Erinnerung in Bezug auf Teil 3. Möglicherweise gibt es eine Instanz, die die excel-Datei auf einem Windows XP Rechner mit Office 97-2003 zu installieren, da einige Vorgesetzte nutzen Ihre persönlichen Computer eher als die von Unternehmen. Was mir sorgen macht ist die MSXML2.XMLHTTP-Objekt. Ist das einheitlich oder für Mangel an einem besseren Begriff enthalten mit der installation von Office 2010 nur?
Meine zugrunde liegende, solange der Benutzer hat IE6 oder höher MSXML2.XMLHTTP-Objekt kommt. Für point3 deaktiviert, wenn die Tabelle Größe ist nicht riesig, dann vielleicht können Sie den export einer Tabelle als csv-Datei oder excel-Datei. Dann können Sie bequem herunterladen und laden Sie Sie in ein excel-Arbeitsblatt

InformationsquelleAutor Larry

0

Wenn die betreffende Datei ein excel Arbeitsmappe, die Sie tun können, diese:
```
With Workbooks.Open("http://example.org/yourfile.xls")
    .SaveAs "C:\Users\example\yourfile.xls"
    .Close
End With
```
Hallo, ich denke, Sie können ändern Sie die zweite Zeile in .SaveAs "C:\Users\" & environ("username") & "\yourfile.xls"
Dank tyomitch für die Anregung und Larry für die follow-through mit Pfad speichern. Dies könnte eine alternative sein, ich werde Aussehen bei seit es erreichen können, die gleiche Leistung. Aber da gibt es möglicherweise zu viele Informationen, die ich brauche, und dass diese Informationen werden in einer Datenbank gespeichert, die durch ein anderes system, glaube ich, dass immer eine Datenbank-Datei wäre eine gute Wahl im moment.

InformationsquelleAutor tyomitch

Schreibe einen Kommentar

Du musst angemeldet sein, um einen Kommentar abzugeben.