Zum Inhalt springen

Empfohlene Beiträge

Geschrieben
Option Explicit

Public objWord As New Word.Application

Private Sub btnSwitch_Click()

objWord.CommandBars(1).Visible = Not objWord.CommandBars(1).Visible

End Sub

Private Sub btnWordStarten_Click()

objWord.Documents.Open ("c:\test.doc")

objWord.Visible = True

End Sub

Private Sub btnWordBeenden_Click()

objWord.Documents.Close

objWord.Quit

End Sub

Welche CommandBar Du in der Switchprocedur aus-/einschalten willst musst Du selber wissen. ;)

Erstelle ein Benutzerkonto oder melde Dich an, um zu kommentieren

Du musst ein Benutzerkonto haben, um einen Kommentar verfassen zu können

Benutzerkonto erstellen

Neues Benutzerkonto für unsere Community erstellen. Es ist einfach!

Neues Benutzerkonto erstellen

Anmelden

Du hast bereits ein Benutzerkonto? Melde Dich hier an.

Jetzt anmelden

Fachinformatiker.de, 2024 by SE Internet Services

fidelogo_small.png

Schicke uns eine Nachricht!

Fachinformatiker.de ist die größte IT-Community
rund um Ausbildung, Job, Weiterbildung für IT-Fachkräfte.

Fachinformatiker.de App

Download on the App Store
Get it on Google Play

Kontakt

Hier werben?
Oder sende eine E-Mail an

Social media u. feeds

Jobboard für Fachinformatiker und IT-Fachkräfte

×
×
  • Neu erstellen...