[發問] 如何在同一個儲存格打上代碼跑出對應的資料

帖子: 10
主題: 3
精華: 0
積分: 13
點名: 0
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 10
性別: 女
註冊時間: 2010-8-26
最後登錄: 2014-3-25

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2014-3-20 11:03 | 顯示全部帖子

[發問] 如何在同一個儲存格打上代碼跑出對應的資料

各位大大，大家好：
在附件裡面，有「車子資料」的Sheet與「3月」的Sheet。
1.想要在「3月」的儲存格打上車子代碼，在同一個儲存格會出現「車子資料」所設定好的" 車型 "。
2.每一個月都會新增一張sheet，操作法式如同No.1。

請參考附件說明

每月報表.zip (3 KB)

因為我對程式語法不熟，不知道程式應該怎麼寫?想救高手們幫忙，非常謝謝大家的幫忙!

樓主熱帖

帖子: 10
主題: 3
精華: 0
積分: 13
點名: 0
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 10
性別: 女
註冊時間: 2010-8-26
最後登錄: 2014-3-25

2^#

發表於 2014-3-21 18:04 | 顯示全部帖子

回復 3# li_hsien

權限不夠，無法下載檔案!!:'(

帖子: 10
主題: 3
精華: 0
積分: 13
點名: 0
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 10
性別: 女
註冊時間: 2010-8-26
最後登錄: 2014-3-25

3^#

發表於 2014-3-21 18:11 | 顯示全部帖子

回復 4# yen956

請教yen956 大大 :
1日的欄位能正常跑出來，但是2日開始就不行了，
我試過再新增rngE, 覆製
Set rngE = [E2].Resize(endRow, 1)
If Not Intersect(Target, rngD) Is Nothing Then
代碼 = Application.Match(Target, rngA, 0)
   On Error Resume Next
Target = sh1.[A1].Offset(代碼, 2)
   End If
修改一段，但會有問題!!!  :'(

帖子: 10
主題: 3
精華: 0
積分: 13
點名: 0
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 10
性別: 女
註冊時間: 2010-8-26
最後登錄: 2014-3-25

4^#

發表於 2014-3-24 09:54 | 顯示全部帖子

回復 7# yen956

非常感謝yen956大大熱心回覆 :
經大大的指導後，2日、3日…31日都可以正常顯示車號所對應的大小，
可是這裡有個小問題就是:如果司機有15位，在這份excel表中倒數4位司機在該月份的1日並無開車，這樣會讓2日之後倒數3位司機所輸入的代碼帶不出對應的資料來，除非至少在1日倒數第2位司機要有「大小」資料，否則2日開始之後這份excel表倒數那幾位司機，都帶不出資料。

再請大大要如何解決這個問題?
謝謝yen956大大百忙之中回覆… ^^

帖子: 10
主題: 3
精華: 0
積分: 13
點名: 0
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 10
性別: 女
註冊時間: 2010-8-26
最後登錄: 2014-3-25

5^#

發表於 2014-3-25 08:52 | 顯示全部帖子

回復 10# yen956

感謝yen956大大詳細解說，這當中我也學到一點東西，另外也完成主管交辦的報表，真的謝謝您~ ^^