|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
11.10.2024 08:33:39 |
Yan |
|
|
|
11.10.2024 09:15:31 |
Gast42238 |
|
|
|
11.10.2024 09:35:57 |
Gast93484 |
|
|
|
11.10.2024 10:42:12 |
Gast20296 |
|
|
|
11.10.2024 10:51:55 |
Gast4960 |
|
|
|
11.10.2024 11:10:11 |
Yan |
|
|
 Aus Exceldatei kopierter Bereich in Textdatei kopieren |
11.10.2024 11:25:34 |
Yan |
|
|
|
11.10.2024 13:20:18 |
Gast11865 |
|
|
|
11.10.2024 13:31:06 |
Yan |
|
|
Von:
Yan |
Datum:
11.10.2024 11:25:34 |
Views:
21 |
Rating:
|
Antwort:
|
Thema:
Aus Exceldatei kopierter Bereich in Textdatei kopieren |
|
Danke Euch... hat sich erledigt. Habe es jetzt mit anderer Hilfe hinbekommen.
Hier der VBA-Code, der auch funktioniert:
Sub Cuesheet
Dim fso As Object, txtFile As Object, cell as Range, FILEPATH as String
FILEPATH = Environ("USERPROFILE") & "\Desktop\cuesheet.cue"
Set fso = CreateObject("Scripting.FileSystemObject")
Set txtFile = fso.OpenTextFile(FILEPATH, 2, True)
With Sheets(2)
For Each cell In .Range("E3:E80" & .Cells(Rows.Count, "E").End(xlUp).Row)
txtFile.WriteLine cell.Value
Next
End With
txtFile.Close
Set fso = Nothing
Set txtFile = Nothing
End Sub
Grüße,
Yan
|
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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
|
|
11.10.2024 08:33:39 |
Yan |
|
|
|
11.10.2024 09:15:31 |
Gast42238 |
|
|
|
11.10.2024 09:35:57 |
Gast93484 |
|
|
|
11.10.2024 10:42:12 |
Gast20296 |
|
|
|
11.10.2024 10:51:55 |
Gast4960 |
|
|
|
11.10.2024 11:10:11 |
Yan |
|
|
Aus Exceldatei kopierter Bereich in Textdatei kopieren |
11.10.2024 11:25:34 |
Yan |
|
|
|
11.10.2024 13:20:18 |
Gast11865 |
|
|
|
11.10.2024 13:31:06 |
Yan |
|
|