Thema Datum  Von Nutzer Rating
Antwort
04.08.2016 14:06:19 Nadine
NotSolved
Blau Excel: Mehrere Dateien mit Schleife öffnen
04.08.2016 16:48:30 Gast13386
NotSolved
05.08.2016 09:11:15 Nadine
Solved

Ansicht des Beitrags:
Von:
Gast13386
Datum:
04.08.2016 16:48:30
Views:
645
Rating: Antwort:
  Ja
Thema:
Excel: Mehrere Dateien mit Schleife öffnen

Hallo Nadine,

auch wenn es vielleicht einen Kulturschock gibt, um mit einer Schleife 4 Dateien von beliebigen Orten zu öffnen, würde ich so einen Code wählen:

 

sub Files_oeffnen()
dim WB as workbook

sFile = array("Pfad & Datei1", "Pfad & Datei2", "Pfad & Datei3", "Pfad & Datei4", )

for each sF in sFile
set wb = workbooks.open(sF)
'hier die Code zum einlesen/kopieren/ändern
wb.close 0
next sF

end sub

 

Falls die Datein in einem Ordner stehen und die Namen leicht durch Excel-Formeln zusammengesetz werden können, geht auch die übliche "Dir"Schleife:

sub lesen()

dim wb as Workbook

sPath = "c:\temp\"

sFile = dir(sPath & "*.xslx")

do while len(sFile)

set wb = workbooks.open(sFile)

'hier die codes zum kopieren usw

wb.close 0

sFile = dir

loop

end sub

_________

mfg

 


Ihre Antwort
  • 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: Name: Email:



  • 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
04.08.2016 14:06:19 Nadine
NotSolved
Blau Excel: Mehrere Dateien mit Schleife öffnen
04.08.2016 16:48:30 Gast13386
NotSolved
05.08.2016 09:11:15 Nadine
Solved