12345
返回列表 上一主題 發帖

[分享] 學習Excel VBA的一些基本概念

TEBXB

帖子
2 
主題
0 
精華
0 
積分
8 
點名
0  
作業系統
VISTA 
軟體版本
2007 
閱讀權限
10 
性別
男 
註冊時間
2010-12-31 
最後登錄
2012-2-16 
17# 跳轉到 »
發表於 2010-12-31 02:21 | 只看該作者
感謝作者的用心，讓我搞清楚為何一個名詞，有那麼多種英文表示法，謝謝。
TEBXB

TOP

Hsieh

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

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
16#
發表於 2010-12-17 23:03 | 只看該作者
回復 15# FAlonso
試試看
  1. Sub c()
  2. With ActiveWorkbook.VBProject.VBComponents.Import("D:\Tony\Excel VBA\a.bas")
  3. Application.Run "a"
  4. Application.VBE.ActiveVBProject.VBComponents.Remove _
  5. Application.VBE.ActiveVBProject.VBComponents(.Name)
  6. End With
  7. End Sub
複製代碼
學海無涯_不恥下問

TOP

FAlonso

帖子
135 
主題
19 
精華
0 
積分
165 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2010-12-9 
最後登錄
2012-8-27 
15#
發表於 2010-12-17 20:26 | 只看該作者
回復  FAlonso

我想應該是   
Application.VBE.ActiveVBProject.VBComponents.Remove Application.VB ...
frankjenq 發表於 2010-12-16 10:00



    已經縮了一行,還是有問題
80 字節以內
不支持自定義 Discuz! 代碼

TOP

frankjenq

帖子
3 
主題
0 
精華
0 
積分
8 
點名
0  
作業系統
XP 
軟體版本
office 2000 
閱讀權限
10 
性別
男 
註冊時間
2010-12-15 
最後登錄
2022-6-7 
14#
發表於 2010-12-16 10:00 | 只看該作者
回復 10# FAlonso

我想應該是   
Application.VBE.ActiveVBProject.VBComponents.Remove Application.VBE.ActiveVBProject.VBComponents(.Name)  '刪除
而不是分成兩行
Application.VBE.ActiveVBProject.VBComponents.Remove
Application.VBE.ActiveVBProject.VBComponents(.Name)  '刪除

TOP

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
13#
發表於 2010-12-15 20:54 | 只看該作者
本帖最後由 GBKEE 於 2010-12-15 20:55 編輯

回復 12# FAlonso
.Name 錯誤
沒看到使用到  With ????
                             .Name
                       End With

TOP

FAlonso

帖子
135 
主題
19 
精華
0 
積分
165 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2010-12-9 
最後登錄
2012-8-27 
12#
發表於 2010-12-15 20:50 | 只看該作者
[img]

Uploaded with ImageShack.us[/img]還有一點問題,出了這一個"不正確的引用"
80 字節以內
不支持自定義 Discuz! 代碼

TOP

Hsieh

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

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
11#
發表於 2010-12-15 20:32 | 只看該作者
Application.VBE.ActiveVBProject.VBComponents.Remove Application.VBE.ActiveVBProject.VBComponents(.Name) '刪除

這是同一行的程式碼
學海無涯_不恥下問

TOP

FAlonso

帖子
135 
主題
19 
精華
0 
積分
165 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2010-12-9 
最後登錄
2012-8-27 
10#
發表於 2010-12-15 18:21 | 只看該作者
[img]

Uploaded with ImageShack.us[/img]
有點問題,這是3樓H大的程式,加少少修改
有兩個excel file,一名為a.xls,內有一個叫sub a()的程式,執行一個簡單的msgbox訊息,我把它匯出至a.bas,打算由b.xls中的sub c()叫出該a.bas,可是程式壞了. 不知如何是好
不太懂相關技巧,希望指正
80 字節以內
不支持自定義 Discuz! 代碼

TOP

FAlonso

帖子
135 
主題
19 
精華
0 
積分
165 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
20 
性別
男 
來自
香港 
註冊時間
2010-12-9 
最後登錄
2012-8-27 
9#
發表於 2010-12-9 22:01 | 只看該作者
對於H大 sub kk()有點問題
我照一次辦
但compiler說remove那行引數不為選擇性(not optional)
停了macro
不知何解?

TOP

lkcharline

帖子
1 
主題
0 
精華
0 
積分
17 
點名
0  
作業系統
Windows xp 
軟體版本
office 2003 
閱讀權限
10 
性別
女 
註冊時間
2010-12-8 
最後登錄
2012-2-16 
8#
發表於 2010-12-8 11:14 | 只看該作者
看了版主的分享, 讓我對於 excel vba 有更深入的了解,我真的需要多加用些實務來加深印象了!!^^

TOP

        靜思自在 : 手心向下是助人，手心向上是求人；助人快樂，求人痛苦。
12345
返回列表 上一主題