No.1
- 回答日時:
色々と面倒です。
社内で使用するのでしょうか?
VBAコード中に平文でユーザー名とパスワードを記述するのはまずいのでは?と。
仮にVBAProjectを保護し内容を隠したとしても
こじ開けるツールが巷に出回っています。
上司の許可は得られるのでしょうか?
問題ないと仮定して…
'接続
Sub Net_Add()
Dim WshNetwork As Object
Const 共有名 = "\\パソコン名\共有名"
Const パスワード = "himitsu"
Const ユーザー名 = "ore"
Set WshNetwork = CreateObject("Wscript.Network")
On Error Resume Next
WshNetwork.MapNetworkDrive "N:", 共有名, , ユーザー名, パスワード
On Error GoTo 0
Set WshNetwork = Nothing
End Sub
'切断
Sub Net_Del()
Dim WshNetwork As Object
Set WshNetwork = CreateObject("Wscript.Network")
On Error Resume Next
WshNetwork.RemoveNetworkDrive "N:"
On Error GoTo 0
Set WshNetwork = Nothing
End Sub
但し、
>マクロを使用時のみの接続
は難しいです。分かりませんでした。
上記Net_Del でネットワークドライブを削除しても
エクスプローラなどで共有フォルダを開いていたり等々すると
共有フォルダへの接続は維持されたままになります。
別件で共有フォルダへ接続していた場合に強制的に切断されては困るので
仕方のない事かと思います。
コマンドプロンプトの、Net Use でも同様な結果でしたね。
以上、ご参考まで。
私からは以上です。
ご回答、ありがとうございます。
返答が遅くなり申し訳ありません。
ご指摘の通り、使用は会社でを想定しておりました。
VBAコード中にユーザー名とパスワードを記述する事に何も思っておりませんでしたが、
確かに相談すべき内容である事を認識させて頂きました。
ありがとうございます。
さて本題ですが、『MapNetworkDrive "N:"』とありますが、ネットワークドライブではなく、
単にホルダーが共有されているだけですが、これでできるのでしょうか?
実際にやってみれば良いのですが、他が忙しく、まだ手を付けていない状態です。
ご教授頂けると幸いです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Wi-Fi・無線LAN PCWi-Fiの設定方法がわからなくて困っています。 4 2022/12/28 18:30
- その他(OS) Windows11のファイル共有 1 2022/12/08 10:42
- サーバー ネットワークの構成に困っています 3 2023/07/05 11:55
- ルーター・ネットワーク機器 AU光10G回線について 6 2022/07/25 00:12
- UNIX・Linux raspberry piを使ったWebサーバー制作をしています、接続するネットワークを変更したときに 1 2023/01/09 15:57
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/03/07 14:05
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/02/07 09:58
- ネットワーク ネットワーク資格情報について 2 2022/08/05 12:50
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- セキュリティホール・脆弱性 テレワークで会社支給パソコン以外でVPN接続を制限するやり方 教えて下さい 3 2022/08/31 12:40
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
【Excel VBA】ネットワーク上の共有フォルダにあるExcelを開く
Excel(エクセル)
-
VBAでサーバーにアクセスするにはどうすればいいの?
Access(アクセス)
-
VBAでネットワークコンピュータのファイルにアクセスできない(XL2000)
Access(アクセス)
-
-
4
共有フォルダにアクセスする際のパスワード入力を自動化したい
Mac OS
-
5
VBAでサーバー上のファイルを開く
Excel(エクセル)
-
6
会社のネットワーク上のファイルを開けない こんにちわ 今大変困ってます 会社のネットワーク上のファイ
Visual Basic(VBA)
-
7
VBA ネットワーク上のファイルでカレントフォルダを取得するには?
Visual Basic(VBA)
-
8
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
9
Excel VBAでのWorksheet_Changeが動作しない原因
Excel(エクセル)
-
10
エクセル(VBA)でWindowsのサインイン情報(パスワード)と照合可能か
Windows 10
-
11
VBAでネットワーク上のバッチジョブを実行したい
その他(プログラミング・Web制作)
-
12
net useのユーザー名を変数で通したい
Access(アクセス)
-
13
Excelで指定したフォルダに保存するマクロ
Excel(エクセル)
-
14
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
15
Vba Userformを前面に出すについて
Access(アクセス)
-
16
VBAでインターネットに接続しているかの確認
Visual Basic(VBA)
-
17
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
18
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
19
VBA ファイルを開くダイアログでの初期表示にファイルサーバーを指定
Excel(エクセル)
-
20
ExcelVBAで、隠しフォルダにあるファイルに書き込みする方法
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ビーリアルのユーザー名を変え...
-
メールエラー
-
yahoo! Japan IDの新規取得がで...
-
インスタのアイコンについてるN...
-
Excelのセルにユーザー名...
-
steam版 apexのログアウト方法...
-
インスタで新しいアカウントを...
-
LINE TCBというところからLINE...
-
URLとメールアドレス
-
メールアドレスで上付きのハイフン
-
メールをパスワードつきで送る方法
-
Netflixのパスワード変更につい...
-
インスタの捨て垢で友達のスト...
-
携帯電話を解約してもSMSの受信...
-
「@」(アットマーク)の無いメ...
-
スタディプラスではアカウント...
-
メールアドレスから個人を特定...
-
インスタでブロックされたので...
-
iPhoneのiCloudメールなよです...
-
LINE Payで友だちに送金しよう...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ビーリアルのユーザー名を変え...
-
Excelのセルにユーザー名...
-
steam版 apexのログアウト方法...
-
メールアドレス 上バーの入力...
-
Netflixのパスワード変更につい...
-
メールアドレスで上付きのハイフン
-
メールのマナー編
-
メールをパスワードつきで送る方法
-
メールアドレスから個人を特定...
-
メールを返信したら、英語のメ...
-
楽天カードからのワンタイムパ...
-
携帯電話を解約してもSMSの受信...
-
CSVファイルを添付するときにパ...
-
インスタの捨て垢で友達のスト...
-
解約済みの iPadについて 解約...
-
URLとメールアドレス
-
YahooIDをパスワード形式にした...
-
大学定期試験過去問サイト「過...
-
「@」(アットマーク)の無いメ...
-
メールエラー
おすすめ情報