Sub ActivateCalc() Dim AppFile As String Dim CalcTaskID As Double AppFile = "Calc.exe" On Error Resume Next AppActivate "Calculator" If Err <> 0 Then Err ...
確定! 回上一頁