12
返回列表 上一主題 發帖

[發問] 依指定區間日期、帳號 填入資料

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2021-1-16 16:00 | 顯示全部帖子

[發問] 依指定區間日期、帳號 填入資料

大大們好,

1..        在"說明"工作表中有4個帳號"大、美、佳、振",符合帳號、日期(同帳號及日期,不一定只有一筆)
2..        以"說明"工作表中的交運日期,最大值&最小值為區間,將M欄的取板編號、O欄的預約板數填入"預約"工作表中的G/C欄
3..        取板編號填入時,依原號碼,在最前面加上#0000(例:編號為118120,則為#0000118120)
4..        "預約"工作表中,不屬於交運日期區間值的所有資料及帳號,都不要有任何變動(有資料的,保留原資料,無資料則空白)
5..        例如：1/13~1/29不在此區間,已有的原資料不可變動,1/15 & 1/18也有非屬4大帳號,也不可填入資料

請問要達到這些要求,用函數or程式可以達成?
預約取板.rar (21.1 KB)
收藏 分享

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
2#
發表於 2021-1-17 16:05 | 顯示全部帖子
回復 3# 准提部林
回復 2# 軒云熊

感謝兩位大大,
二個程式測試結果都相同：
同一日期、同帳號有多筆取板資料時,帶出的結果有誤
取板編號只會帶出最後一筆,數量會變成累加

以下圖片為跑程式結果 v.s. 正確資料

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
3#
發表於 2021-1-17 18:03 | 顯示全部帖子
回復 5# 准提部林
大大,

我試了幾次,都無動作,不知發生什麼事...

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
4#
發表於 2021-1-17 18:17 | 顯示全部帖子
本帖最後由 PJChen 於 2021-1-17 18:24 編輯

回復 5# 准提部林

試了幾次還是不行,請大大幫忙看下程式！
感謝
預約取板.rar (21.46 KB)

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
5#
發表於 2021-1-17 20:22 | 顯示全部帖子
回復 8# 軒云熊

感謝！
這個程式OK了

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
6#
發表於 2021-1-20 21:53 | 顯示全部帖子
回復 8# 軒云熊
您好,
程式在實作時,發現了問題:執行程式後,會將D:F欄的公式值化,且不屬於這個區間的也都值化了,
請問要如何修改程式,讓D:F欄不受程式影響,保持原樣(有公式則保留)？
預約取板.rar (24.19 KB)

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
7#
發表於 2021-1-21 21:38 | 顯示全部帖子
回復 11# 軒云熊

真感謝！執行沒問題了
請問原來的程式,不需要了嗎? [預約!A1].Resize(UBound(Brr, 1), UBound(Brr, 2)) = Brr
2 To UBound(Arr)...UBound(Arr)前面的數字代表什麼?我常看到程式前有不同數字,但不理解用法！
可以的話能否幫忙解說您寫的程式？

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
8#
發表於 2021-1-22 23:00 | 顯示全部帖子
回復 13# 軒云熊

請問我查了CurrentRegion是當前區域的意思,
那Arr = [說明!I2].CurrentRegion
是指從I2到哪個儲存格為止?

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
9#
發表於 2021-1-23 21:40 | 顯示全部帖子
回復 15# 軒云熊


謝謝您, 有問題會再請教

TOP

PJChen
　暱稱: PJ

大學生Rank: 4

帖子
913 
主題
150 
精華
0 
積分
1089 
點名
0  
作業系統
win10 
軟體版本
office 2019 
閱讀權限
50 
性別
女 
註冊時間
2011-8-28 
最後登錄
2023-7-19 

論壇榮譽勳章論壇贊助勳章
10#
發表於 2021-3-4 22:14 | 顯示全部帖子
回復 15# 軒云熊

熊大好,

今天做分批預約時,發生了問題,請幫忙查看程式,感謝！

說明工作表的籃色區塊先進行第一次預約,填入資料沒問題
黃色區塊是第二批預約資料,貼到L11:S19後,程式就無法載入資料至"預約工作表",
經過測試,只要把"預約工作表"的指定區間資料清除,填入資料就可正常執行,
請問有沒有辦法,當資料分批出現時,不用做清除動作,就可以載入資料??
預約取板.rar (37 KB)

TOP

        靜思自在 : 並非有錢魷是快樂，問心無愧心最安。
12
返回列表 上一主題