2011年7月2日 星期六

輸入或輸出計算結果

初學Excel VBA的人可能會想,以前我用VB可以用msgbox()或用label.text來輸出計算結果,換成Excel VBA後,不是有很多excel儲存格可以用嗎,沒錯

利用range物件的value屬性即可輸入或輸出值

 

Sub test1()

    Range("c2").Value = Range("a2").Value + Range("b2").Value
   
End Sub

 

 

事實上excel也可放置active控制項來做輸入輸出

 

Sub test1()

    Range("c2").Value = Range("a2").Value + Range("b2").Value
  
   '因為此VBA置於模組內,而Label與textbox放置在工作表1內,因此無法直接取用
    'Label1.Caption = Range("c2").Value
    'TextBox1.Text = Range("c2").Value
   
    工作表1.TextBox1.Text = Range("c2").Value
    工作表1.Label1.Caption = Range("c2").Value
   
   
End Sub

沒有留言:

張貼留言