返回列表 上一主題 發帖

[發問] 如何在儲存格輸入有變數的計算公式

lamihsuen

帖子
33 
主題
4 
精華
0 
積分
37 
點名
0  
作業系統
w7 
軟體版本
pro 
閱讀權限
10 
性別
女 
來自
台中 
註冊時間
2012-6-20 
最後登錄
2019-5-24 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-7-4 18:36 | 顯示全部帖子

[發問] 如何在儲存格輸入有變數的計算公式

請敎各位大大我想在下列儲存格範圍 輸入計算公式因為列數會變動因此數字值 (列數)要改用變數

Worksheets(wr).Range(C58:C102).FORMULA="=(B6-$B$3)/$C$3"
Worksheets(wr).Range(D58:D102).FORMULA=(B6-$B$52)/$B$53
我用下列方式但都錯誤,
Worksheets(wr).Range("C" & angin_sr & " C" & xlRow &  ).Formula = "=(B" & angin_sr & "-$B$(angin_sr-3)/$C$(angin_sr-3)"
請敎各位大大要如何寫出上述正確的程式
收藏 分享

lamihsuen

帖子
33 
主題
4 
精華
0 
積分
37 
點名
0  
作業系統
w7 
軟體版本
pro 
閱讀權限
10 
性別
女 
來自
台中 
註冊時間
2012-6-20 
最後登錄
2019-5-24 
2#
發表於 2012-7-4 22:42 | 顯示全部帖子
回復 2# kimbal
DIM  angin_sr AS  integer

angin_sr  = sr +workshees(wr).ranger("a3").vaiue+6
angin_sr 為第二次起始列數,=  第一次起始列數值(sr)+第一次所有列數數目(workshees(wr).ranger("a3").vaiue)+6格空格

TOP

lamihsuen

帖子
33 
主題
4 
精華
0 
積分
37 
點名
0  
作業系統
w7 
軟體版本
pro 
閱讀權限
10 
性別
女 
來自
台中 
註冊時間
2012-6-20 
最後登錄
2019-5-24 
3#
發表於 2012-7-5 09:48 | 顯示全部帖子
回復 4# kimbal
   k大:
對不起
Worksheets(wr).Range("C" & angin_sr  ": " C" & xlRow &  ).Formula = "=(B" & angin_sr & "-$B$(angin_sr-3)/$C$(angin_sr-3)"
應該少1 個   :     符號 我這語法想要表達的是wr工作表儲存格"C" 列數   :" C"列數)的 範圍.formula (設定公式) =(為) ("B"列數  -  "B"列數(鎖定儲存格)  /   "C" 列數( 鎖定儲存格)
如果   angin_sr = 58
            xlrow     =   102
則上列語法會是下列的語法
Worksheets(wr).Range("C58" :"C102" ).Formula = "=("B58"-"$B$ 55") /$C$ 55 "

我想要請教前輩的是上列程式當數字用變數代替時上列語法要如何寫出

TOP

lamihsuen

帖子
33 
主題
4 
精華
0 
積分
37 
點名
0  
作業系統
w7 
軟體版本
pro 
閱讀權限
10 
性別
女 
來自
台中 
註冊時間
2012-6-20 
最後登錄
2019-5-24 
4#
發表於 2012-7-6 01:32 | 顯示全部帖子
回復 6# oobird
感謝oobird大大的幫忙 問題已解決,.用了你程式已能正確執行

TOP

        靜思自在 : 忘功不忘過，忘怨不忘恩。
返回列表 上一主題