打開excel右鍵sheet-->查看代碼-->添加如下代碼:
Private Sub UserForm_Activate()
Dim i
For i = 1 To 100
Application.SendKeys "{RIGHT}"
Next
End Sub
打開excel右鍵sheet-->查看代碼-->添加如下代碼:
Private Sub UserForm_Activate()
Dim i
For i = 1 To 100
Application.SendKeys "{RIGHT}"
Next
End Sub
1、不說"不可能";2、凡事第一反應: 找方法,不找藉口;3、遇到挫折對自己說聲:太好了,機會來了!4、不說消極的話,不落入消極的情緒,一旦發生立即正
http://se.csai.cn/ANALYZE/200904090924001269.htm http://www.docin.com/p-2086224.html