advanced help
per page, with , order by , clip by
Results of 51 - 58 of about 58 for CurrentDirectory (0.002 sec.)
[[20130325091329]] 6118
『ブックにデフォルト名を指定・保存先フォルダを選択して保存』(豆茶)
[[20130221112955]] 上記質問 ... Sub test() Dim assp CreateObject("WScript.Shell").CurrentDirectory = "¥¥XXXXX¥YYYYY" assp = Application.GetOpenFilena ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201303/20130325091329.txt - [detail] - similar
[[20230408030656]] 6118
『別ブックから特定のシートだけをコピーしたいのですが、インデックスが有効範囲に無いエラーが出ます ... nd If End With With CreateObject("WScript.Shell") .CurrentDirectory = myFolder End With Filename = Dir("*.xlsx") Do Wh ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/202304/20230408030656.txt - [detail] - similar
[[20200107165929]] 5957
『複数のブックをシート毎に集約したいです...』(Yuka)
あるネットワークフォルダ内に4つのExcel(.x ... と考えています。 Private Declare PtrSafe Function SetCurrentDirectory Lib "kernel32" Alias "SetCurrentDirectoryA" (ByVal ... (1).Name 貼付シート = Sheets(2).Name '開く Call SetCurrentDirectory("格納先フォルダ") ファイル = ThisWorkbook.Name Msg ... g Dim wsn As Variant CreateObject("WScript.Shell").CurrentDirectory = fp For Each wsn In Array("2", "3", "4", "5") fn ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/202001/20200107165929.txt - [detail] - similar
[[20210320145513]] 5957
『vba 2ファイル間の転記方法』(u)
お世話になります 予めマクロで生産順番事に使用する部品を表示す ... False" Then Exit Sub CreateObject("Wscript.shell").currentdirectory = "¥¥192.1.7.222¥製造共有¥チップ関係¥出庫管理(chi ... かんやする処理------▼ CreateObject("Wscript.shell").currentdirectory = "¥¥192.1.7.222¥製造共有¥チップ関係¥出庫管理(chi ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/202103/20210320145513.txt - [detail] - similar
[[20190612140328]] 5957
『VBA セルの値をフォルダ内の他ブックへ値貼付けしたい』(初心者)
マクロ初心者です。 下記を行うVB ... & "¥" & "*.xls?") を CreateObject("WScript.Shell").CurrentDirectory = "¥¥何とか¥かんとか¥" fileName = Dir("*.xls?") "¥ ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201906/20190612140328.txt - [detail] - similar
[[20220622191127]] 5957
『VBA 転記作業』(アイアン)
こんばんわ。 VBAの転記作業にてお聞きしたいです。 以下のコードで抽出 ... to1 = ActiveWorkbook CreateObject("Wscript.shell").currentdirectory = "C:¥Users¥***¥Desktop¥リスト" OpenFileName = App ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/202206/20220622191127.txt - [detail] - similar
[[20180501142823]] 5957
『もう少し綺麗なコードにしたい』(じむいんさん)
はじめまして、いつもこちらで勉強しております。 ... ァイルを保存する With CreateObject("WScript.Shell") .currentdirectory = FolderName 'フォルダ移動 End With On Error Resum ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201805/20180501142823.txt - [detail] - similar
[[20230620143850]] 5957
『複数シートの統合』(マクロって難しい)
よろしくお願いいたします。 個々の営業担当が持っている案 ... hCount As Long With CreateObject("WScript.Shell") .CurrentDirectory = "C:¥Users¥Desktop¥営業案件管理¥" 'ここで読み込む ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/202306/20230620143850.txt - [detail] - similar
PREV 1 2 3 4 5 6 NEXT
Powered by Hyper Estraier 1.4.13, with 97047 documents and 608232 words.

訪問者:カウンタValid HTML 4.01 Transitional