以下のような EXCELマクロを VBScriptにしたいのです
理由はフォルダーウインドウを指定した場所指定した大きさで開くマクロ
ですが,いちいちエクセルを開かないで実行したいからです。
ここまではWEBを参考にさせていただきながら作成しましたが
VBスクリプトはほとんど分りません。お手数をかけますが
宜しくお願いいたします。
Sub Folder() ' ★ Folder 用
Dim FPath As Variant
Dim objW As Object
Dim i As Long
FPath = "G:\"
With CreateObject("Shell.Application")
.Open FPath
Application.Wait Now() + TimeValue("0:00:01")
For Each objW In .Windows
If InStr(TypeName(objW.document), "ShellFolder") > 1 Then
If objW.document.Folder.Items().Item.Path = FPath Then
objW.Top = 0
objW.Left = 642
objW.Height = 1036
objW.Width = 637
If
End If
Next
End With
End Sub
No.1ベストアンサー
- 回答日時:
この辺りを参考にして、
http://www.whitire.com/vbs/tips0126.html
https://plaza.rakuten.co.jp/1nosuke/diary/200912 …
Option Explicit
On Error Resume Next
Dim FPath
Dim objW
FPath = "G:\"
With WScript.CreateObject("Shell.Application")
.Open FPath
WScript.Sleep 1000
For Each objW In .Windows
If InStr(TypeName(objW.document), "ShellFolder") > 1 Then
If objW.document.Folder.Items().Item.Path = FPath Then
objW.Top = 0
objW.Left = 642
objW.Height = 1036
objW.Width = 637
End If
End If
Next
End With
とか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) このVBAでExcelアプリケーションを作成は必要ですか? 3 2023/07/19 21:13
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/03 09:11
- Visual Basic(VBA) Excel vbaについての質問 3 2023/04/18 16:14
- Visual Basic(VBA) VBA This Workbookモジュールを別ファイルにコピーする方法 1 2022/09/14 01:51
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- その他(Microsoft Office) マクロVBAについて 1 2022/09/06 18:12
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Visual Basic(VBA) ExcelVBAに関する質問 3 2023/02/17 10:47
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/20 16:59
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
SafariのIframeで高さが取得で...
-
クリッカブルマップのリンク部...
-
javascriptの基本的なことだと...
-
Null またはオブジェクトではあ...
-
DOM要素を削除しても、イベント...
-
Javascriptで定期的にF5を押す...
-
IE操作で別タブ表示のHTMLソー...
-
乗換案内 VBAで操作したい
-
TEXTAREA内の改行位置をinnerHT...
-
チャットフォームで文字色をラ...
-
このjavascriptのif文、条件式...
-
背景ランダム
-
選択によってsubmitボタンの色...
-
LaTeX:数式を等号揃えにする方法
-
functionから別のfunctionを実...
-
javascriptで自動計算フォーム...
-
日本語入力の禁止
-
URLの一部をコピーできるブック...
-
関数でy=g(x)のgとは何の略です...
-
google apps scriptの終了のさせ方
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
JavaScript window.openで開く...
-
このjavascriptのif文、条件式...
-
FireFoxのjavascriptで自動でキ...
-
DOM要素を削除しても、イベント...
-
javascriptの基本的なことだと...
-
文字を一文字ずつ表示
-
showModalDialogで開いた画面を...
-
Null またはオブジェクトではあ...
-
Javascriptのhtml出力についてa...
-
codejump 模写コーディングgall...
-
LaTeX:数式を等号揃えにする方法
-
javascriptのdocument.allにつ...
-
excle VBA とweb上の検索を利用...
-
Latexに関する質問です。
-
乗換案内 VBAで操作したい
-
JavaScriptのdocument.all("変...
-
Javascriptで定期的にF5を押す...
-
選択によってsubmitボタンの色...
-
スマホでフォームにフォーカス...
-
compatModeとは?
おすすめ情報