Thema Datum  Von Nutzer Rating
Antwort
Rot frm erneut ausführen: Variable nicht definiert
14.06.2012 08:21:36 faro2
NotSolved

Ansicht des Beitrags:
Von:
faro2		 Datum:
14.06.2012 08:21:36		 Views:
2340		 Rating:
     
Antwort:
  Ja
Thema:
frm erneut ausführen: Variable nicht definiert

Guten Morgen!

Ich habe recht umfangreichen VBA-Code übernommen, der unter anderem nach Formulareingabe in ein Dokument Inhalte einfügt (geht). Bisher soll es außerdem funktioniert haben, dass bei geöffnetem Dok. und ausführen des Makros das Formular erneut angeboten wird und dann wiederum die Inhalte an die aktuelle Einfügemarke gesetzt werden. Das funktioniert nicht mehr. Gemachte Änderungen System/Code nicht bekannt

"Fehler beim kompilieren: Variable nicht definiert"

Der Debugger springt in

Sub Neu()

Dim antwort As Integer
Dim gefunden As Boolean
Dim dokument As Document
    Dim strDocName As String
    strDocName = ActiveDocument.Name
    MsgBox strDocName
    On Error GoTo ChangeDirError
ChangeDir:
    ChangeFileOpenDirectory ("C:\")
    On Error GoTo 0
    NfS.Init

    GetDocumentName.Nr.Enabled = False
    GetDocumentName.Nr.Locked = True
    GetDocumentName.Nr.Value = "(auto)"
    GetDocumentName.Show
    For Each dokument In Documents
        If dokument.Name = Dateiname Then gefunden = True
    Next dokument
    If gefunden Then
         Documents(Dateiname).Activate
    Else
        On Error GoTo CreateDocument
        Documents.Open(FileName:=Dateiname).Activate
        On Error GoTo 0 'normal error handling
    End If
Exit Sub

Dort stört ihn scheinbar 
"GetDocumentName.Nr.Enabled = False"
Wenn ich das Dokument schließe und neu öffne funktioniert es (1x)...

Kann jemand helfen?

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot frm erneut ausführen: Variable nicht definiert
14.06.2012 08:21:36 faro2
NotSolved