帖子: 586
主題: 123
精華: 0
積分: 763
點名: 0
作業系統: WINDOW7
軟體版本: Office 2003
閱讀權限: 50
性別: 男
註冊時間: 2010-5-16
最後登錄: 2017-3-14

熱烈參與勳章好學求知勳章

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2010-7-14 20:02 | 只看該作者

(已解決)執行VBA電腦的效率有沒有差?

[i=s] 本帖最後由 freeffly 於 2012-2-22 17:09 編輯 [/i]

我在我的電腦完成VBA因為有12個月的執行情形所以程式碼如果貼WORD有46頁
我辦公式的電腦是雙核心，執行的時候大概5-10秒完成
丟給同事結果出現-----未發現專案
分別停留在

1. Columns("S:T").Delete Shift

Shift→停留在這裡我刪掉:=XLup
補上之後就是還有下面Chr出現錯誤

2. Range("P4:P5") = "邊際貢獻" & Chr(10) & " 達成"

現在用家裡的電腦(4核心)執行並不會出現問題
難道:=XLup這個部分刪掉容易出問題嗎?
另外Chr是錄製的結果我並未修改，為什麼其他同事的電腦執行會出現問題呢?

樓主熱帖

字典兩各字還真難理解

Hsieh

超級版主 Rank: 8 Rank: 8

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 142
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2026-7-16

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

4^#

發表於 2010-7-14 23:19 | 只看該作者

回復 3# freeffly

Columns("S:T").Delete
整欄刪除只有預設xltoleft

學海無涯_不恥下問

TOP

freeffly

高中生 Rank: 3 Rank: 3

帖子: 586
主題: 123
精華: 0
積分: 763
點名: 0
作業系統: WINDOW7
軟體版本: Office 2003
閱讀權限: 50
性別: 男
註冊時間: 2010-5-16
最後登錄: 2017-3-14

熱烈參與勳章好學求知勳章

3^#

發表於 2010-7-14 22:51 | 只看該作者

本帖最後由 Hsieh 於 2010-7-14 23:10 編輯

感覺有鬼我現在打開來看內容是這樣 Range("P4:P5") = "邊際貢獻" & Chr(10) & " 達成"

比較令人難以理解的是我公司的電腦行(用公司的電腦編寫的)
同事的電腦不行不行
我寄回家用自己的電腦開沒有這個問題
Columns("S:T").Delete Shift
而且這一句也不會出現問題
看來我要再回公司試試編譯vbaproject

字典兩各字還真難理解

TOP

kimbal

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 472
主題: 5
精華: 0
積分: 485
點名: 0
作業系統: Windows
軟體版本: MS Office
閱讀權限: 100
性別: 男
來自: 香港
註冊時間: 2010-7-4
最後登錄: 2014-12-28

論壇貢獻勳章

2^#

發表於 2010-7-14 21:00 | 只看該作者

本帖最後由 kimbal 於 2010-7-14 21:02 編輯

我在我的電腦完成VBA因為有12個月的執行情形所以程式碼如果貼WORD有46頁
我辦公式的電腦是雙核心，執行的 ...
freeffly 發表於 2010-7-14 20:02

1.這句有問題:

Range("P4:P5") = "邊際貢獻" Chr(10) & " 達成"

複製代碼

應是

Range("P4:P5") = "邊際貢獻" & Chr(10) & " 達成"

複製代碼

少了一個 &

2.
你的 project沒有編譯好, 所以在本機用了舊的影像行. 沒有查出 { "邊際貢獻" Chr(10) } 這裡有問題.
當到另一部機運行時重新編譯就有問題了.

可以到vba上這裡檢查一下 "偵錯->編譯vbaproject"

參考:
http://kimbalko-chi.blogspot.com ... xcel-1997-2010.html

懂得發問,答案就會在其中

今日の一秒は明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP