球~● 發問時間: 電腦與網際網路軟體 · 1 0 年前

EXCEL製作資料輸入表格及儲存資料

在「sheet1」裡製作一表格,並輸入資料,如下:

日期xxxxx銀行名稱xxxxx帳號xxxxx

付款人xxxxxxxxx付款行xxxxxxxx

帳號xxxxxxxxxx到期日xxxxxxxxx

票號xxxxxxxxxx金額xxxxxxxxxx

備註xxxxxxxxxxxxxxxxxxxxx

xxxxxxxxxxxxxxxxxxxxxxx

「完成」

能自動將資料複製到「sheet2」列裡,如下:

銀行名稱xxxxx帳號xxxxx

日期-付款人-付款行-帳號-到期日-票號-金額-備註

xx-xxx-xxx-xx-xxx-xx-xx-xx

備註:

◎在「sheet1」裡,按下「完成」鍵後,能自動將表格裡的資料複製到「sheet2」裡

◎在「sheet1」裡,按下「完成」鍵同時,能清除表格裡輸入的資料(xxx)

◎利用「sheet1」表格,再新增資料,可依序顯示在「sheet2」裡,如下:

銀行名稱xxxxx帳號xxxxx

日期-付款人-付款行-帳號-到期日-票號-金額-備註

xx-xxx-xxx-xx-xxx-xx-xx-xx←第一筆

xx-xxx-xxx-xx-xxx-xx-xx-xx←第二筆

xx-xxx-xxx-xx-xxx-xx-xx-xx←第三筆

xx-xxx-xxx-xx-xxx-xx-xx-xx←第N筆

◎「sheet2」裡的資料可隨時做更改,如新增文字、修改數字、刪除等

以前在學校裡學過,但忘了怎麼製做,只記得好像用巨集的樣子

已更新項目:

TO:Jason

看過也試過檔案了..確實是我所需要的..3Q

可是..請問..是如何做出來的??

因為我還要在「sheet1」裡加入下拉式表單

還有其他筆不同的資料也需使用這設定

所以..想問一下..這是如何做出來的??感恩..

2 個已更新項目:

對了..請問..

可以根據「sheet1」的不同「銀行名稱」,自動複製及跳到不同的工作表,如下:

銀行A→「sheet2」

銀行B→「sheet3」

銀行C→「sheet4」

銀行D→「sheet5」

3 個已更新項目:

嗯..那大致了解了..我自行試試..3Q

3 個解答

評分
  • Jason
    Lv 4
    1 0 年前
    最佳解答

    試作了一個檔案

    以 VBA 巨集程式來達成版主的需求

    已將檔案放在以下網址

    http://www.FunP.Net/796875

    可先下載試試看

    有問題再討論

    2008-12-01 16:56:17 補充:

    這是用巨集程式作出來的

    可由 "工具" -> "巨集" -> "巨集"

    出現巨集視窗後,點選裡面的 "add_new_data_into_sheet2" 巨集

    然後按 "編輯",跳出編輯視窗,即可看到程式內容

    2008-12-01 17:14:08 補充:

    若要加上不同銀行的判斷

    需要修改程式第一行

    Sheets("Sheet2").Select

    2008-12-01 17:14:21 補充:

    改為

    If Worksheets("Sheet1").Range("D1").Value = "台灣銀行" Then

    Sheets("Sheet2").Select

    Else

    If Worksheets("Sheet1").Range("D1").Value = "合作金庫" Then

    Sheets("Sheet3").Select

    Else

    MsgBox ("銀行名稱不正確")

    Exit Sub

    End If

    End If

    看有幾家銀行再自己加上去

  • 匿名使用者
    6 年前

    【亞洲36588合法彩券公司直營 官網: A36588.NET 】

    【 最新活動→迎接新會員,首存狂送20% 】

    【運動→電子→對戰→現場→彩球 】

    【免費服務 →電影區、討論區、KTV歡唱、運動轉播、即時比分、24H客服 】

    【亞洲36588合法彩券公司直營 官網: A36588.NET 】

  • 1 0 年前

    說來話長,不是三言兩語可以讓你打通任督二脈的。

    可嘗試 讀一下我寫的書

    用 excel 做買賣業進銷存

    http://tw.group.knowledge.yahoo.com/excel-learn/ar...

還有問題?馬上發問,尋求解答。