| 技・テクニック |
|
■講義一覧
 1. InputBoxメソッドでキャンセル処理を正しく行う
2. 右クリックを禁止する
■1.InputBoxメソッドでキャンセル処理を正しく行う
Sub main()
Dim rt_vari As Variant
rt_vari = Application.InputBox("データを入力してください", Type:=1)
If VarType(rt_vari) = vbBoolean Then
MsgBox "キャンセルされました"
Exit Sub
End If
MsgBox "処理を続行します"
End Sub
|
一覧へ
■2.右クリックを禁止する
・ブックに含まれているシートすべてで右クリックを禁止する
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object _
, ByVal Target As Range, Cancel As Boolean)
MsgBox "右クリック禁止!!", vbExclamation
Cancel = True
End Sub
|
一覧へ
|
|
| |
A8ネット
・人気度：★★★★★
・言わずと知れた人気ASP
 |
| |
楽天市場
・人気度：★★★★★
・誰でも安心、楽天市場で
タワーレコード
・人気度：★★★★☆
・CD/DVDならタワレコで
|
|
