Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Excel-Automation
Autor: Downunder
Datum: 26.11.01 11:21
Hallo, in einem VB-Modul bearbeite ich via ActiveX eine Excel-Arbeitsmappe, die nach abgeschlossener Bearbeitung automatisch gedruckt wird. Soweit funktioniert auch alles perfekt. Nun möchte ich aber, dass auf Wunsch des Anwenders, nicht automatisch gedruckt wird, sondern die Arbeitsmappe angezeigt wird, so dass vor dem Drucken nochmal manuelle Änderungen vorgenommen werden können. In der jetzigen Version meines Quellcodes hängt sich allerdings jedesmal mein Programm auf, wenn ich die Seitenvorschau betrachten will. Hier der Quellcode: Public Sub AngebotDDrucken(boolVorschau As Boolean) lvarPfad = "T:EDVExcelAngebot.xls" Set wb = GetObject(lvarPfad) 'hier wird nun die Mappe bearbeitet 'und soll dann gedruckt werden If Not boolVorschau Then 'Wenn Vorschau nicht gefordert ist .PrintOut Copies:=1 'dann sofort drucken, funktioniert auch prima Else 'Sonst wb.Activate 'Arbeitsmappe anzeigen, damit noch manuell genändert werden kann 'Funktioniert aber nicht!!!! End If Set wb = Nothing End Sub Kann mir jemand helfen? Danke im voraus. Chris

Excel-Automation	50	Downunder	26.11.01 11:21
Re: Excel-Automation	204	unbekannt	26.11.01 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