Thema Datum  Von Nutzer Rating
Antwort
18.10.2018 12:02:49 Julius
Solved
Blau Dateien in VBA hochladen ohne diese in Excel zu öffnen
 18.10.2018 22:37:24 Flotter Feger
NotSolved
19.10.2018 08:40:39 Gast62023
NotSolved
19.10.2018 10:21:11 Gast73914
NotSolved

Ansicht des Beitrags:
Von:
Flotter Feger		 Datum:
18.10.2018 22:37:24		 Views:
512		 Rating:
     
Antwort:
  Ja
Thema:
Dateien in VBA hochladen ohne diese in Excel zu öffnen

Hallo,

über einen TextStream sollte das gehen.

Sub x()
Dim arrDaten() As String

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("c:\Deine.csv")

Do While objTextFile.AtEndOfStream <> True

    If objTextFile.Line = 1 Then objTextFile.Skipline
    
    strline = objTextFile.ReadLine
    
    MsgBox strline
    
    arrDaten = Split(strline, " ") 'Chr(9))
    arrDaten(0) = Left(arrDaten(0), 2)
    ' verwendet nur die ersten sechs Ziffern des ersten Array-Elements
    ' zweites Array-Element ist arrDaten(1), drittes arrDaten(2), usw ...
    MsgBox arrDaten(0)
    
    '...
Loop
objTextFile.Close
End Sub

Ist natürlich nicht fertig ... ich hab schließlich keine Ahnung, wie du deine Datei haben willst.

VG Sabina

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
18.10.2018 12:02:49 Julius
Solved
Blau Dateien in VBA hochladen ohne diese in Excel zu öffnen
 18.10.2018 22:37:24 Flotter Feger
NotSolved
19.10.2018 08:40:39 Gast62023
NotSolved
19.10.2018 10:21:11 Gast73914
NotSolved