返回列表 上一主題 發帖

[發問] 有關類似現金帳的加總問題

[發問] 有關類似現金帳的加總問題

請教各位先進幫忙解決,如附加檔表格 TC專用現金簿_Test.rar (10.06 KB)
首先說明需求,每月固定付款日期約是5、10、15、20、25以及月底。所以需要有加總計算餘額的需求,但是表格雖是固定付款日,但有可能會隨時插入某日(如表中第三例中之10號下須增加三個收付款項目)。

由於小弟所學有限,故請教先進如何可以做到下列需求(如何下函數、或者是必須採VBA方式解決,因為小弟現在所下的函數無法解決我的下列全部需求)
1. 餘額加總是必須的。
2. 但有可能是5號有金額,但是10號沒有,但是20號又有金額。(跳行處理)
3. 沒有金額的部分,是否可以顯示為空白,如果不可以,在以後未發生的月份餘額是否可以不顯示(第二例30號之後的餘額)。
4. 如果如第三例中之10號需增加三個項目(插入三行),公式可由操作者自行複製上(下)方之公式,且公式不須再修改。

以上請先進們幫忙解惑!

回復 1# 97forum
是這樣嗎?


Tset.rar (5.04 KB)
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復 2# GBKEE

感謝前輩的回覆,正是如此。
原來可以使用名稱定義的方式來解決如此的需求,只是有些不懂的地方請教,名稱定義的過程中,如何可以讓範圍不受限制(隨表格變更改變範圍)。
因為看不懂前輩對於名稱的設定方式。

TOP

本帖最後由 GBKEE 於 2013-5-29 15:01 編輯

回復 3# 97forum
名稱定義的儲存格位置可分
絕對位置:  例 [名稱]=$A$4  永遠是 $A$4
相對位置:  當滑鼠選定B4(作用中儲存格)時,定義: [名稱]=A4 (B4相對於左邊一欄的儲存格) , 如你移動滑鼠在任一選定儲存格,貼上的名稱後會是  作用中儲存格的左邊一欄同一列號的數值  
             當滑鼠選定D4(作用中儲存格)時,定義: [名稱]=$A4 (永遠相對於A欄的同一列的儲存格)
             當滑鼠選定D4(作用中儲存格)時,定義: [名稱]=A$4 (永遠相對於左邊3欄的的第4列的儲存格)
            類推......
            當滑鼠選定A4(作用中儲存格)時,定義: [名稱]=D$4 (永遠相對於右邊3欄的的第4列的儲存格)            

注意: 相對的位置不可以超出工作表的範圍.(B4相對於左邊一欄的儲存格,當你在A欄 這[名稱]=A4 ,會有錯誤的.)
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復 4# GBKEE

所以前輩只是在於絕對位置與相對位置上的不同而已,是這樣子嗎?
想另外請教一件事情,如果想將餘額的儲存格(或欄位)鎖定保護 (也就是指開放日期、摘要、收入、支出這幾個儲存格),但在於表格中應當如何去做設定,然後在表格最後一欄之後新增加一筆資料,表格可以自行新增一列 (非插入之方式),不會去影響表格之特性?

TOP

回復 5# 97forum
用VBA 寫公式

Tset.rar (8.15 KB)
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復 6# GBKEE
前輩:
有些不解,是否如此工作表就不需要做保護?
這樣子可以保護不會去修改到餘額的欄位嗎?
我測試後發現餘額並不正確(沒有計算)!

如果不行也就是只能不保護工作表了?

TOP

回復 1# 97forum
F4=IF((C4="")*(D4="")*(E4=""),"",SUM(INDIRECT("R4C4:RC4",0))-SUM(INDIRECT("R4C5:RC5",0)))
學海無涯_不恥下問

TOP

回復 7# 97forum
2010版 可能有問題
  1. Option Explicit
  2. Private Sub Worksheet_Change(ByVal Target As Range)
  3.      Application.EnableEvents = False
  4.      With Range("F4:f" & UsedRange.Rows.Count)  'F4到已範圍範圍的底部
  5.          .Value = "=餘額"                  '寫入公式
  6.       '  .Value = .Value               '*** 這行程式碼不要用試試看***  '等於公式的值
  7.     End With
  8.      Application.EnableEvents = True
  9. End Sub
複製代碼
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

本帖最後由 97forum 於 2013-5-29 17:19 編輯
回復  97forum
F4=IF((C4="")*(D4="")*(E4=""),"",SUM(INDIRECT("R4C4:RC4",0))-SUM(INDIRECT("R4C5:RC5" ...
Hsieh 發表於 2013-5-29 16:34

這個可用,謝謝前輩!
另前輩您的公式中 "*" 代表 OR 的意思是嗎?
如果要做保護該表格中公式的部分又該如何處理?想保有表格的特性(自動增加一筆新資料)


回復  97forum
2010版 可能有問題
GBKEE 發表於 2013-5-29 16:34

測試之後還是不行。:(

TOP

        靜思自在 : 要批評別人時,先想想自己是否完美無缺。
返回列表 上一主題