Ok, Cancel, Hinweis?
07.08.2007 15:46:48
Oli
nachdem meine erste Frage hier in einem Rekordtempo von 4min beantwortet wurde und alles super geklappt hat kommt auch schon mein nächstes Problem.
Wenn die Dateil geöffnet wird öffnet sich automatisch eine MessageBox die man mit "OK" bestätigen kann, um mit der Datei zu arbeiten oder mit "Abbrechen" schließt die Datei wieder.
Meine zwei Probleme:
1.) Wie kann ich "Abbrechen" in "Cancel" ändern und
2.) wie bekomme ich einen dritten Butten, der "Notes" heißen soll und wenn man auf den klickt öffnen sich ein Anhang oder einen weitere MessageBox. Die Notes sind sowas wie die "AGB´S"....
Das steht bis jetzt bei mir im Excel:
Public Sub Meldungen()
Dim i As Integer
i = MsgBox("This tool can only be used if you agree with the Notes", vbOKCancel, "Titel")
If i = vbCancel Then
Mldg = "You can only use the tool if you agree!!!" ' Meldung definieren.
Stil = vbOKOnly + vbCritical ' Schaltflächen definieren.
Antwort = MsgBox(Mldg, Stil)
Excel.Workbooks.Close
End If
End Sub
Vielen Dank mal wieder im Vorraus.
Gruß
Oli