Tabellenblatt in neue Anwednung kopieren

Forumthread: Tabellenblatt in neue Anwednung kopieren
4 Beiträge zu diesem Forumthread
Anzeige
309 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Excel Dialoge
Top 100 Forumthreads

23.05.2006 15:42:55

Sascha

Hallo,
habe mal wieder ein Problem, das ich mit der Suche nicht zu lösen vermag :-)
In meinem Programm läuft ständig eine Userform. In ihr ist es nun möglich eine Zusammenfassung von bestimmten Daten zu erstellen und in ein neues Tabellenblatt (schön formatiert) zu schreiben.
Das Problem, mit diesem Tabellenblatt kann man nicht arbeiten, da die Userform noch immer aktiv ist - sie soll jedoch auch aktiv bleiben.
Meine Vorstellung:
Das neu generierte Tabellenblatt soll in eine neue Excel-Anwendung kopiert werden (Excel soll also 2-mal laufen). Hier ist keine Userform aktiv und man kann unbeschwert am Tabellenblatt arbeiten.

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Tabellenblatt in neue Anwednung kopieren

23.05.2006 16:37:30

Matthias
AW: Tabellenblatt in neue Anwednung kopieren

23.05.2006 16:47:41

Sascha
AW: Tabellenblatt in neue Anwednung kopieren

23.05.2006 17:06:32

Matthias
AW: Tabellenblatt in neue Anwednung kopieren

23.05.2006 17:25:36

sascha

AW: Tabellenblatt in neue Anwednung kopieren

23.05.2006 16:37:30

Matthias

Hallo Sascha,
Es gibt die Möglichkeit, ein Userform ungebunden darzustellen (Eigenschaft ShowModal=False).
Leider aber erst ab Excel 2000. :-(
Deine Idee stelle ich mir schwer realisierbar wo, da ja ständig Daten zwischen den Anwendungen transferriert werden müssten... Deshalb auf offen.
Gruß Matthias

AW: Tabellenblatt in neue Anwednung kopieren

23.05.2006 16:47:41

Sascha

Ein Datentransfer findet nicht mehr statt. Die Daten werden aus mehreren Tabellenblättern zusammen getragen und als eine Art "Steckbrief" in ein neues Tabellenblatt geschrieben. Es handelt sich hierbei um reinen Text ohne Verknüpfungen oder Formeln.
Es müsste also das erstellte Tabellenblatt z.B. über Sheets("Steckbief").Move in eine neue Anwendung kopiert werden. Leider funktioniert das nicht, da er nur in der bestehenden Anwendung ein neues Workbook hinzufügt.

AW: Tabellenblatt in neue Anwednung kopieren

23.05.2006 17:06:32

Matthias

Hallo Sascha,
versuch mal dies:


Sub NeueInstanz()
Const fn = "D:\test.xls"
Dim xlApp As Object
Sheets("Tabelle1").Copy 'Tabellennamen anpassen
With ActiveWorkbook
.SaveAs Filename:=fn
.Close
End With
'Neue Excel-Instanz öffnen
Set xlApp = CreateObject("Excel.Application")
On Error Resume Next
xlApp.Workbooks.Open Filename:=fn
If Err.Number > 0 Then
On Error GoTo 0
MsgBox "Fehler beim Öffnen von " & fn, vbCritical
xlApp.Quit
Else
xlApp.Application.Visible = True
End If
Set xlApp = Nothing
End Sub

Das Blatt wird in eine neue Mappe kopiert, gespeichert und geschlossen. Dann wird ein neue Instanz gerstellt und die Datei dort geöffnet.
Gruß Matthias

AW: Tabellenblatt in neue Anwednung kopieren

23.05.2006 17:25:36

sascha

Das ist perfekt! Dank dir.
Die "zwischen-gespeicherte" Datei lösche ich dann mit dem Beenden der Haupt-Instanz. Der User wird zuvor aufgefordert die Datei unter seiner eigenen Bezeichnung zu speichern.