Von |
Joachim |
Am |
14. Januar 2008 um 14:07:09 |
Frage |
Hallo, bin noch Anfänger, kann mir jemand helfen?
Ich möchte alle Word-Dokumente öffnen, die mit den 3 gleichen Zeichen beginnen. Beispiele: 002_12.01.08.doc ; diese Beiden sollen geöffnet werden 023_09.01.08.doc 002_13.01.08.doc ; diese Beiden sollen geöffnet werden 102_13.01.08.doc
Private Sub Word_öffnen_Click() DoCmd.GoToControl "Name" DoCmd.RunCommand acCmdCopy
Set objWord = CreateObject("Word.Application")
With objWord 'Make the application visible. .Visible = True
.Documents.open ("C:\AN\" & "002" & ".doc")
' es gibt mehrere Dokumentnamen beginnend mit 002 oder 023 usw. End With End Sub
Danke
Joachim
|
|