帖子: 46
主題: 10
精華: 0
積分: 75
點名: 8
作業系統: win7
軟體版本: 64旗艦版
閱讀權限: 20
性別: 男
來自: taiwan
註冊時間: 2012-1-27
最後登錄: 2024-8-15

論壇贊助勳章

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2016-2-1 18:45 | 只看該作者

怎麼快速的算出反函數值

假設有一個函數公式是這樣=(C6*C7)+9.36*LOG10(G5)-0.2+(LOG10((C9-C10)/(2.7))/(0.4+(1094/(G5^5.19))))+2.32*LOG10(C14)-8.07
會有C6 C7 G5 C9 C10這些參數，輸入後可算出答案，但是假設今天答案已知並且 C6 C7 C9 C10參數固定的情況下，要如何算出G5，不知道有沒有比較快的方法

樓主熱帖

m06o2~~~~

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

2^#

發表於 2016-2-3 17:57 | 只看該作者

本帖最後由 ML089 於 2016-2-3 17:58 編輯

回復 1# m06o2

G6 =(C6*C7)+9.36*LOG10(G5)-0.2+(LOG10((C9-C10)/(2.7))/(0.4+(1094/(G5^5.19))))+2.32*LOG10(C14)-8.07

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

m06o2

中學生 Rank: 2

帖子: 46
主題: 10
精華: 0
積分: 75
點名: 8
作業系統: win7
軟體版本: 64旗艦版
閱讀權限: 20
性別: 男
來自: taiwan
註冊時間: 2012-1-27
最後登錄: 2024-8-15

論壇贊助勳章

3^#

發表於 2016-2-3 18:55 | 只看該作者

回復 2# ML089

版主大大!!!!非常感謝您學到一個新技能了!!!!!

m06o2~~~~

TOP

m06o2

中學生 Rank: 2

帖子: 46
主題: 10
精華: 0
積分: 75
點名: 8
作業系統: win7
軟體版本: 64旗艦版
閱讀權限: 20
性別: 男
來自: taiwan
註冊時間: 2012-1-27
最後登錄: 2024-8-15

論壇贊助勳章

4^#

發表於 2016-2-3 21:38 | 只看該作者

回復 2# ML089
版主您好想詢問另外一個問題，在目標值的部分可以讓他自動讀取某一個的數字嗎因為如果目標值也會隨著其他的數值變動！！

m06o2~~~~

TOP

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

5^#

發表於 2016-2-3 21:46 | 只看該作者

回復 4# m06o2

使用VBA

Sub 目標搜尋()
Range("G6").GoalSeek Goal:=17.61664, ChangingCell:=Range("G5")
End Sub

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

m06o2

中學生 Rank: 2

帖子: 46
主題: 10
精華: 0
積分: 75
點名: 8
作業系統: win7
軟體版本: 64旗艦版
閱讀權限: 20
性別: 男
來自: taiwan
註冊時間: 2012-1-27
最後登錄: 2024-8-15

論壇贊助勳章

6^#

發表於 2016-2-3 22:00 | 只看該作者

回復 m06o2

Sub 目標搜尋()
Range("G6").GoalSeek Goal:=17.61664, ChangingCell:=Ra ...
ML089 發表於 2016-2-3 21:46

版主您好，非常感謝您，但想請問 17.61664可以是讀某一個欄位嗎？？因為17.61664是一個會變動的
使用VBA

m06o2~~~~

TOP

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

7^#

發表於 2016-2-4 08:59 | 只看該作者

本帖最後由 ML089 於 2016-2-4 10:32 編輯

回復 6# m06o2

可以使用欄位
Sub 目標搜尋()
For i = 1 To 10
Range("G6").GoalSeek Goal:=Range("I6").Offset(, i), ChangingCell:=Range("G5")
Range("I7").Offset(, i) = Range("G5")
Next
End Sub

怎麼快速的算出反函數值.rar (14.62 KB)

Range("I7").Offset(, i) = Range("G5") 是近似值會有很多小數，可以用ROUND函數取整數或小數幾位
修改如下
Range("I7").Offset(, i) = Round(Range("G5"), 0)

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP