怎麼抓取A資料表假日上班的日期與時間到B資料表的儲存格中 - Excel程式區

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

11^# 跳轉到 »

發表於 2013-11-19 16:45 | 顯示全部帖子

本帖最後由 GBKEE 於 2013-11-19 17:11 編輯

Ex.zip.zip (49.98 KB) 回復 15# GBKEE

大大您好

我剛貼您的程式進去"Ex"巨集裡
但在"假日出勤單"資料表J2儲存格輸入"英文姓名"後卻沒有反應呢

ps:我忽略姓名中英文對照了(假日出勤單是要轉換成中文姓名)，已在下方補上，請大大再幫我看看是否我忽略了甚麼~

Abby 丁X芸
Masumi 吳X錚
Jessica 林X燕
Hitomi 林X婷
Jason 許X豪
Red 陳X呈
Lynn 戴X伶
Prince 許X強
Edge 蘇X祐
Joyce 侯X雯
Jack 黃X傑

不會EXCALL的笨蛋

TOP

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

12^#

發表於 2013-11-19 18:36 | 顯示全部帖子

Ex.zip.zip (48.05 KB) 回復 17# GBKEE

大大您好

附件為加入中英姓名對照資料表，以及在"Ex"巨集貼入您的程式後的結果

請您再指教一下

感恩

不會EXCALL的笨蛋

TOP

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

13^#

發表於 2013-11-19 20:13 | 顯示全部帖子

回復 19# GBKEE

大大您好

我剛貼您的程式進去巨集後，再J2儲存格輸入英文姓名都沒有反應呢
怎麼會這樣呢?

-------------------------------------------------------------------------------
疑問1:
Sheets("假日出勤單").PageSetup.PrintArea = "A1:H13" '一頁就夠了

上面程式碼請問大大這甚麼意思呢，照道理說一個人一個月至少會有很多天假日出勤單，代表不只會有一份而以，但大大為什麼範圍只抓"A1:H13"一張而已呢?

不好意思，一直請教您問題~
麻煩了

不會EXCALL的笨蛋

TOP

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

14^#

發表於 2013-11-19 20:35 | 顯示全部帖子

回復 19# GBKEE

大大您好

剛誤會您了，我先KEYIN姓名後進去程式碼裡按執行發現有列印出來!
真是太厲害了

疑問:
1.一開始我設這麼多空白的申請表是因為想要一張紙印兩份剛剛好，有這種方式是可以一張A4印兩張申請表的嗎(想節省紙資源)

2.中英文姓名對照表後方我新增了社員編號(如圖)，如果社員編號我想跟姓名一樣在假日出勤申請單裡對照過去的話，那我要從哪裡修改程式碼呢?

感恩

不會EXCALL的笨蛋

TOP

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

15^#

發表於 2013-11-20 17:28 | 顯示全部帖子

Ex.zip.zip (53.38 KB) 回復 22# GBKEE

大大您好:
我有按照您說的複製程式碼貼入巨集，也有照您說的第2張~第3張出勤單間隔15列(如附件檔)，但您說的第一張~第四張間隔14列是甚麼意思呢?
執行後也是只有單張列印一份出來而以呢，是我沒有設定到什麼嗎?還是印表機設定也需要改呢?

麻煩請您再幫我看看
感恩
謝謝

ps:會員編號確實有跟著對應出來了，這次的註解也更易懂，我會努力學習的，一直麻煩您真不好意思

不會EXCALL的笨蛋

TOP

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

16^#

發表於 2013-11-20 21:44 | 顯示全部帖子

回復 24# GBKEE

大大您好:
了解您的意思了!
經測試後成功了~
非常感謝您!

但剛測試有一個問題，如果遇到該人當月只有上1天假日班的話(等於只需要印1張申請表)，我執行程式後連後面的3份空白申請表也跟著一起列印出來了呢
請問大大這有方法可以避免嗎?(上幾天班就印幾張申請表)

請大大指導

不會EXCALL的笨蛋

TOP

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

17^#

發表於 2013-11-21 16:40 | 顯示全部帖子

回復 26# GBKEE

大大您好:
會不會是我因為怕J欄的東西也跟著一起列印，所以設定列印範圍，導致這種錯誤呢?(如上圖)
我把列印格式清除後就無此問題了，謝謝大大的指教!

那麼之後的12月班表內如果出勤時間有變動我只需要修改程式碼的下列時間和資料表名稱就好了嗎?(如下圖紅色框框部分)

不會EXCALL的笨蛋

TOP

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

18^#

發表於 2013-11-21 17:14 | 顯示全部帖子

回復 26# GBKEE

大大您好:
剛再測試時有發生一件小問題，就是如果該人當月只有上一天班時，系統會顯是錯誤訊息偵錯
然後把下列這段程式反黃呢~

If Print_x > 0 And Print_x <= 3 Then 出勤單.Parent.PrintOut 1, Round(Print_x / 2) ' 未滿 4 筆的資料沒印列

這段程式的意思是如果上班日子筆數>0和<=3筆時，就列印的意思嗎?
那這樣的話只有一筆時應該也會列印才對呢

請大大指導

不會EXCALL的笨蛋

TOP

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

19^#

發表於 2013-11-21 17:40 | 顯示全部帖子

本帖最後由 prince0413 於 2013-11-21 17:42 編輯

回復 29# GBKEE

因為只有一筆時後面的程式就反黃錯誤呢(下面這段程式)，也沒有列印~

" 出勤單.Parent.PrintOut 1, Round(Print_x / 2) "

我再想是不是因為 Print_x=1 ， 1 / 2 = 0.5 ，有小數點所以發生此錯誤

那是不是要把 Print_x 這變數換個宣告呢? Print_x As Integer 改成可以有小數點的浮點數?
但我不太懂怎麼改呢

請大大指導~"~

不會EXCALL的笨蛋

TOP

prince0413

　暱稱: 香澄

中學生 Rank: 2

帖子: 108
主題: 23
精華: 0
積分: 140
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2013-11-2
最後登錄: 2019-12-31

20^#

發表於 2013-11-21 20:33 | 顯示全部帖子

Ex1.zip.zip (50.06 KB) 回復 31# GBKEE

大大您好:
公司的電腦是2013的OFFICE
家裡的電腦是2003的OFFICE

但我幾乎都是再公司做的，存成2003的檔案是因為想說在家可能會開起來看看

所以大大的意思是不需要更改浮點數嗎?

不會EXCALL的笨蛋

TOP

[發問] 怎麼抓取A資料表假日上班的日期與時間到B資料表的儲存格中

[收藏此主題] [關注此主題的新回復]

[通過 QQ、MSN 分享給朋友]