Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Excel Makro muss alle Dateien im Ordner durchlaufen

Frage Microsoft Microsoft Office

Mitglied: 45754

45754 (Level 1)

04.05.2007, aktualisiert 09:53 Uhr, 18571 Aufrufe, 3 Kommentare

Hallo zusammen!

Ich bräuchte ein Excel Makro, dass mir aus jeder XLS Datei (Dateiname ansonsten unbekannt), die in dem Unterordner c:\Input liegt, jeweils die Werte A1; B2;C3 holt und schön spaltenweise in eine Zieldatei c:\ziel.XLS schreibt.

Mit einer Datei kein Problem, aber wie sieht die Schleife aus um durch alle Dateien in einem Ordner zu laufen, wenn die Anzahl und der Dateiname bis auf die Endung .xls nicht bekannt ist?

Vielen Dank für eure Hilfe
Mitglied: bastla
04.05.2007 um 07:55 Uhr
Hallo tooltime!

Eine Möglichkeit wäre das "FileSystemObject" von VBScript:
01.
Const sSourcePath As String = "D:\Daten" 
02.
Dim fso as Object, oFile as Object 
03.
Set fso = CreateObject("Scripting.FileSystemObject") 
04.
For Each oFile In fso.GetFolder(sSourcePath).Files 
05.
    If LCase(Right(oFile.Name, 4)) = ".xls" Then 
06.
        Application.Workbooks.Open (oFile.Path) 
07.
        ... 
08.
        ... 
09.
    End If 
10.
Next
Grüße
bastla
Bitte warten ..
Mitglied: 45754
04.05.2007 um 09:36 Uhr
TOP! Vielen Dank

Das funktioniert in soweit, ...

nur kommt bei meinen Dateien sowohl beim Öffnen von Hand als auch mit Makro folgende Fehlermeldung:

Diese Datei enthält Verknüpfungen zu anderen Dateiquellen
...blabla ...dann die Auswahl:
Aktualisieren ............................ Nicht aktualisieren ........................Hilfe

Ich würde natürlich gerne "Nicht aktualisieren" wählen und das automatisch, aber das Makro zeigt mir auch beim Weg MAKRO AUFZEICHNEN keinen Weg diese Fehlermeldung automatisch beantworten zu lassen.

Habt ihr Ideen?
Bitte warten ..
Mitglied: 45754
04.05.2007 um 09:53 Uhr
Lösung geb ich mir gleich selbst:

UpdateLinksAtOpen = True

Die Frage ist nur warum

- True = Nicht aktualisieren
- False = aktualisieren

ist (für mich wäre es umgekehrt logischer) ??

..und ja ich bin mir sicher und hab es schon 5 x ausprobiert ;)
Bitte warten ..
Ähnliche Inhalte
VB for Applications
Fusszeile mit PageSetup mit VBA in Excel Makro funktioniert nicht? (5)

Frage von HerrHart zum Thema VB for Applications ...

VB for Applications
Excel Makro zum Suchen von Spalten und exportieren in CSV (3)

Frage von Raptox zum Thema VB for Applications ...

Microsoft Office
gelöst Excel Makro zum Sortieren von Spalten an größeres Dokument Anpassen (2)

Frage von Rolfor zum Thema Microsoft Office ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
Windows Systemdateien
gelöst NTFS und die Defragmentierung (29)

Frage von WinLiCLI zum Thema Windows Systemdateien ...

Windows Server
gelöst Wechsel von Server 2016 GUI auf Core mit minimal server interface (10)

Frage von Fruehling2017 zum Thema Windows Server ...