Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

word
Autor: seroman
Datum: 01.11.02 16:59
wie mache ich das die änderungen unter einem anderem namen gespeichert werden und das word sich dann von alleine schließt. hier der qt Private Sub Command1_Click() Dim wdApp As Object Set wdApp = CreateObject("word.application") With wdApp .Visible = True .Documents.Add Template:="Demo.dot", NewTemplate:=False ' Bei der Programmdistribution: ' .Documents.Add Template:=App.Path & "\Demo.dot", NewTemplate:=False .Selection.GoTo Name:="Name" .Selection.TypeText Text:=txtVName.Text .Selection.GoTo Name:="VName" .Selection.TypeText Text:=txtVName.Text .Selection.GoTo Name:="Mail" .Selection.TypeText Text:=txtMail.Text End With Set wdApp = Nothing End Sub

word	54	seroman	01.11.02 16:59
Re: word	210	unbekannt	01.11.02 17:37

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