天天看點

EXCEL中簡單使用VBA上

EXCEL中簡單使用VBA上

在Excel内部打開VBA

EXCEL中簡單使用VBA上
EXCEL中簡單使用VBA上

以及在運作之前需要開啟一下家開發人員的安全性

EXCEL中簡單使用VBA上

打開的頁面可能是這樣,不要慌

EXCEL中簡單使用VBA上

可以在這裡選擇打開視窗

EXCEL中簡單使用VBA上

如果還是不一樣,可以這這裡打開資源的管理器

EXCEL中簡單使用VBA上

F4按鍵會按照目前你打開的視窗,智能的打開你目前所在視窗的屬性

EXCEL中簡單使用VBA上

我們按照慣例先看一下項目的管理欄目

首先好的一點就是可以看出來項目内部檔案之間的層級關系

我們這裡可以點選右鍵探索一些ssuo

EXCEL中簡單使用VBA上

在右鍵的菜單内可以打開菜單

EXCEL中簡單使用VBA上

我們這裡看一下類

EXCEL中簡單使用VBA上
EXCEL中簡單使用VBA上

這個圖截取的更加的清晰

EXCEL中簡單使用VBA上

也可以把目前的代碼列印出來

EXCEL中簡單使用VBA上

列印的效果圖

EXCEL中簡單使用VBA上

首先我們要使用的畫布,所有的操作都是在這個裡面進行的

EXCEL中簡單使用VBA上

首先可以先放一個控件

EXCEL中簡單使用VBA上

對于一個控件,可以右鍵看到一些使用的菜單

EXCEL中簡單使用VBA上

這裡的屬性和函數内部的參數的意思有重疊的意思

EXCEL中簡單使用VBA上

有兩種排列模式,按照自己的喜好來選擇使用

EXCEL中簡單使用VBA上

可以在後面的欄目内部打開還是開啟此功能

EXCEL中簡單使用VBA上

這裡是又繪制了一個視窗

EXCEL中簡單使用VBA上

未來後文的使用友善,可以重新定義一個檔案

EXCEL中簡單使用VBA上

對于每一個将來要使用的事件,都可以去輕按兩下控件進入内部去編寫觸發用的代碼

EXCEL中簡單使用VBA上

可能覺得這個字不好看

EXCEL中簡單使用VBA上

可以在這裡設定等寬的字型

EXCEL中簡單使用VBA上

這個是寫的一個簡單的頁面

EXCEL中簡單使用VBA上

最終的效果圖

EXCEL中簡單使用VBA上

需要進行對文本的強制轉換

Private Sub CB_Click()

If Val(T1.Text) + Val(T2.Text) = Val(T3.Text) Then

MsgBox "OK"
Else
MsgBox "NO"

End If

End Sub

Private Sub CB2_Click()
val(T1.Text) =val(T2.Text(int(rand()*20+1)
End Sub

Private Sub Label2_Click()

End Sub

Private Sub UserForm_Click()

End Sub
           

複制

https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/msgbox-constants           

複制

EXCEL中簡單使用VBA上

在微軟的文檔内可以查到對應使用的函數的一些參數以及用法

EXCEL中簡單使用VBA上

對于一些控件,我們可以成組的來控制

EXCEL中簡單使用VBA上

可以考慮來對齊

EXCEL中簡單使用VBA上

可以生成一個組

EXCEL中簡單使用VBA上
EXCEL中簡單使用VBA上
EXCEL中簡單使用VBA上

對于資訊提示框還有很多的參數

EXCEL中簡單使用VBA上

也可以去把相應的函數傳回賦給一個新的變量在下文内處理~