Primjeri za MsgBox

Posted: decembar 6, 2011 in Uncategorized
Oznake:,

PRIMJER 1
Sub proLessson17a()
Sheets(„Sheet1“).Select
Range(„A1“).Value = 695
MsgBox „The macro has finished running“
End Sub

PRIMJER 2
Sub proLessson17c()
Sheets(„Sheet1“).Select
Range(„A1“).Value = 695
MsgBox „The result is “ & Range(„A1“).Value
End Sub

Advertisements

Zatvoreno za komentare.