title image


Smiley Fehler im VBA Code
Hallo!



Ich habe folgenden Code:



Private Sub CommandButton1_Click()

temporär = Application.Dialogs(wdDialogFileOpen).Show

If temporär = True Then

zahl = Documents.Count + 1

path = Documents(zahl).FullName

text = Documents(zahl).text

Documents(zahl).Close (0)

txt1.Text = text

End If

End Sub



Wenn ich den CommandButton drücke und danach eine Worddatei auswähle, dann sollte die ausgewählte Datei in der txt1 eingetragen werden.



Ich erhalte jedoch den Fehler



Das angeforderte Element ist nicht in der Sammlung vorhanden.



und path = Documents...... wird markiert.



Was habe ich hier bitte falsch gemacht?



Danke



Josef

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: