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. ;)

Dein Kommentar

Du kannst jetzt schreiben und Dich später registrieren. Wenn Du ein Konto hast, melde Dich jetzt an, um unter Deinem Benutzernamen zu schreiben.

Gast
Auf dieses Thema antworten...

×   Du hast formatierten Text eingefügt.   Formatierung wiederherstellen

  Nur 75 Emojis sind erlaubt.

×   Dein Link wurde automatisch eingebettet.   Einbetten rückgängig machen und als Link darstellen

×   Dein vorheriger Inhalt wurde wiederhergestellt.   Editor leeren

×   Du kannst Bilder nicht direkt einfügen. Lade Bilder hoch oder lade sie von einer URL.

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...