[XL] ネットワークドライブに接続する方法

詳細

VBA ではネットワーク ドライブに接続するための機能が用意されていませんので、Microsoft(R) Windows(TM) (以下 Windows) が標準で提供している API (Application Programming Interface) の関数 WnetAddConnection を使用します。
なお、Windows API についての詳細は Windows API のヘルプ (Microsoft(R) Windows(TM) Software Development Kit、Microsoft(R) Visual C++(TM) for Windows(TM) などに添付) を参照してください。

サンプル

次のサンプル モジュールでは、以下のネットワーク資源を "X:" ドライブに接続しています。

    サーバー名 ： ServerName
    シェア名   ： ShareName
    パスワード ： なし
  Declare Function WnetAddConnection% Lib "USER" (ByVal lpszNetPath As Any, _
      ByVal lpszPassword As Any, ByVal lpszLocalName As Any)
  Sub NetConnectSample()
      Dim x as Integer
      x = WnetAddConnection("\\ServerName\ShareName", "", "X:")
  End Sub

注意

上記のサンプル モジュールは Microsoft Windows NT Version 3.1 および Microsoft LanManager Version 2.1 での動作確認のみ行っています。ご了承ください。