Office: Zellinhalt als Datei im Notepad speichern

Hallo Experten
da komme ich nicht mehr weiter......
nur der Zellinhalt von zB. Zelle H3 (bis zu 10000 Zeichen, weder harte noch weiche Zeilenumbrüche sind zugelassen - eine Text- oder CSV-Datei kann nicht weiterverarbeitet werden) soll mittels CommandButton im Notepad als Datei gespeichert werden. (Name der zu speichernden Datei ist aufsteigend, beginnend mit Datum/Laufnummer in Zelle F3 hinterlegt.. ("20231104_1.lsv"). Die Erstellung der Datei soll im Hintergrund vorgenommen werden und als Bestätigung in Zelle J1 bestätigt werden (Name, usw).
Gruss aus der CH Kunta208

 

Speichere die Datei als .TXT

Du bist im falschen Forum. Bildbearbeitung ist ein anderes.
Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.

Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.

Ich baue keine Datei nach, die Zeit hat schon jemand investiert.

Bilder statt Datei | Excel ist sexy!
Eine hochgeladene Arbeitsmappe erhöht die Wahrscheinlichkeit, dass Du eine Lösung für Dein Problem erhältst.
Erstelle folglich bitte eine Demomappe, aus der deine Aufgabenstellung klar erkennbar ist und lade diese Mappe mit einem aussagekräftigen Dateinamen hoch.
Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender*, UserForm*, Forum* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.
Es sollte ein aussagekräftiger Name sein.
Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten ändern. Schaue Datei
http://hajo-excel.de/gepackt/fremd/Datei_verschluesseln.zip
Bei Download beachte bitte: von unsicheren Servern file-upload lade ich keine Datei herunter (lt. Einschätzung meines Virenprogramms)

Das ist nur meine Meinung zu dem Thema.

 

Vielen dank für die Info Hajo
in der Zwischenzeit habe ich es selbst rausgekriegt. (Dateisuffix muss zwingend " ..lsv" sein, obwohl Textformat ohne Zeilenumbrüche.
Anyway, einen schönen Tag an alle....

Sub lsv_exp()

Sheets("lsv_aufbereitung").Select

Dim l As String
Dim s As String
Dim n As String
Dim sFile As String

l = Cells(3, 8).Value
s = "G:\Meine Ablage\Liegenschaften_privat\LSV_bank\test"
n = Cells(3, 6).Value

sFile = n
sFile = s & "\" & sFile & ".lsv"
Open sFile For Output As #1
Print #1, l
Close

MsgBox prompt:=" Datei " & n & " ist im Verzeichnis: " & vbLf & vbLf & s & vbLf & vbLf & " Bitte an die Bank senden !"

End Sub