Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
260to264
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
260to264
260to264
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bereich in Textdatei speichern

Bereich in Textdatei speichern
23.05.2003 12:13:33
Kai
Hallo zusammen!
Ich würde gerne ein Makro erstellen, daß per Tastenkombi (z.B. Strg+b) einen vorgegebenen Bereich meines Arbeitsblattes, z.B. A1:A200 in eine Textdatei schreibt.
Diese Textdatei sollte dann möglichst noch umbenannt werden in "test.htm" oder so..

Ich versuch nämlich gerade, in Excel in der Spalte A einen variablen HTML-Code zu erstellen. Hoffe ihr wisst wie ich das meine und könnt mir helfen :-)


Gruß
Kai

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Bereich in Textdatei speichern
23.05.2003 13:11:59
th.heinrich

hi Kai,

da hilft garantiert die RECHERCHE.

https://www.herber.de/forum/archiv/search/searchlist.htm

als vorschlag: zeichne ein MAKRO mit den von Dir gewuenschten vorgaenge auf. dem MAKRO kannst Du einen short cut zuweisen.

wie eine *.txt mit einer *.htm harmoniert weis ich allerdings nicht.

gruss thomas

p.s. im uebrigen bin ich der meinung, dass die RECHERCHE zu wenig genutzt wird.



Danke Dir!
23.05.2003 13:18:31
Kai

Ich werd dann mal sehen, was ich machen kann, Thomas.
Die Recherche hab ich wirklich nicht benutzt, muß ich zugeben. Dies werd ich aber jetzt mal nachholen :-)

Gruß
Kai

Anzeige
ich hab eine Lösung gefunden!
23.05.2003 13:31:45
Kai

Für diejenigen, die es interessiert:

Sub Textdatei()

Dim fs As Object, a As Object
'Datei "Test.txt" in C:\Windows\Desktop\ erzeugen
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("C:\Windows\Desktop\Test.txt", True)
a.Close

' Datei öffnen.
Open "c:\Windows\Desktop\Test.txt" For Output As #1

Write #1, "Hallo Welt !"

' Datei schließen.
Close #1
Name ("C:\Windows\Desktop\Test.txt") As ("C:\Windows\Desktop\Test.htm")

End Sub


Für "Hallo Welt" muß man dann natürlich einen Zellbereich angeben, den man in die Text- bzw. HTML-Datei schreiben möchte.


Danke für den Tipp mit der Recherche ;-)


Gruß
Kai

Anzeige
keine ursache ot :-)
23.05.2003 14:26:45
th.heinrich

.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige