設定
エクセルVBAのフォーム・モジュール名の変更
▼操作手順:モジュール名を変更する
プロジェクトエクスプローラで名前を変更したいモジュールを選択
↓
メニュー[表示]-[プロパティ]をクリック
↓
プロパティウィンドウの[(オブジェクト名)]欄で名前を変更し、
[Enter]キーを押す
一番右のシートを選択
●サンプル1●
Sub CountSamp1() MsgBox "シート枚数 :" & Sheets.Count & Chr(13) & "ワークシート枚数:" & Worksheets.Count End Sub
●サンプル2●
Sub CountSamp2() Worksheets(Worksheets.Count).Select '---最後のワークシートを選択 End Sub
ファイル選択ダイアログ画面を開く(EXCEL用)
※ EXCELでしか使えない
サンプル
Dim File As String File = Application.GetOpenFilename( _ FileFilter:="テキストデータ,*.TXT" & _ ",すべてのファイル(*.*),*.*" _ , FilterIndex:=0 _ , Title:="直送データを選択して下さい!")
※ VBAの参照設定で,Microsoft Office 12.0 Object Library にチェックを入れる
参考