フォームを開く

UserForm1.Show

表示位置を指定する

UserForm1.StartUpPosition = 0
UserForm1.Top = 300
UserForm1.Left = 300
UserForm1.Show

フォーム表示後もシートの操作を可能にする

UserForm1.Show vbModeless

フォームを閉じる

Unload UserForm1

フォームを非表示にする

UserForm1.Hide

フォームを閉じると取得した値もリセットされるため、それを防ぐために使用する。

オブジェクトに値を追加

1件追加

Object.AddItem "hoge"

セル範囲を追加

myAddress = Range("A1:D4").Address
Object.RowSource = myAddress

配列を追加

Object.List = array

オブジェクトを使用不可にする

Object.Enabled = False '使用不可にする
Object.Enabled = True  '使用可能にする

テキストボックスの入力を数値に限定する

VBE

項目
IMEMode3 - fmIMEModeDisable?

IMEを半角英数に強制する

VBA

Private Sub Object_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    If Not Chr(KeyAscii) Like "[0-9]" Then
        KeyAscii = 0
    End If
End Sub

リストボックスの選択

i = Object.ListIndex   '選択されたインデックスを取得
Object.ListIndex = i   '指定したインデックスを選択

リストボックスの件数

Object.ListCount

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2022-10-09 (日) 23:37:30 (47d)