Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1496to1500
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1496to1500
1496to1500
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datei in richtigen Ordner speichern

Datei in richtigen Ordner speichern
07.06.2016 10:35:45
CHwillswissen
Hallo VBA-Profis,
ich habe folgendes Problem und hoffe ihr könnt mir dabei helfen.
Ich habe eine Excel Datei in der ich verschiedene Daten eintrage. Nachdem diese Datei ausgefüllt worden ist, wird mit Hilfe einer Schaltfläche eine .ini Datei mit den eingegebenen Daten erzeugt. Diese .ini Datei wird schließlich automatisch gespeichert.
Nun zu meinem Problem:
Die .ini Datei soll in einen ganz bestimmten Ordner gespeichert werden. Der Zeilspeicherordner ergibt sich daraus, was in der Zelle A10 der Excel Datei steht.
Wenn also zb. in der Zelle A10 ABC-123 steht, soll die Datei in den Ordner ABC gespeichert werden. Oder wenn zb. in Zelle A10 CBA-321 steht, soll die .ini Datei in den Ordner CBA gespeichert werden. Die Zielordner zum Speichern existieren bereits und sind alle unter einem Oberordner XXX gespeichert. Also Oberordner XXX mit den Unterordnern ABC, CBA, usw.
Ich hoffe ich habe mich nicht zu kompliziert ausgedrückt und ihr könnt mir helfen.
Grüße CHwillswissen

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datei in richtigen Ordner speichern
07.06.2016 10:52:40
Rudi
Hallo,
Zielordner = "c:\XXX\ & split(Range("A10","-")(0) &"\"
Gruß
Rudi

AW: Datei in richtigen Ordner speichern
07.06.2016 13:00:37
CHwillswissen
Hallo Rudi,
danke für deine schnelle Antwort! Ich habe mal versucht es einzubauen, doch leider klappt es noch nicht. Ich bekomme immer die Fehlermeldung: Fehler beim Kompilieren: Erwartet Anweisungsende.
Sub Neue_Dateien_erstellen()
Application.ScreenUpdating = False
Dim intFF As Integer
Dim iZeile As Integer
Dim i As Integer
Dim ini As String
Dim iniTemp As String
Dim inifilename As String
Dim iniOrdner As String
iniOrdner = CStr(Range("pathfertig"))
inifilename = CStr(Range("filename"))
'If Dir("iniOrdner", vbDirectory) = "" Then
'    MkDir ("iniOrdner")
'End If
ChDir "C:\Users\hec7sw\Desktop\Funktionsprüfung\iniFiles\ &split(Range("B13","-")(0)&"\"
ini = iniOrdner + inifilename
intFF = FreeFile
iZeile = 1
i = 1
Open Range("O7") & ".ini" For Output As #intFF
For i = 5 To 36
iniTemp = Cells(i, 1)
Print #intFF, iniTemp
Next i
Close #intFF
MsgBox "Dateien erstellt"
Application.ScreenUpdating = True
End Sub
Vielleicht kann mir da noch jemand weiterhelfen.
Vielen Dank!
Gruß CHwillswissen

Anzeige
AW: Datei in richtigen Ordner speichern
07.06.2016 14:05:03
Rudi
hallo,
dir fehlt ein " und ein ).
ChDir "C:\Users\hec7sw\Desktop\Funktionsprüfung\iniFiles\" & Split(Range("B13"), "-")(0) & "\"
Gruß
Rudi

