• ベストアンサー

EXCEL VBAからイントラネットにログイン

end-uの回答

  • ベストアンサー
  • end-u
  • ベストアンサー率79% (496/625)
回答No.1

例えば、コマンドプロンプトの net use を使う例。 Shell "net use \\server名\共有名 /user:ユーザー名 パスワード", vbHide や CreateObject("WScript.Shell").Run "net use \\server名\共有名 /user:ユーザー名 パスワード", 0, True http://www.atmarkit.co.jp/fwin2k/win2ktips/394ipcshare/ipcshare.html WScript.Network でネットワークドライブを割り当ててもいいかと思います。 CreateObject("WScript.Network").MapNetworkDrive "x:", "\\server名\共有名", False, "ユーザー名", "パスワード"

JujuMay
質問者

お礼

技術不足の為、お答え頂いたこと全てを理解することはできませんでしたが、こちらを参考に望みどおりの動作を行うことができました。 ありがとうございます。

関連するQ&A

  • VBA ある位置にある全てのxlsに対してマクロ実行

    あるフォルダ内の全てのxlsファイルに対して命令を実行するマクロを作成しています。 命令したいファイル群の、ブック名はバラバラ。シートは一つのみ。ファイル数は定まっていません。 ブック名や数が定まっているファイルに対して命令を実行するマクロなら作成したことがあるのですが、今回のようにあればある分だけ、命令を実行させるにはどのように記述すればいいのでしょうか? どうかよろしくお願いします。

  • VBAで書き込みパスワードを解除して開く

    VBAでの作成経験が浅くわからないので、教えてください。 Excel2010のVBAを作成しております。 VBAで”ファイルを開く”ダイアログを表示し、ユーザが指定したファイルのパスワードの保護をマクロの中で解除してファイルを開きたいと思い作成しました。 myMB = Application.Dialogs(xlDialogOpen).Show(arg6:=myPassword) If myMB = False Then Exit Sub End If   ※myPasswordはユーザが開くファイルに使用するパスワード この方法ですと、パスワードを入れるダイアログが表示されてしまいます。 どうしたら、パスワードをユーザが入力することなく、マクロを実行することが できるのでしょうか?

  • エクセルのVBAについて

    エクセルのVBAについて教えて下さい。 エクセルのVBAでプログラムを組んでいるのですが、一つわからないことがあるのです。 マクロが実行(オープン)されるファイル名(ファイルパス)をVBAで取得するためにはどうすればいいでしょうか? たとえば、マクロが実行されるファイルがC:\テスト.xlsならば "C:\テスト.xls"を取得したいと考えています。 どなたかご教授お願い致します。 宜しくお願い致します。

  • Excel VBAに関する質問

    すいませんがどなたか教えていただきたいのですが。 Excel VBAでグラフの作成と消去をおこなうマクロを作成して、それをWeb上で実行できるようにしたいのですがWeb上でグラフ削除が実行できません。 記述は ActiveSheet.ChartObjects(1).Select ActiveSheet.ChartObjects(1).Delete としています。 普通にエクセルファイルを開いて実行すると問題なく動作します。 これを回避する方法を教えてください。

  • エクセルVBAのサイズについて

    エクセルファイル上にてVBAを記述したところ、 VBAのサイズが64Kを超えるようで、該当のVBAを保存する事ができません。 ただ、一時的に細かく作成したのですが、当初考えていたのは、1回コマンドボタンを押すと処理が完了するように想定していたのですが、現状のままでは、複数のコマンドボタンをそれぞれ押さないとできないと思われます。ちょっとその方法ですと面倒なので、ご質問です。 (当初は、マクロ1を作成したのですが、大きさの問題が生じたため、現状は便宜的にマクロ2・マクロ3という風に当初のマクロ1をわけて保存してあります) 1回の処理で同時に複数のマクロを実行する方法はあるのでしょうか? もしそのような方法があれば教えてください。 わかりづらい質問かもしれませんが宜しくお願いいたします。

  • エクセルVBA

    こんばんは! エクセルマクロ初心者です。 エクセルVBAについて教えてください! パス(?)を指定して、ファイルを開けてから実行する マクロを書きたいのですが、エラーになってしまいます。 Dim Filename as string (1)Workbooks.Open Filename:= "\D\MyDocument\●●.xls" (●●はファイル名) (2)Workbooks("●●").Activate (1)の部分は実行されて目的のファイルは開くのですが(2)でエラーになってしまいます。 どなたか教えてください! 以前までは、このマクロ実行できていたのですが、突然できなくなりました。 困ってます。

  • ユーザログインでエクセルのVBAのモジュール実行できない

    こんにちは windows XP proを使用しています。 アドミニ権限でoffice2007をインストールし、アドミニ権限でエクセルのマクロを実行すると問題なく処理されるのですが、ユーザ(制限ユーザ)ログインをして同じ エクセルのファイル(マクロ付き)を起動すると「モジュールがありません」とメッセージが表示されて、シートだけ状態となってしまいます。  ただ、ユーザ(制限ユーザ)ログインでエクセル上でマクロを作成すれば実行できますが、これを保存して再度開くと「モジュールがありません」となってしまいます。 ユーザ(制限ユーザ)ログインでマクロ実行したいので解決策があれば教えてください。よろしくお願いします。

  • VBAのユーザーフォームについて

    VBAの全くの素人です。 ユーザーフォームについていくつか質問させてください。 テキストボックスにファイル名を入力し、実行釦を押す事で、IEを立ち上げ、画像ファイルを開くマクロを組んだ場合、 (1)「クリア」というコマンド釦を作り、その釦を押した際にテキストボックスに入力した値を消す為には、そのコードにはどのように記述すればよいでしょうか? (2)さらにその「クリア」釦を押す事により立ち上げたIEを閉じる事はできないでしょうか? (3)このマクロを組んだExelファイルを立ち上げた時点で、マクロを実行し、「終了釦」を作り、その釦により、Exelごと終了させるにはどうすれば良いでしょうか? 以上、素人の質問で恐縮ですがご教示ください。 よろしくお願いします。

  • Excel VBAでファイルを開くとマクロを実行させるにはどのように記

    Excel VBAでファイルを開くとマクロを実行させるにはどのように記述すればいいのでしょうか? 例えば、ファイルを開くと指定のセルの削除させるような。 よろしくお願いします。

  • エクセルVBAでの呼出操作をマクロ化するには?

    エクセルVBAでの呼出操作をマクロ化するには? エクセル2000です。宜しくお願いします。 VBAで、ファイルを呼び出したいのですが、Workbooks.openの書き方が良く分かりません。 呼び出すファイル名は決まっていなくて、フォルダ名は固定です。 エクセルの操作で言うと、ファイルを開くを押して、フォルダを選ぶとこまでをマクロかしたいのですが。 例えば、ドライブDの「作業用」フォルダを開きたい場合は、どう記述すれば宜しいでしょうか? 基礎的な部分でお恥ずかしいのですが、以下で実行しても動かんのです。 ChDir "D:\作業用" Workbooks.OpenText Filename:= "D:\作業用\*.*"