1樓：匿名使用者
對ma從1開始，每隔0.01計算等式右邊的值，與θ比較等於或者最接近的，通過插值計算可以得到最接近的解
2樓：三井熊
不需要用vba
兩種方式，一種是自己推匯出反函式，變成b=f(a)，
第二種是單一變數求解，在資料-模擬分析下可以找到。
3樓：姓王的
用單變數求解，錄製巨集，然後修改**並加上迴圈即可
4樓：匿名使用者
你的公式 描述有問題啊……看不懂是什麼東西……
再重新 描述一下吧……
應該用公式 就可以做了吧 為什麼要用vba哪？
靠！看完補充 我就更暈菜了……公式不重要？重要的是實現方法！“還有很多變數沒列出來哪”！……
那麼現在這能告訴你 你可以用vba來編寫一個計算過程 按著 你已知的公式 和變數情況 定義變數 然後 讓這些變數 採用相應的 單元格的值 然後再 按著 你的公式 進行計算，並把結果返回到需要的地方……
你這裡 就是如果是兩個變數的話 變數a就是a列的 b就是這個過程返回的結果……
這個過程最好被定義為 函式過程 這樣 就更方便 你的使用了……我現在智慧這麼說了……
因為 你似乎是 補充的公式 也不是最後的公式！！！！！！！！！還是一說法而已 所以不能做具體的** 或者其他公式推薦……
好運吧！
5樓：長江邊的風
你在a1輸入公式=atan(b1)+atan(b1+1)“資料選單“->“模擬分析”->“單變數求解”。
在跳出的對話方塊中的 “目標單元格”輸入“a1” ，“目標值”輸入原來填在a1單元格中的資料，“可變單元格”輸入b1。單擊確定。
剩餘4行都採用相同操作即可。
有時候往往多朝了vba方向想，卻忽略了excel自身的功能。不到萬不得已不推薦用vba。
6樓：匿名使用者
公式有問題吧，這個a完全沒有用的啊
等式2變可以吧a約掉的，就變成了1=tan(b)+tan(b+1)
也就是說隨便a是什麼，b都一樣啊
excel中如何用vba解決簡單的一元一次方程？ 比如x-0.25*x=1000 求x 50
7樓：匿名使用者
public function fx(s)'x-0.25*x=1000
dim arr
arr = split(s, "=")
arr(0) = replace(arr(0), "x", 1) '變向提取引數公因式求和作為除數
fx = arr(1) / evaluate(arr(0))end function
public sub jisuan()
msgbox fx("x-0.25*x=1000")end sub
計算結果：1333.333333333333333
8樓：匿名使用者
直接x=1000/(1-0.25)
使用vba從excel讀取資料並按一定方程計算，並將計算結果逐行儲存到單元格內，
9樓：陽光上的橋
你說的這麼復抄雜，我理解為取d、e兩列的最後三行，計算結果儲存在a11、a10、a9三行裡面，因為中間那些計算了又刪除的的操作是多餘的吧，那麼**為：
x=range("d65536").end(xlup).rowfor i=1 to 3
for j=1 to 2
cells(12-i,j) = cells(x+i+1,j+3) * cells(x+i+1,j+3)
next j
next i
如何在excel中使用VBA呼叫其它外部程式
shell 函式 r執行乙個執行檔程式，如果成功的話，會傳回乙個 variant double 來代表這個程式的 task id，若不成功，則會傳回 o。語法 shell pathname windowstyle shell 函式的語法含有底下這些指名引數 單元描述 pathname 必要引數，va...
在EXCEL中使用格式刷無效，EXCEL格式刷怎麼沒反應
原因 未在使用前固定格式。解決方法 重新正確設定來解決此問題。1 首先，選擇excel文件並雙擊開啟它，如下圖所示。2 接下來，在介面中選擇要引用的excel內容格式。3 然後在介面中，點選工具欄上方的 格式筆刷 按鈕。4 接下來，在介面中單擊需要重新整理格式的excel內容，如下圖所示。5 最後，...
excel ln函式，怎麼在excel中使用ln函式
ln返回一個數的自然對數。自然對數以常數項 e 2.71828182845904 為底。語法ln number number 是用於計算其自然對數的正實數。說明ln 函式是 exp 函式的反函式。http jingyan.baidu.com article ca41422fd8fc3d1eae99e...