newsgroups-index (beta)

Current group: microsoft.public.cn.excel

=?Utf-8?B?6Zec5pa85a6P55qE5L2/55So?=

=?Utf-8?B?6Zec5pa85a6P55qE5L2/55So?=  
=?Utf-8?B?QnJpZ2h0Lkxp?=
 =?Utf-8?B?UmU6IOmXnOaWvOWuj+eahOS9v+eUqA==?=  
=?Utf-8?B?5bm/5biD5YWD5b63?=
From:=?Utf-8?B?QnJpZ2h0Lkxp?=
Subject:=?Utf-8?B?6Zec5pa85a6P55qE5L2/55So?=
Date:Fri, 14 Jan 2005 16:59:06 -0800
這個問題有點複雜...

比如說, 表格有5欄 (A -> E), 很多列(每天都會不定加減)
其中, A、B、C欄是要用戶輸入資料. D、E欄是公式, 會按A、B、C的數值去計算.

當我想在資料中間插入(複製)列時, 問題就出來
我的公式是這樣:
D2欄: =A1+B2
D3欄: =A2+B3
D4欄: =A3+B4
(都是參照自己對上一行的列去計算)

如果我在D列插入(複製), 公式就會變成
D2欄: =A1+B2
D3欄(新增欄): =A2+B3
D4欄(原來的D3): =A2+B3 <- 參照了原來的儲存格. 但我想它參照A3+B4

另外, 我在"設定格條化條件"中, 都有類似的公式.
我知道可以在複製後, 用儲存格右下角"填滿控點"自動複製公式. 但每插入一行, 要做兩遍. 有點麻煩.
(這個表我是設計給其他人用, 所以操作不能太複雜)

有方法可"自動"更正這個問題嗎?

正嘗用巨集解決這個問題...

但又遇到另一個問題

巨集是這樣的

code:
<複製公式>
Range("K6:L6").Select
Selection.AutoFill Destination:=Range("K6:L207")
Range("K6:L207").Select
Range("G6").Select
Selection.Copy
<複製格式>
Range("G6:G207").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False


我複製公式時, 也是只是按儲存各右下角"填滿控點"兩下, 它就懂得自己填到最底.
它會複製到現在的表格未端. 第207列.
但我的表格長短每日都不同.
有甚麼參數或指令, 令它懂得走到表格未端嗎?
--
Bright.Li
QQ: 113246462
MSN: hotnet_boy@hotmail.com
From:=?Utf-8?B?5bm/5biD5YWD5b63?=
Subject:=?Utf-8?B?UmU6IOmXnOaWvOWuj+eahOS9v+eUqA==?=
Date:Sun, 16 Jan 2005 09:01:57 +0800
d:d
=INDIRECT("a"&(ROW()-1))+INDIRECT("b"&ROW())

"Bright.Li" 写入邮件 news:A41FE884-D6FB-476C-8BF5-4C9AED339A24@microsoft.com...
這個問題有點複雜...

比如說, 表格有5欄 (A -> E), 很多列(每天都會不定加減)
其中, A、B、C欄是要用戶輸入資料. D、E欄是公式, 會按A、B、C的數值去計算.

當我想在資料中間插入(複製)列時, 問題就出來
我的公式是這樣:
D2欄: =A1+B2
D3欄: =A2+B3
D4欄: =A3+B4
(都是參照自己對上一行的列去計算)

如果我在D列插入(複製), 公式就會變成
D2欄: =A1+B2
D3欄(新增欄): =A2+B3
D4欄(原來的D3): =A2+B3 <- 參照了原來的儲存格. 但我想它參照A3+B4

另外, 我在"設定格條化條件"中, 都有類似的公式.
我知道可以在複製後, 用儲存格右下角"填滿控點"自動複製公式. 但每插入一行, 要做兩遍. 有點麻煩.
(這個表我是設計給其他人用, 所以操作不能太複雜)

有方法可"自動"更正這個問題嗎?

正嘗用巨集解決這個問題...

但又遇到另一個問題

巨集是這樣的

code:
<複製公式>
Range("K6:L6").Select
Selection.AutoFill Destination:=Range("K6:L207")
Range("K6:L207").Select
Range("G6").Select
Selection.Copy
<複製格式>
Range("G6:G207").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False


我複製公式時, 也是只是按儲存各右下角"填滿控點"兩下, 它就懂得自己填到最底.
它會複製到現在的表格未端. 第207列.
但我的表格長短每日都不同.
有甚麼參數或指令, 令它懂得走到表格未端嗎?
--
Bright.Li
QQ: 113246462
MSN: hotnet_boy@hotmail.com
   

Copyright © 2006 newsgroups-index   -   All rights reserved   -   Impressum