-
set wbook=看一看。
dim wbook as workbook '建立工作簿例項。
dim sht as worksheet '建立工作表
set wbook= '前面用了“new”這個詞,所以你不需要建立 set sht =
truedim sfilename as stringsfilename="檔案的名稱"
\" & sfilename, xlexcel7 '儲存(2003 用於 xlexcel7,2007 用於 xlexcel8,xlcsv 用於 csv 文字,xlunicodetext,xltextwindows 用於文字,xldbf3。
-
No. = 3 就可以了,數字不是物件,所以說需要物件。
-
你為什麼取消了幾套?
這也取決於您計算機上的 excel 版本。
-
在設定物件時,一定要記得使用 new 關鍵字來具體化,否則物件在記憶體中就沒有空間了,當然在將實際檔案分配給沒有空間的物件時也會出錯!
-
你有那個 objexcel 的作業嗎? 如果是這樣,它是什麼?
-
你的 rst 和 con 變數被設定為私有變數,當你用 command2 click 呼叫它們時,rst 變數沒有被賦值,所以相當於 rst 變數此時什麼都不是,當然會有錯誤。
解決此問題的一種方法是將 rst 和 con 設定為全域性變數,可以在兩段程式之外進行全域性變數定義。
public con as new
public rst as new
-
sub test()
dim rng as range
set rng = "請選擇您要複製的區域"、提示選擇"Hand Slim 彈簧, , 8).
activesheet. range("c4,c14").select
paste:=xlpastevalues, operation:=xlnone, skipblanks _
false, transpose:=false
end sub
請注意,在選擇要複製的區域時,不要選擇與 range("c4,c14"有重疊區域,否則程式將失敗。 垂直棚。
-
缺少右括號葉青。
if "歌曲模具前的程式碼差異是 e:e"),worksheets(i).cell(m,5))<1 then j=m
DIM XLBo1 AS 和 XLBock2 AS 是模組級變數。
在此示例中,在子子例程中,同時操作兩個 Excel 檔案。 >>>More
VB 中 if 語句可以鑲嵌的層數沒有限制。 但塵埃層不是太巧合,VB太多會提示“過程太大”。 您可以進行以下實驗: >>>More