返回列表 上一主題 發帖

[發問] EXCEL VBA求一元二次方程式 (不用公式解)(3)

ML089

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

論壇榮譽勳章論壇贊助勳章熱烈參與勳章2014馬年全勤獎章2015羊年全勤獎章2016猴年全勤獎章
1# 跳轉到 »
發表於 2021-10-29 10:41 | 顯示全部帖子
回復 1# 森野
有一些問題請教
1.是否可以不設定此項， Sheets.Add.Name = Format(Now(), "dd_hhmmss")，我打這項進去EXCEL VBA 會跳出一個新的工作表
回覆：可不用此行，這是測試用，每次增加新工作表，以利和上次執行比較，我後面有一個刪除臨時工作表的程式可以使用

2.Array是陣列，Resize(, 3)是什麼意思
回覆：水平方向增加3格陣列空間

3.為甚麼要While x <= x2  (X為什麼<=X2
這是設定由 X1 一直跑到 X2，若你已經知道區間，可以設小一點

4.  Cells(r, c1).Resize(, 3) = Array(x, x + s, f(x)) 'Debug 用，如果不設定此項，好像也可以運行，設定此項的目的是甚麼
此行就 DEBUG用，顯示出在工作表上，比較好DEBUG程式設定

5.如果要設定開始的時候文字出現在工作表上，按停止的時候文字就消失，要如何改程式碼，因為我帶入前輩的程式碼
，好像再一次執行，文字都會一直在工作表上，不會消失
回覆：這就比較難回答

我那程式很不穩定，要看方程式型態調整一些參數(分割大小、起始值，區間)，
這只是好玩試想看看電腦是否可以用 一段一段分割方式完成解答。
{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

        靜思自在 : 一個缺口的杯子，如果換一個角度看它，它仍然是圓的。
返回列表 上一主題