Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

exceltabelle nach Vorlage in VB 6 erstellen
Autor: workuhol
Datum: 13.11.13 17:54
Hallo Ich habe ein Programm geschrieben, daß mir eine Excelmappe erzeugt mit mehreren Tabellen blättern. Ich möchte aber das die Tabellenblätter nach einer Vorlage erstellt wird, die ich in einer Excel Datei names Vorlage.xlt erzeugt habe. Diese Datei liegt im gleichen Ordner. Kann mir jemand sagen wie ich mein Programm abändern muß sodaß die erzeugten Tabellenblätter, der Vorlage gleichen. Hier der Code der Sub. Public Sub Create_File_and_Sheets(Monat As String, Days As Integer) Dim i As Double Dim c As Integer Dim x As Integer Dim wsNew As Worksheet xlApp.Visible = False Set xlBook = xlApp.Workbooks.Add For i = 1 To Days c = Worksheets.Count x = (i) + 1 If x > Days Then xlBook.SaveAs App.Path & "\" & Monat & ".xls" xlBook.Saved = True Set xlBook = Nothing xlApp.Quit Exit Sub End If Worksheets.Add After:=Worksheets(c) ActiveSheet.Name = (i) & "-" & x Worksheets.Add After:=Worksheets(c) ActiveSheet.Name = (i) Next i End Sub Gruß Gru? workuhol Beitrag wurde zuletzt am 13.11.13 um 17:57:27 editiert.

exceltabelle nach Vorlage in VB 6 erstellen	1.677	workuhol	13.11.13 17:54
Re: exceltabelle nach Vorlage in VB 6 erstellen	978	Blackbox	13.11.13 18:14
Re: exceltabelle nach Vorlage in VB 6 erstellen	1.020	workuhol	14.11.13 15:17
Re: exceltabelle nach Vorlage in VB 6 erstellen	976	Blackbox	14.11.13 18:52
Re: exceltabelle nach Vorlage in VB 6 erstellen	1.002	workuhol	14.11.13 19:25

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen