Wer diesen Makro auch unter Word 2003 bzw. Word 2007 nutzen will, wobei "STRG + SHIFT + F9" unter Word 2007 nich funktioniert, muss einfach diesen Makro bearbeiten und diesen code
Sub UserForm_Activate()
On Error Resume Next
Dim aHyperlink
Dim i
TextBox1.Text = ""
If Application.Version <> "8.0" And Application.Version <> "9.0" Then
MsgBox ("Dieses Makro läuft nur unter Word 97 oder 2000!")
Me.Hide
Exit Sub
End If
mit diesem ersetzen
Sub UserForm_Activate()
On Error Resume Next
Dim aHyperlink
Dim i
TextBox1.Text = ""
'If Application.Version <> "8.0" And Application.Version <> "9.0" Then
'MsgBox ("Dieses Makro läuft nur unter Word 97 oder 2000!")
'Me.Hide
Exit Sub
'End If
Ich habe es getestet unter Word 2003 und Word 2007! Das Makro funktionieren auch dort! Es wurde wahrscheinlich schon vor Word 2003 programmiert :D
Sub UserForm_Activate()
On Error Resume Next
Dim aHyperlink
Dim i
TextBox1.Text = ""
If Application.Version <> "8.0" And Application.Version <> "9.0" Then
MsgBox ("Dieses Makro läuft nur unter Word 97 oder 2000!")
Me.Hide
Exit Sub
End If
mit diesem ersetzen
Sub UserForm_Activate()
On Error Resume Next
Dim aHyperlink
Dim i
TextBox1.Text = ""
'If Application.Version <> "8.0" And Application.Version <> "9.0" Then
'MsgBox ("Dieses Makro läuft nur unter Word 97 oder 2000!")
'Me.Hide
Exit Sub
'End If
Ich habe es getestet unter Word 2003 und Word 2007! Das Makro funktionieren auch dort! Es wurde wahrscheinlich schon vor Word 2003 programmiert :D