Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10342 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【22314】保存場所を指定するのはどうすればよろしいでしょうか？ zakky 05/2/15(火) 22:13 質問[未読]
【22317】Re:保存場所を指定するのはどうすればよ... ponpon 05/2/15(火) 23:17 回答[未読]
【22318】Re:保存場所を指定するのはどうすればよ... かみちゃん 05/2/15(火) 23:29 発言[未読]
【22342】Re:保存場所を指定するのはどうすればよ... zakky 05/2/16(水) 18:48 お礼[未読]
【22347】Re:保存場所を指定するのはどうすればよ... ponpon 05/2/16(水) 20:55 発言[未読]
【22350】Re:保存場所を指定するのはどうすればよ... zakky 05/2/16(水) 21:23 お礼[未読]
【22351】Re:保存場所を指定するのはどうすればよ... ponpon 05/2/16(水) 21:29 回答[未読]
【22352】Re:保存場所を指定するのはどうすればよ... zakky 05/2/16(水) 21:59 お礼[未読]
【22353】Re:保存場所を指定するのはどうすればよ... ponpon 05/2/16(水) 22:04 発言[未読]
【22354】Re:保存場所を指定するのはどうすればよ... zakky 05/2/16(水) 22:24 お礼[未読]
【22356】Re:保存場所を指定するのはどうすればよ... ponpon 05/2/16(水) 22:40 発言[未読]
【22357】Re:保存場所を指定するのはどうすればよ... zakky 05/2/16(水) 22:46 お礼[未読]
【22380】Re:保存場所を指定するのはどうすればよ... かみちゃん 05/2/17(木) 12:42 回答[未読]
【22387】Re:保存場所を指定するのはどうすればよ... sa 05/2/17(木) 17:24 発言[未読]
【22396】Re:保存場所を指定するのはどうすればよ... zakky 05/2/17(木) 21:53 お礼[未読]
【22314】保存場所を指定するのはどうすればよろし...
質問  zakky  - 05/2/15(火) 22:13 -
引用なし
パスワード
   ActiveWorkbook.SaveAs Filename:="" & A & "_" & B & ""
ActiveWorkbook.Close

と、A_B.xlsのように名前をつけて、現在開いているファイルを保存したいのですが、保存する場所を指定するということはできるのでしょうか？
今開いているファイルと同じフォルダ内に保存したいのですが、社内LANを介して
マクロを走らせるとちゃんと保存されません。

どなたか教えていただけないでしょうか？
【22317】Re:保存場所を指定するのはどうすればよ...
回答  ponpon  - 05/2/15(火) 23:17 -
引用なし
パスワード
   ▼zakky さん：

ponponです。
>今開いているファイルと同じフォルダ内に
ならば、
AやBが変数ならば
ActiveWorkbook.SaveAs Filename:=A & "-" & B

本当にファイル名が「A-B」ならば、
ActiveWorkbook.SaveAs Filename:="A-B"
ではないでしょうか？
【22318】Re:保存場所を指定するのはどうすればよ...
発言  かみちゃん  - 05/2/15(火) 23:29 -
引用なし
パスワード
   ponpon さん、zakky さん、こんにちは。かみちゃん　です。

>>今開いているファイルと同じフォルダ内に
>ならば、
>AやBが変数ならば
>ActiveWorkbook.SaveAs Filename:=A & "-" & B

これでは、カレントフォルダになります。
カレントフォルダと今開いているファイルのフォルダは必ずしも一緒ではありません。
今開いているファイルのフォルダ名については、以下の過去ログを参考にしてみてください。
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=22124;id=excel

ただし、

> 今開いているファイルと同じフォルダ内に保存したいのですが、社内LANを介して
> マクロを走らせるとちゃんと保存されません。

ということなのですが、ただいまLAN環境が手元にないので、検証ができないです。
【22342】Re:保存場所を指定するのはどうすればよ...
お礼  zakky  - 05/2/16(水) 18:48 -
引用なし
パスワード
   ponpon さん　かみちゃん　さん
ご返信ありがとうございます。
参考にさせて頂き、pathを指定して試してみました。
普通には上手く機能するようになったのですが
しかしLANを介すとファイルが保存されてなく上手く機能しません。
試行錯誤してみます・・・。何か原因と考えられそうなことをご存知でしたら
アドバイスいただければと思います。
【22347】Re:保存場所を指定するのはどうすればよ...
発言  ponpon  - 05/2/16(水) 20:55 -
引用なし
パスワード
   ▼zakky さん：
>ponpon さん　かみちゃん　さん
>ご返信ありがとうございます。
>参考にさせて頂き、pathを指定して試してみました。
>普通には上手く機能するようになったのですが
>しかしLANを介すとファイルが保存されてなく上手く機能しません。
>試行錯誤してみます・・・。何か原因と考えられそうなことをご存知でしたら
>アドバイスいただければと思います。

ponponです。こんばんは。
かみちゃんさんいつもフォローすみません。
カレントフォルダーと今開いているファイルのフォルダーの区別もつかなくて申し訳ありません。

