nav分隔線 nav分隔線

認識Excel VBA變數與型別

icon_fb icon_twitter icon_google
認識Excel VBA變數與型別

文、意如老師

 

 

本文你可以學到:

一、變數與型別

二、認識型別

三、宣告變數並使用

 

 

一、變數與型別

 

當某個值會重複使用,或者根據程式變化而會一直改變的值,就可以建立一個變數將其存下來,並賦予這個變數一個型別。

 

VBA的變數宣告跟其它語言比起來比較沒那麼嚴謹,例如Java要創建變數時需宣告後才可以使用,但是VBA首次為其賦值時,就可創建變數。

 

 

二、認識型別

 

在VBA中可以使用的型別有很多,可以參考官方網站的介紹型別,這邊先簡單快速的介紹最常用五大類型(整數、浮點數、字串、布林、萬用類型)

 

 1. 整數-Integer 

在範圍內 -2,147,483,648 ~ 2,147,483,647,只要沒有小數點的都是屬於整數。

 

 2. 雙精度浮點數-Double 

在範圍內-1.79769313486231570E+308 ~ 4.94065645841246544E-324,只要有小數點的都是浮點數。

 

 3. 字串-String 

使用單引號或雙引號包起來,可以儲存0 到大約 20 億個 Unicode 字元

 

 4. 布林-Boolean 

範圍只有True與 False ,

True為真、成立、數字代表1 。

False為假、不成立、數字代表0 。

 

 5. 萬用類型-Variant 

可以儲存任何類型的資料

 

 

三、宣告變數並使用

 

這邊從宣告變數到使用變數需要三步驟

 

 步驟1:宣告變數 

VBA使用Dim來宣告變數,並使用As來指定變數類型。

例:宣告一個字串的變數mystr

Dim mystr As String

 

 

 

 步驟2:給予變數初始值 

mystr = "HelloWorld"

 

 

 

 步驟3:使用變數 

在儲存格A1中設定變數mystr

Range("A1").Value = mystr

 

 

 

彈窗中印出變數內容

 

 

 

完整程式碼如下:

Sub test()

    Dim mystr As String

    mystr = "HelloWorld"

    Range("A1").Value = mystr

    MsgBox (mystr)

End Sub

 

 

接下來可以試著練習看看其他的類型,使用的方式都一樣。

例如:

 

宣告mydouble為浮點數Double:

Dim mydouble As Double

mydouble = 3.2

MsgBox (mydouble)

 

 

宣告myint為整數Integer:

Dim myint As Integer

myint = 7

MsgBox (myint)

 

 

 

宣告myboolean為布林Boolean(如果是布林為True印出真,False則印出偽):

Dim myboolean As Boolean

myboolean = True

MsgBox (myboolean)

 

 

宣告myvariant為任意型別Variant

Dim myvariant As Variant

myvariant = 1.5

MsgBox ("V1=" & myvariant)

myvariant = False

MsgBox ("V2=" & myvariant)

 

 

完整程式碼參考如下:

Sub test()

    Dim mystr As String

    mystr = "HelloWorld"

    Range("A1").Value = mystr

    MsgBox (mystr)

   

    Dim mydouble As Double

    mydouble = 3.2

    MsgBox (mydouble)

   

    Dim myint As Integer

    myint = 7

    MsgBox (myint)

   

    Dim myboolean As Boolean

    myboolean = True

    MsgBox (myboolean)

   

    Dim myvariant As Variant

    myvariant = 1.5

    MsgBox ("V1=" & myvariant)

    myvariant = False

    MsgBox ("V2=" & myvariant)

End Sub

 

 

🔺 除了變數與型別,還要一起掌握更精準的Excel試算表應用技能

 

 

 

FB粉絲團:https://www.facebook.com/lccnetzone
YouTube頻道:https://www.youtube.com/user/LccnetTaiwan

痞客邦Blog:http://lccnetvip.pixnet.net/blog

本網站使用相關網站技術以確保使用者獲得最佳體驗,通過使用我們的網站,您確認並同意本網站的隱私權政策。欲了解詳情,請參閱 隱私權政策