MS-Office-Forum
Google
   

Zurück   MS-Office-Forum > Windows, Anwendungen & Co. > Windows Automatisierung
Registrieren Forum Hilfe Alle Foren als gelesen markieren

Banner und Co.

Antworten
Ads Der Renner, 11 Entwicklertools für Access, Tipps & Trick und offene Datenbanken zum einzigartigen Preis.
Themen-Optionen Ansicht
Alt 27.07.2015, 13:22   #1
greenhornmarko
Neuer Benutzer
Neuer Benutzer
Tipp Makros fortlaufend auf Ordner anwenden

Hallo Zusammen,

ich mühe mich seit mehreren Wochen mit einer VBA Programmierung hab und habe seither leider kein zufriedenstellendes Ergebnis erarbeiten können. Ich hoffe es kann mir hier jemand weiterhelfen. Es sei dazugesagt, dass ich eigentlich keine Ahnung von VBA Programmierung habe, sondern eher nach dem Prinzip "learning by doing" die ganze Sache anpacke.

Zu meinem Problem:
Ich habe mehrere Dateien im Format .csv in einem Ordner, in diesen Ordner kommt pro Monat immer eine Datei hinzu.
Ich habe ein Makro, dass diese Dateien so, wie sie sind, ins Archive speichert. Dann habe ich ein Weiteres Makro, welches das Format einer bestimmten Spalte ändert.
Nun würde ich gerne eine Lösung finden, diese beiden Makros automatisch auf alle Dateien (die auch noch dazukommen) in meinem Ordner anwendet.
Also das mein Makro erkennt, ob neue Dateien hinzugefügt wurden, wenn ja beide Makros drüber laufen lassen und danach im selben Ordner als .xls abspeichern.

Ich hab durch Recherche folgendes Makro reingesetzt, weiß aber nicht so genau, ob das mein Problem löst, da ich leider nicht sehen kann, ob dieses Makro ausgeführt wird:

Sub neu()
Pfad1 = "p:\Datei\"
name1 = Dir(Pfad1, vbDirectory)
Do While name1 <> ""

If name1 <> "." And name1 <> ".." Then

If (GetAttr(Pfad1 & name1) And vbDirectory) = vbNormal Then

If Right(name1, 3) = "csv" Then
Workbooks.Open Pfad1 & name1


Call Speichern

Call Betrieb

ActiveWorkbook.Close True


End If
Debug.Print name1
End If
End If
name1 = Dir
Loop

End Sub


Ich bin über jede Hilfe dankbar!
greenhornmarko ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Ads
Antworten


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)
 
Themen-Optionen
Ansicht

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge anzufügen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

vB Code ist An.
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist An.
Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:22 Uhr.


Partner und Co.
Access-Paradies -Alles rund um die Datenbank Microsoft Access -Code -Programme-Tools -Tipps   Kostenlose Tipps & Tricks, Downloads und Programme   www.kulpa-online.com - Tipps - Tricks - Tutorials - Meinungen - Downloads uvm...   vb@rchiv · Willkommen in der Welt der VB Programmierung   Access-Garhammer - Hier finden Sie jede Menge Beispiel-Datenbanken zu Access und mehr ...   mcseboard.de   Die Top Seite für Excel-VBA-Makros uvm.

Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

Copyright ©2000-2010 MS-Office-Forum. Alle Rechte vorbehalten.
Copyright ©Design: Manuela Kulpa ©Rechte: Günther Kramer
Eine Verwendung der Inhalte in anderen Publikationen, auch auszugsweise,
ist ohne ausdrückliche Zustimmung der Autoren nicht gestattet.
Beachten Sie bitte auch unsere Nutzungsbedingungen.