[發問] 如何將Sheet1不連續欄位儲存到Sheet2

帖子: 13
主題: 3
精華: 0
積分: 30
點名: 0
作業系統: MaC OS 10.10.5
軟體版本: office 2011
閱讀權限: 10
性別: 男
來自: Taiwan
註冊時間: 2010-8-26
最後登錄: 2017-7-12

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2010-8-31 00:51 | 顯示全部帖子

[發問] 如何將Sheet1不連續欄位儲存到Sheet2

各位前輩您好

小弟在Excel進階功能的部份是新手,
參考之前前輩的說明和敘述,
寫出這個sample,
這個有兩個sheet,
我要將sheet1的資料在按save鍵時複製到sheet2當做資料庫,
但是不知道如何將姓名,學號和電話如何在sheet2完整呈現,
不然都在sheet2只有第一筆有姓名,學號和電話,
第二筆之後在姓名,學號和電話是空的.
可以麻煩前輩幫忙解決小弟的問題嗎?
非常感謝.

sample.rar (8.7 KB)

樓主熱帖

Steven

帖子: 13
主題: 3
精華: 0
積分: 30
點名: 0
作業系統: MaC OS 10.10.5
軟體版本: office 2011
閱讀權限: 10
性別: 男
來自: Taiwan
註冊時間: 2010-8-26
最後登錄: 2017-7-12

2^#

發表於 2010-9-6 22:36 | 顯示全部帖子

各位前輩您好

感謝各位的幫忙,
Hsieh前輩解決了小弟的問題,
小弟研讀Hsieh前輩的語法後,
但實在不懂下面的語法,
ar = Array(a, .[A2], .[C2], .[E2], a.Offset(, 1), a.Offset(, 1), a.Offset(, 2), a.Offset(, 3), a.Offset(, 4))
Sheet2.[A65536].End(xlUp).Offset(1, 0).Resize(, 8) = ar
盼Hsieh前輩可以再教導小弟一番.
非常感謝.

Steven

帖子: 13
主題: 3
精華: 0
積分: 30
點名: 0
作業系統: MaC OS 10.10.5
軟體版本: office 2011
閱讀權限: 10
性別: 男
來自: Taiwan
註冊時間: 2010-8-26
最後登錄: 2017-7-12

3^#

發表於 2010-9-6 22:36 | 顯示全部帖子

本帖最後由 steven_lkk 於 2010-9-6 22:43 編輯

各位前輩您好

如果防止使用者編輯sheet2,
我之前是用鎖儲存格的方式,
但是發現會造成無法複製.
前輩可以再次教導小弟一番.
非常感謝.

Steven

帖子: 13
主題: 3
精華: 0
積分: 30
點名: 0
作業系統: MaC OS 10.10.5
軟體版本: office 2011
閱讀權限: 10
性別: 男
來自: Taiwan
註冊時間: 2010-8-26
最後登錄: 2017-7-12

4^#

發表於 2010-9-7 00:03 | 顯示全部帖子

前輩您好
請問一下,ar陣列變數內容是否像這個圖一樣的對應位置呢?

那最第一個的a, (ar = Array(a, .....)代表什麼呢?
為什麼又會多一個a.Offset(, 1)呢?
非常感謝您的幫忙.

Steven

帖子: 13
主題: 3
精華: 0
積分: 30
點名: 0
作業系統: MaC OS 10.10.5
軟體版本: office 2011
閱讀權限: 10
性別: 男
來自: Taiwan
註冊時間: 2010-8-26
最後登錄: 2017-7-12

5^#

發表於 2010-9-8 23:17 | 顯示全部帖子

前輩您好

小弟依照上個sample當範本來練習製作一個報價單,
結果按了save後在List裏出現幾個問題,
1.日期不是我原來的內容
2.我只想現有的兩筆資料複製到list裏,結果list出現重覆多餘的資料

我該怎麼修正呢??

另外有一個問題,
如果單號的組成是英文字母+日期+兩位數的流水號,
希望能自動產生單號,
不知該如何寫這段呢?
盼前輩賜教.
非常感謝

sample2.rar (12.67 KB)

Steven