判斷式出現0,多餘的空白

帖子: 57
主題: 21
精華: 0
積分: 83
點名: 0
作業系統: win7
軟體版本: office 2007
閱讀權限: 20
註冊時間: 2015-9-18
最後登錄: 2022-9-13

2^#

發表於 2015-9-26 17:32 | 顯示全部帖子

TO 准提部林
謝謝你的解答真的成功了
可是大大你的程式碼對我來說有點難度，不知道能不能請你幫個忙，程式後面幫忙註解一下
，讓我更進一步的學習呢?
拜託了

帖子: 57
主題: 21
精華: 0
積分: 83
點名: 0
作業系統: win7
軟體版本: office 2007
閱讀權限: 20
註冊時間: 2015-9-18
最後登錄: 2022-9-13

3^#

發表於 2015-9-26 20:29 | 顯示全部帖子

有幾個問題要請教版大
抱歉問這麼多問題

問題一
R& 後面的&與$代表的涵義是?

問題二
[L:O].ClearContents
[L1:O1] = Array("日期", "樣式", "工作人員", "數量")

[L:O]與[L1:O1] 這是屬於陣列嗎?
[L:O]是不是帶表[L~到數字任何數:O~到任何數]
所以底下假如有[L1:O1]、[L2:O2]、[L3:O3]都可以清除嗎?

問題三
'↓將資料範圍設為陣列（含標題列）
Arr = [A1:F1].Resize(R)

Resize(R) <這個R代表是什麼意思?

問題四
　　T = Arr(j, 1) & Arr(j, 2)
　
　　'↓取出〔索引值〕在字典檔中所帶的〔序號〕，
　　　這〔序號〕用來識別填入〔陣列〕的〔位置〕
　　N = xD(T)　
括號中的T跟上面那個T有相關性嗎?

帖子: 57
主題: 21
精華: 0
積分: 83
點名: 0
作業系統: win7
軟體版本: office 2007
閱讀權限: 20
註冊時間: 2015-9-18
最後登錄: 2022-9-13

4^#

發表於 2015-9-28 21:31 | 顯示全部帖子

回復 6# 准提部林

謝謝，我查了許多網站，已經將程式大概看懂了，有部分還是不懂需要一段時間消化一下，感謝你的指導

帖子: 57
主題: 21
精華: 0
積分: 83
點名: 0
作業系統: win7
軟體版本: office 2007
閱讀權限: 20
註冊時間: 2015-9-18
最後登錄: 2022-9-13

5^#

發表於 2015-9-28 21:40 | 顯示全部帖子

這邊分享給大家一下
Dim R&  ，&代表長整數
Dim T$ ，$代表字串
以上是快速寫法
[L:O].ClearContents             清除[L:O]所有資料
[L1:O1] = Array("日期", "樣式", "工作人員", "數量")　  將日期，樣式，工作人員，數量寫到儲存格當中
R = Cells(Rows.Count, 1).End(xlUp).Row 將取得最後一筆的資料傳給R(以Ａ欄取得最後一筆〔列號〕)
後面會陸續補上，在忙