Makro Probleme

Seite 1 von 1 - Forum: Coding Stuff auf overclockers.at

URL: https://www.overclockers.at/coding-stuff/makro_probleme_117082/page_1 - zur Vollversion wechseln!

DareDeviL schrieb am 14.06.2004 um 12:26

moin leute hab ein kleines problem mit makros

hier der text

Sub Noten()
'
' Noten Makro
' Makro aufgezeichnet am 14.06.2004
'
antwort = InputBox("Ihre Note?")
Selection.TypeParagraph
If note < 5 Then
Selection.TypeText Text:="Note "
Selection.TypeText Text:=note
Selection.TypeText Text:=" ist positiv"
Else
Selection.TypeText Text:="Note "
Selection.TypeText Text:=note
Selection.TypeText Text:=" ist leider negativ"
End If
End Sub

da ist irgendwo ein fehler, den ich nicht finde

und zwar bekomme ich wenn ich die zahl 5 eingebe auch die antwort raus die note ist positiv

also bitte helft mir

tia

Dare

mat schrieb am 14.06.2004 um 12:28

antwort = InputBox("Ihre Note?")
sollte
note = InputBox(..) sein

DareDeviL schrieb am 14.06.2004 um 12:32

danke jetzt geht der ****** endlich

Dare