Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1344to1348
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Test Datei öffnen

Test Datei öffnen
04.02.2014 11:14:43
Thomas
Hallo weltbestes Forum
ich bin am verzweifeln ...
beim Aufrufen einer Textdatei mit diesen Code Zeilen:
sPath = Application.ActiveWorkbook.Path
Open "" & sPath & "\Test.txt" For Output As #intFile
kommt folgende Fehlermeldung:
Userbild
Ich habe schon alles bezüglich Zugangs- und Schreibberechtigungen geprüft.
In anderen Anwendungen arbeite ich mit ähnlichen Anweisungen um eine Protokolldatei zu schreiben, ohne Probleme.
Hier möchte ich einfach nur Emailadressen aus einer gefilterten Tabelle lesen und über die Textdatei in dem Format, in dem sie in einer Sammel-Email weiterverarbeitet werden können, zwischenspeichern.
Beim Öffnen der Datei kommt dann diese Schwachsinnsmeldung vom System.
Vielleicht hat ja jemand einen Tipp für mich. Vielen Dank im Voraus.
Thomas S.

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Test Datei öffnen
04.02.2014 11:34:46
Rudi
Hallo,
was soll denn das "" davor?
Open sPath & "\Test.txt" For Output As #intFile
reicht doch.
Welchen Wert hat intFile?
Gruß
Rudi

AW: Test Datei öffnen
04.02.2014 11:53:34
Thomas
Hallo Rudi
intFile benutze ich nachfolgend für den Print-Befehl.
Item1 sind die zuvor gesammelten Email Adressen.
Open sPath & "\Test.txt" For Output As #intFile
Print #intFile, Item1
Mittlerweile habe ich aber eine andere Lösung:
Set OutApp = CreateObject("Outlook.Application")
Set Nachricht = OutApp.CreateItem(0)
With Nachricht
.To = Item1 'Adresse
.Display 'Email anzeigen
End With
Das habe ich aus einem Beitrag hier im Forum abgeleitet ist eigentlich genau das, was ich benötige.
Allerdings ist das Problem von vorher mit dem Laufzeitfehler nicht gelöst.
Vielen Dank für Deine Anregungen.
Thomas S.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige