ExcelVBA

Last-modified: 2013-07-17 (水) 17:07:21

設定

エクセル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 にチェックを入れる
参考

サイト内リンク