Hallo zusammen,
ich habe in Access (VBA) einen kleinen Code geschrieben, der Werte verschiedener Felder des aktuellen Datensatzes in bestimmte Zellen einer Excel Datei kopiert. Das klappt auch alles sehr gut.
Leider öffnet sich die Excel-Datei nur minimiert (das Excel-Symbol befindet sich in der Taskleiste und blinkt).
Wie kann ich es anstellen, dass sich die Excel-Datei sofort maximiert öffnet?
Hier der VBA-Code:
Dim xlApp As Object, xlBook As Object, xlSheet As Object
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True
Set xlBook = xlApp.Workbooks.Open("Z:\werkstatt\auftragDurchsicht.xlt")
Set xlSheet = xlBook.Sheets("Tabelle1")
xlSheet.Cells(4, 8).value = Me.Angebotsnummer
xlSheet.Cells(10, 8).value = Me.KM_Stand
xlSheet.Cells(10, 1).value = Me.PKW
xlSheet.Cells(12, 1).value = Me.Kw_PS
xlSheet.Cells(12, 3).value = Me.HSN
xlSheet.Cells(12, 4).value = Me.TSN
xlSheet.Cells(12, 7).value = Me.Erstzulassung
Mein Betriebssystem ist Win7 64bit.
Vielen Dank im Voraus.
Gruß Edgar
Programmieren - alles kontrollieren 4.940 Themen, 20.676 Beiträge
Hallo zusammen,
ich habe es eben auf meinem Laptop (WinXP) ausprobiert. Dort wird die Excel-Datei normal, also maximiert geöffnet. Es scheint also an Win7 zu liegen (die "Superbar" ?).
@Volker
Stimmt, aber es scheint wirklich "nur" Kosmetik zu sein; es sind zwar 2 Zeilen mehr, dafür aber fast 30 Zeichen weniger und ist professioneller. Danke dafür, habe es schon geändert.
Ich werde den Thread jetzt schließen.
Gruß Edgar