AW: Datei in richtigen Ordner speichern
07.06.2016 15:24:45
CHwillswissen
Hallo Rudi,
die Anfängerfehler habe ich nun beseitigt. Allerdings funktioniert es immer noch nicht so wie ich es gerne hätte.
Bei ChDir "C:\Users\hec7sw\Desktop\Hallo\" & Split(Range("B13"), "-")(0) & "\" kommt die Fehlermeldung, dass der Pfad nicht existiert, obwohl er existiert.
Ich habe das ganze jetzt mit MkDir "C:\Users\hec7sw\Desktop\Hallo\" & Split(Range("B13"), "-")(0) & "\"
probiert und damit funktioniert es zur Hälfte.
Es werden hier Ordner erzeugt, die so heißen wie die ersten drei Buchstaben aus Zelle B13. Allerdings sind diese Unterordner ja schon von mir vorgegeben und nur die .ini Files sollen darin sotiert abgespeichert werden.
Ich bin leider noch ziemlich neu auf dem Gebiet Excel VBA :-(
Gruß CHwillswissen

Anzeige
AW: Datei in richtigen Ordner speichern
09.06.2016 08:46:46
CHwillswissen
Hat noch jemand eine Lösung?
Liebe Grüße
CHwillswissen

304 Forumthreads zu ähnlichen Themen

Wechselnde Werte in VBA
Oliver

Hallo VBAler,
ich habe folgendes Problem, ich möchte gern eine Strategie an Hand von Hoch und Tiefpunkten testen, dies hat bisher einwandfrei funktioniert ... nun soll aber zwischen jedem ermitteltem Hoch zu einem Tief 3 Monate liegen - von Tief zu hoch besteht weiter mindesthaltedauer 1 M...
01.09.2008 14:39:15
Thread-ID: 1006370
6 Beiträge
Anzeige
FTP: Die Datei in den gleichen Ordner imopt.
Edie

Hallo zusammen,
habe im Archiv nachfolgende Code gefunden. Es wird per FTP eine Textdatei vom Server
runtergeladen. Dabei sollte die Textdatei in den gleichen Ordner importiert werden, dazu habe
ich den Code etwas angepasst mit: Dim Path$ und Path = ThisWorkbook.Path
In der Lo...
17.11.2008 20:22:40
Thread-ID: 1025395
4 Beiträge
Umwandeln in Zahlen mit VBA
Bernhard

Hallo liebe Excel-Experten,
heute brauche ich Eure Hilfe für folgendes Problem: Ich importiere Daten aus einer anderen Anwendung nach Excel und ich bekomme die Zahlen als Text formartiert. Die Zahlen sehen z.B. wie folgt aus: 4.75m, was als Zahl 4750000 entspricht. Ist es mit einem VBA-Code...
25.11.2008 13:46:12
Thread-ID: 1027705
4 Beiträge
Anzeige
Dateien löschen auch in Unterordner
Andre´

Hallo alle zusammen,
Ich möchte alle TXT-Dateien löschen die sich unter:
C:\Backup\Jahr
befinden aber nur wenn diese älter als 60 Tage sind.
Dabei sollen auch alle Unterordner falls vorhanden durchsucht werden.
Ich hoffe mir kann jemand helfen.
Vielen Dank im Voraus!
...
16.01.2009 12:10:00
Thread-ID: 1040526
12 Beiträge
Formeln in Zelle per VBA festlegen
Ryu

Hallo zusammen,
fällt jemanden auf warum es zu Fehler 1004 bei folgendem Code kommt? Es liegt an der Zeile wo ich die Formel in "H4" definiere. Dort möchte ich mit Funktion Verweis den Wert der Spalte C (Blatt Daten) rausfinden, wenn es dem Wert der Spalte D (Blatt Daten) gleich D11 (Blatt...
24.02.2009 16:15:40
Thread-ID: 1053577
9 Beiträge
Worddateien in Ordner auslesen
Dirk

Hallo Excelgemeinde!
Ich brauche eure Hilfe!!!!
Ich habe folgendes Problem:
Ich muß bestimmte Daten aus allen vorhandenen Word Dokumenten in einem Verzeichnis (inkl. Unterverzeichnisse) auslesen. Ich habe bereits eine Exceldatei mit der ich eine Worddatei in einem Verzeichnis auswäh...
14.03.2009 19:39:18
Thread-ID: 1060243
7 Beiträge
Alle Dateien eines Ordners öffnen
Florian

Hallo liebes Forum,
habe wieder mal eine Frage:
wie kann ich alle Workbooks in einem [bestimmten] Ordner ansprechen? Der Pfad ist mir dabei nur teilweise bekannt, d.h. ich kenne den genauen Anfang des Pfades nicht (dieser ändert sich mit jedem Durchlauf). Das Ende des Pfades ist mir wie...
07.04.2009 15:04:17
Thread-ID: 1067433
2 Beiträge
Dateien in Ordner bewegen
Claudia

Hallo zusammen,
ich stehe vor einer unlösbaren Aufgabe. Bleibt sie ungelöst, bin ich der "A..... der Welt" und muss das händisch machen.
Also ich beschreibe mein Problem.
Es gibt einen Ordner "Kundenverträge" (Pfad ist ja erst einmal egal, den müsste ich ohnehin noch anpassen).
...
17.04.2009 17:14:40
Thread-ID: 1069345
15 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
9
3
3
1
11
8
6
1
14
4
3
4
3
17
3
3
3
1
13
6
1
3
5
17