Ich habe eine Reihe von Excel-Dateien mit ausgefülltem Survery. Jetzt möchte ich ein Master-Dokument haben, das jeweils ein zusammenfassendes Ergebnis enthält.

Daher muss ich für jede Datei eine Zeile eingeben: Name - Adresse - einige Daten ...

Ich möchte jede der Dateien öffnen und die Daten aus ausgewählten Zellen in meine Masterdatei kopieren.

Ich habe herausgefunden, dass ich eine unsichtbare Instanz von Excel erstellen kann, sodass sie dem Benutzer nicht angezeigt wird.

Wie kann ich die Daten von A1 in mein Blatt kopieren / einfügen?

Sub Combine()
  Fpath = "c:\test\" 
  Fname = Dir(Fpath & "*.xls")
  Dim xl As Excel.Application
  Set xl = CreateObject("Excel.Application")
  xl.Visible = false
  Dim w As Workbook
  Dim remoteBook As Workbook
  Set remoteBook = xl.Workbooks.Open(Fpath & Fname)
  xl.Quit
 End Sub

Ich bin neu in VBA, der Zugriff scheint ziemlich kompliziert zu sein. Gibt es eine einfachere Möglichkeit, Werte aus diesen Excel-Dateien abzurufen? Ich wünsche mir wirklich eine einfache Lösung.

Was ist ärgerlicher als VBA-Makros in Umfragedateien? Kann ich diese beim Öffnen deaktivieren, damit der Benutzer nicht dazu aufgefordert wird?

Vielen Dank