第六週上課


網頁指令VBA指令
聯絡人職稱: UserForm_Initialize()'起始表單事件設定
聯絡人職稱:<select id="ComboBox1">
<option>董事長</option>
<option>總經理</option>
<option>副總經理</option>
<option>財務長</option>
<option>人資長</option>
</select>		With ComboBox1
.Additem("董事長")
.Additem("總經理")
.Additem("副總經理")
.Additem("財務長")
.Additem("人資長")
End With

留言

張貼留言

這個網誌中的熱門文章

曾中仁EXCEL函數將 半結構化數據 轉化成 結構化數據

圖片
劉任昌觀看劉任昌075 使用內建函數Find，Left，Mid，Concatenate 廖元銘同學 半結構化數據 semi-structured data 德國DAX 30成分股 中文 原文 類別 愛德達斯 Adidas AG Adidas AG 安聯 Allianz SE Allianz SE 巴斯夫 BASF SE BASF SE 拜耳 Bayer AG Bayer AG 西門子能源股份公司 Siemens Energy AG Siemens Energy AG 寶馬 Bayerische Motoren Werke AG Bayerische Motoren Werke AG 大陸集團 Continental AG Continental AG 科思創 Covestro AG Covestro AG 戴姆勒朋馳曾中仁汽車股份有限公司 Daimler AG Daimler AG 德意志銀行 Deutsche Bank AG Deutsche Bank AG 德國證券交易所 Deutsche Börse AG Deutsche Börse AG 德國郵政 Deutsche Post AG Deutsche Post AG 德國電信 Deutsche Telekom AG Deutsche Telekom AG 德國住宅公司 Deutsche Wohnen SE Deutsche Wohnen SE 費森尤斯集團 Fresenius SE Fresenius SE 費森尤斯醫療 Fresenius Medical Care AG & Co. KGaA Fresenius Medical Care AG & Co. KGaA 漢高 Henkel Henkel 英飛凌 Infineon Technologies AG Infineon Technologies AG 林德 Linde AG Linde AG 默克集團 Merck KGaA Merck KGaA MTU航空發動機公司 MTU Aero Engines AG MTU Aero Engines AG 麥德龍 Metro AG Metro AG 慕尼黑再保險 Münchener Rückver...
閱讀完整內容

第16周word+excel貼上來

  利率 1.2%( 月利率 0.001) ，房貸貨款，每月還 2 萬，貨款多少 ?   現值 $4,265,556 `= 金流 / 利率 *(1-(1+ 利率 )^- 期數 ) 利率 0.001 期數 240 金流 20000 曾中仁自己在HTML打 利率1.2%(月利率0.001)，房貸貨款，每月還2萬，貨款多少? 現值 $4,265,556 `=金流/利率*(1-(1+利率)^-期數) 利率 0.001 期數 240 金流 20000 2020賽季甩棒特輯 我覺得2020賽季排名No.1的甩棒畫面是＿＿＿＿＿甩出來的💥 由 MLB Taiwan 美國職棒大聯盟 發佈於 2020年12月12日 星期六
閱讀完整內容

第十三周

圖片
Dim payment(period) As Double '廣域變數 4 維度的陣列 Private Sub CommandButton1_Click()   Dim a, b, c, f, gap As Double   Dim loopNumber As Integer   a = 0   b = 1   gap = 10   loopNumber = 10   payment(0) = TextBox1.Value   payment(1) = TextBox2.Value   payment(2) = TextBox3.Value   payment(3) = TextBox4.Value   f = npv(a)   If f = 0 Then      Label9.Caption = 0   ElseIf f &lt; 0 Then      Label9.Caption = "內部報酬率小於 0."   Else      Do While gap &gt; mexerror And Abs(f) &gt; maxerror And loopNumber &lt; 300        loopNumber = loopNumber + 1        c = (a + b) / 2        f = npv(c)        If Abs(f) &gt; maxerror And gap &gt; maxerror Then           If f &gt; 0 Then             a = c           Else ...
閱讀完整內容