title image


Smiley Re: Von Access ein Excel-Tabellenblatt ausdrucken
Das geht so:



Public Function ExcelSheetDrucken(FName As String, Optional ShName As String = "")

Dim oExc As New Excel.Application, Sh As Excel.Worksheet

With oExc

.Workbooks.Open FileName:=FName

If ShName "" Then

Set Sh = .Worksheets(ShName)

Sh.Activate

Sh.PrintOut

Else

.ActiveWorkbook.PrintOut

End If

.Quit

End With



Verweis auf die Excel-Objektbibliothek setzen!


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: