Microsoft Excel

Herbers Excel/VBA-Archiv

Automatisch Worksheet aus anderem File einfügen

Betrifft: Automatisch Worksheet aus anderem File einfügen von: Sandra
Geschrieben am: 31.08.2004 11:09:52

Hallo

Zur Zeit arbeite ich mit einem File mit 3 Worksheets. Das 3. ist eine Kopie eines Worksheets aus einem anderen File das sich in der Zeilenzahl verändert. Im Moment kopiere ich das Worksheet von Hand hinein, möchte jedoch, dass dies automatisch beim Start geschieht. Kann man so was machen?

Für Deine Hilfe Danke ich Dir im Voraus
Sandra

  


Betrifft: AW: Automatisch Worksheet aus anderem File einfügen von: FloGo
Geschrieben am: 31.08.2004 11:56:30

Hallo Sandra

Wo befindet sich die Datei (Pfad)???
Wie heißt sie?
Soll die ganze Tabelle mit der neuen aus der anderen Datei ersetzt werden oder nur die gefüllten Zeilen?
Dein Problem ist einfach zulösen wenn man diese Infos hat!

FloGo


  


Betrifft: AW: Automatisch Worksheet aus anderem File einfügen von: Wolfgang
Geschrieben am: 31.08.2004 12:06:04

Hallo Sandra,

füge folgenden Code im VBA Editor (Alt+F11) ein:

Private Sub Workbook_Open()
Dim quelle
Dim ziel As Workbook
Dim kopie As Worksheet
Set ziel = ThisWorkbook

quellepfad = "C:\Testordner\"
quelle = "Testdatei.xls"
blatt = "testblatt"

    ThisWorkbook.Worksheets(blatt).Delete
    Workbooks.Open(quellepfad & quelle).Activate
        Set kopie = Worksheets(blatt)
        kopie.Copy After:=ThisWorkbook.Sheets(2)
    Workbooks(quelle).Close
    
End Sub


quellepfad, quelle und blatt musst du halt noch einrichten.

Hoffe ich konnte dir weiter helfen...

Gruß
Wolfgang


 

Beiträge aus den Excel-Beispielen zum Thema "Automatisch Worksheet aus anderem File einfügen"