Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Inhalt der TXT-Datei in die Zwischeblage speichern

Inhalt der TXT-Datei in die Zwischeblage speichern
10.01.2018 01:25:21
Sergej
Hallo zusammen,
ich habe in einer TXT-Datei die hier liegt C:\Daten\Zugang.txt die nur eine Zeile beinhaltet und in der ein Passwort eingetragen ist.
Wie kann bitte per VBA aus einer TextDatei den Inhalt der Datei (nur eine Ziele) in die Zwischenablage speichern?
Beste Grüße,
Sergej
Anzeige

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

Betreff
Datum
Anwender
Anzeige
Der Inhalt einer Textdatei in...
10.01.2018 07:46:41
Case
Hallo, :-)
... die Zwischenablage kopieren geht so der Spur nach: ;-)
Option Explicit
Sub Main()
Dim objClipBoard As Object
Dim strTMP As String
On Error GoTo Fin
Open "C:\Daten\Zugang.txt" For Binary As #1
strTMP = Space(LOF(1))
Get #1, , strTMP
Close #1
Set objClipBoard = CreateObject("new:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
With objClipBoard
.SetText strTMP
.PutInClipboard
End With
Fin:
MsgBox "Inhalt Zwischenablage = " & strTMP
Set objClipBoard = Nothing
If Err.Number  0 Then MsgBox "Error: " & _
Err.Number & " " & Err.Description
End Sub
Servus
Case

Anzeige
AW: Der Inhalt einer Textdatei in...
10.01.2018 12:55:32
Sergej
Hallo Case,
vielen Dank!
Gruß,
Sergej
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige