
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で質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
【Excel VBA】ネットワーク上の共有フォルダにあるExcelを開く
Excel(エクセル)
-
VBAでサーバーにアクセスするにはどうすればいいの?
Access(アクセス)
-
VBAでネットワークコンピュータのファイルにアクセスできない(XL2000)
Access(アクセス)
-
-
4
共有フォルダにアクセスする際のパスワード入力を自動化したい
Mac OS
-
5
エクセル(VBA)でWindowsのサインイン情報(パスワード)と照合可能か
Windows 10
-
6
VBAでサーバー上のファイルを開く
Excel(エクセル)
-
7
会社のネットワーク上のファイルを開けない こんにちわ 今大変困ってます 会社のネットワーク上のファイ
Visual Basic(VBA)
-
8
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
9
Excelで指定したフォルダに保存するマクロ
Excel(エクセル)
-
10
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
11
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
12
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
13
VBA ネットワーク上のファイルでカレントフォルダを取得するには?
Visual Basic(VBA)
-
14
net useのユーザー名を変数で通したい
Access(アクセス)
-
15
ExcelVBA サーバーの(共有フォルダ)中のファイル移動
Excel(エクセル)
-
16
VBAでインターネットに接続しているかの確認
Visual Basic(VBA)
-
17
Access 最後のレコードに到達するまでループ処理を行う方法
Access(アクセス)
-
18
Access サブフォームでの選択行の取得
その他(データベース)
-
19
《エクセルVBA》「他の人が該当ファイルを使用中の場合」の処理
Excel(エクセル)
-
20
VBA(エクセル)で自動的にボタンをクリックさせるには
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
pixivでロム専・登録したばかり...
-
Steamのアカウントにログインで...
-
インスタの乗っ取り解除につい...
-
カカオで退会せずに、アプリだ...
-
携帯電話を解約してもSMSの受信...
-
YouTubeが毎回ログインしないと...
-
企業の問い合わせフォームに、...
-
ユニクロやGUのシフト管理アプ...
-
「そのメールアドレスはすでに...
-
~@live.jpのメール受信につい...
-
彼氏が携帯のパスワードを急に...
-
メールアドレスを人に教えるの...
-
ログアウトと閉じるとの違い
-
インスタの捨て垢で友達のスト...
-
YahooIDをパスワード形式にした...
-
インターネットカフェでCD書き...
-
LINE TCBというところからLINE...
-
Excelのセルにユーザー名...
-
CSVファイルを添付するときにパ...
-
WPS office のシリアル番号の確...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
不正ログインされました。対応...
-
Excelのセルにユーザー名...
-
CSVファイルを添付するときにパ...
-
インスタの乗っ取り解除につい...
-
Steamのアカウントにログインで...
-
メールを返信したら、英語のメ...
-
verify@twitter.comから、メー...
-
ユニクロやGUのシフト管理アプ...
-
カカオで退会せずに、アプリだ...
-
pixivで新規登録しようと思い、...
-
YouTubeが毎回ログインしないと...
-
「そのメールアドレスはすでに...
-
「@」(アットマーク)の無いメ...
-
runas実行した時にきかれるパス...
-
インスタのアイコンについてるN...
-
携帯電話を解約してもSMSの受信...
-
インスタの捨て垢で友達のスト...
-
Excelを開くと、上画面に「サイ...
-
Twitterの こうしたアク...
-
メールアドレスを人に教えるの...
おすすめ情報