返回列表 上一主題 發帖

[發問] (已解決)執行程式後跳出視窗?

mark15jill
　暱稱: 隨風飄蕩的羽毛
　頭銜: [御用]潛水艇

高中生Rank: 3Rank: 3

帖子
852 
主題
79 
精華
0 
積分
918 
點名
0  
作業系統
Windows 7 , XP 
軟體版本
Office 2007, Office 2003,Office 2010,YoZo Office 
閱讀權限
50 
性別
男 
來自
宇宙 
註冊時間
2011-4-8 
最後登錄
2024-2-21 
1# 跳轉到 »
發表於 2011-6-3 17:27 | 顯示全部帖子
回復 1# candy516

你有動到一些程式碼嗎???
因為就我剛剛把你的程式碼丟去乾淨EXCEL檔案內 就發現 好多紅字...
           mystr = A "," & Left(A.Offset(, 1), 4)
      If Err.Number <> 0 Then MsgBox A A.Offset(, 1)
      .Cells(r, 3) = y "年第" & B.Column - 1 & "筆"


紅通通..

TOP

        靜思自在 : 不怕事多，只怕多事。
返回列表 上一主題