Office——Excel-VBA學習——進階

1. 輸入和絕對值 Sub QingwuAbs() Dim a, b As Integer a = InputBox("請輸入一個負數：", "提示") b = Abs(a) MsgBox "你輸入數的絕對值爲：" & b End Sub 2. IF結構 Sub TestIf() [A1] = 35 If [A1] > 30 Then     MsgBox ">30" Else     MsgBo

>>阅读原文<<