advanced help
per page, with , order by , clip by
Results of 1 - 1 of about 1215 for (Mook) (0.001 sec.)
[[20150212135444]]
#score: 9211
@digest: a68e4476e1d51119f07a88a8b3641353
@id: 67261
@mdate: 2015-02-12T06:39:43Z
@size: 1998
@type: text/plain
#keywords: 一美 (27628), 148313379 (14761), vbaexcel (11037), filterindex (7841), vntfilename (6475), トド (6055), ル(* (5456), 美) (5194), 択" (3754), activeworkbook (3212), filefilter (3040), multiselect (3005), chdir (2997), currentdirectory (2576), イブ (2093), article (1975), 事有 (1468), getopenfilename (1464), ドラ (1375), カレ (1353), ンポ (1289), path (1255), ライ (1217), (一 (1151), カル (1125), dat (1083), ィレ (993), トフ (965), テキ (947), 御座 (932), サー (931), キス (875)
『ActiveWorkbook.Pathを開く』(一美)
下記ファイルがある「ActiveWorkbook.Path」を指定して開くには? 宜しくお願いします。 vntFileName = Application.GetOpenFilename(FileFilter:="テキストファイル(*.txt),*.txt" & _ ",テキストファイル(*.dat),*.dat" _ , FilterIndex:=1 _ , Title:="インポートするログの選択" _ , MultiSelect:=False) < 使用 Excel:Excel2010、使用 OS:Windows7 > ---- こういうお話でしょうか。 http://vbaexcel.seesaa.net/article/148313379.html (Mook) 2015/02/12(木) 14:17 ---- Mookさんお返事有難う御座います。 http://vbaexcel.seesaa.net/article/148313379.html 会社のアクセス制限で見ることが出来ません。 帰ってから見てみます。 (一美) 2015/02/12(木) 14:29 ---- 要点だけ書くと、事前に ChDir ActiveWorkbook.Path しておく、ということです。 (???) 2015/02/12(木) 14:37 ---- 下記にしてみましたが、ドキュメントフォルダが開きます。 ChDir ActiveWorkbook.Pathにカーソルを合わせると、サーバーのパスになっています。合っています。 初心者で申し訳ありません。 ChDir ActiveWorkbook.Path vntFileName = Application.GetOpenFilename(FileFilter:="テキストファイル(*.txt),*.txt" & _ ",テキストファイル(*.dat),*.dat" _ , FilterIndex:=1 _ , Title:="インポートするログの選択" _ , MultiSelect:=False) (一美) 2015/02/12(木) 15:12 ---- ChDir ActiveWorkbook.Path が可能なのはローカルドライブ(自PCのドライブ)あるいはネットワークドライブの設定を行っている場合で、 さらにカレントドライブに変更がない場合。 パスがローカルドライブでカレントドライブの変更がある場合はChDriveも行わなければならない。 またActiveWorkbook.PathがUNC(¥¥サーバ名¥パス名)の可能性もある場合は ChDir ActiveWorkbook.Path ではなく With CreateObject("WScript.Shell") .CurrentDirectory = ActiveWorkbook.Path End With で、カレントディレクトリを変更してみてくれ。 (ねむねむ) 2015/02/12(木) 15:25 ---- ねむねむさんばっちりいきました。 有難う御座いました。 尚、回答いただきました皆様有難う御座いました。 (一美) 2015/02/12(木) 15:39 ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201502/20150212135444.txt - [detail] - similar
PREV NEXT
Powered by Hyper Estraier 1.4.13, with 97054 documents and 608267 words.

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