↓これでラン環境でも保存されましたが、こういうことではないのかな？
A = 123
B = 456

ActiveWorkbook.SaveAs Filename:="\\hd-lan611\share\VBA\" & A & "_" & B
ActiveWorkbook.Close
【22350】Re:保存場所を指定するのはどうすればよ...
お礼  zakky  - 05/2/16(水) 21:23 -
引用なし
パスワード
   ponpon　さん
ありがとうございます。

A = 123
B = 456

ActiveWorkbook.SaveAs Filename:="\\hd-lan611\share\VBA\" & A & "_" & B
ActiveWorkbook.Close

についてですが、lan611　の611には何を入力すればよろしいのでしょうか？
そのまま611でよろしいのでしょうか？
A＝
B＝
というのは定義したものでよろしいのですか？
すみません、、、素人なのもので申し訳ありませんがアドバイスいただければと
思います
【22351】Re:保存場所を指定するのはどうすればよ...
回答  ponpon  - 05/2/16(水) 21:29 -
引用なし
パスワード
   ▼zakky さん：
>ponpon　さん
>ありがとうございます。
>
>A = 123
>B = 456
>
>ActiveWorkbook.SaveAs Filename:="\\hd-lan611\share\VBA\" & A & "_" & B
>ActiveWorkbook.Close
>
>についてですが、lan611　の611には何を入力すればよろしいのでしょうか？
>そのまま611でよろしいのでしょうか？

hd-lan611は、ラン上のコンピューター名になります。

>A＝
>B＝
>というのは定義したものでよろしいのですか？
は、変数です。zakky さんが、定義しているものでよいと思います。

>すみません、、、素人なのもので申し訳ありませんがアドバイスいただければと
>思います
私も初心者で、これくらいしかわかりません。すみません。
【22352】Re:保存場所を指定するのはどうすればよ...
お礼  zakky  - 05/2/16(水) 21:59 -
引用なし
パスワード
   ponpon さん
ありがとうございます。
試してみたいと思います。
ラン上のコンピューター名はマイコンで調べればわかるのでしょうか？
【22353】Re:保存場所を指定するのはどうすればよ...
発言  ponpon  - 05/2/16(水) 22:04 -
引用なし
パスワード
   ▼zakky さん：
ponpon です。
>ありがとうございます。
>試してみたいと思います。
>ラン上のコンピューター名はマイコンで調べればわかるのでしょうか？

マイコンではなく、マイネットワークです。
【22354】Re:保存場所を指定するのはどうすればよ...
お礼  zakky  - 05/2/16(水) 22:24 -
引用なし
パスワード
   ponpon さん
すみません、ありがとうございます
【22356】Re:保存場所を指定するのはどうすればよ...
発言  ponpon  - 05/2/16(水) 22:40 -
引用なし
パスワード
   ▼zakky さん：
ponpon です。
>すみません、ありがとうございます
>今開いているファイルと同じフォルダ内に保存したいのですが
今開いているファイルというのがいまいちわかりませんが、
　　　　　　　　↑
　　　　　　今マクロを書いているworkbookならば、
myPathでworkbookのPathを取得して、

A = 123
B = 456
mypath = ThisWorkbook.Path
ActiveWorkbook.SaveAs Filename:=mypath & "\" & A & "_" & B
ActiveWorkbook.Close
としたらいかがでしょう。
【22357】Re:保存場所を指定するのはどうすればよ...
お礼  zakky  - 05/2/16(水) 22:46 -
引用なし
パスワード
   ponpon さん

ありがとうございます。
試してみたいと思います
【22380】Re:保存場所を指定するのはどうすればよ...
回答  かみちゃん  - 05/2/17(木) 12:42 -
引用なし
パスワード
   こんにちは。かみちゃん　です。

>参考にさせて頂き、pathを指定して試してみました。
>普通には上手く機能するようになったのですが

現在アクティブになっているブックのパスに保存する場合は、以下のとおり記述します。アクティブになっているブックがＬＡＮ上にある場合で動作確認済みです。

A = 123
B = 456

ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.Path & "\" & A & "_" & B

>しかしLANを介すとファイルが保存されてなく上手く機能しません。

どのようなコードを書いていて、どのようにうまくいかないのか（エラーメッセー
ジが出るとか）を教えていただけるともう少しアドバイスできるかもしれません。
【22387】Re:保存場所を指定するのはどうすればよ...
発言  sa  - 05/2/17(木) 17:24 -
引用なし
パスワード
   >>しかしLANを介すとファイルが保存されてなく上手く機能しません。

ネットワークの共有ファルダにうまく接続されてますか？
パスワード通ってますか？


ネットワークの共有ファルダが開くか確認して見てください
【22396】Re:保存場所を指定するのはどうすればよ...
お礼  zakky  - 05/2/17(木) 21:53 -
引用なし
パスワード
   かみちゃん　さん　ponpon　さん
ご返信ありがとうございます。

pathの指定をもう一度きちんと付け直して確認いたしましたら、無事
解決いたしました。。。
ご迷惑おかけ致しました。ありがとうございます！
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10342 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free