• 締切済み

Webサバーに有るExcelのマクロが動かない

Webサーバに有るExcelファイルを、htmlのリンクから開いて、マクロを実行すると、csvファイルの読込で下記のエラーに成ります 「実行時エラー'1004' 'open'メゾットは失敗しました'Workbooks'オブジェクト'」です。 リンクで開かないで、直接開いて実行すると問題なく動きます。 どうしたら良いのか力を貸してください。

みんなの回答

  • FEX2053
  • ベストアンサー率37% (7987/21355)
回答No.1

Workbook.Open命令で参照しているファイルのパスが違う。 Webから開く場合は、デフォルトフォルダが直接開く場合と違う点に注意。

h_narunaru
質問者

補足

早速の回答ありがとうございます。 マクロの記述は Workbooks.Open Filename:="\\サーバ名\フォルダ名\CSVファイル名にして有ります どこを変更したら良いのか教えていただけますでしょうか? よろしくお願いいたします。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • エクセルのマクロについて

    エクセルのマクロについてご教示ください。 共有サーバにあるパスワードで保護されたブックを、別のブックの シートからマクロボタンで開くと、当然にパスワードを要求されま すが、ここでメッセージボックスのキャンセルボタンを押すと、 Openメソッドは失敗しました。Workbooksオブジェクトという実行時 エラーが表示されます。  このエラー表示を回避できる方法をご教示ください。  If文で処理しようと試みましたがだめでした。  よろしくお願いいたします。 

  • Excelマクロで同じブックにCSVを読み込むには

    Excelの指定したシートにCSVファイルを読み込ませたいのですが 以下のVBAマクロを実行すると新しいブックが起動して 新しいブックの方にCSVファイルが読み込まれてしまうのですが これをVBAマクロを実行しているブックの指定のシート(例えばSheet3など)に 読み込ませたいのですがどのように記述すればよいのでしょうか。 よろしくお願いします(Excel2010) Sub Macro1()  ChDir "C:\test"  Workbooks.Open Filename:= "test1.csv" End Sub

  • どの名前のcsvでも、マクロで取り込めるようにしたい。

    Excel2000のVBAで作成しております。 csvファイルからデータを取り込み、セットするマクロを作りたいのですが、 マクロファイルオープン時に選択するcsvファイルを、 その後のデータ抽出作業工程で対象にする時には、 どのように書けば良いのでしょうか? Workbooks("*.csv").Activateと書いてもエラーになってしまいました。 例えば Workbooks("オケーウェブ.csv").Activateと書けば オケーウェブ.csvをActivateに出来ることは分かったのですが、 その時によって、 オケーウェブ.csv ABC.csv 報告書.csvなどと、選択するcsvファイル名が異なります。 マクロファイルオープン時の一番最初に選択したcsvファイルをActivateにするには、 どのように書けば良いのでしょうか? どなたかご教授をお願いいたします。

  • ExcelマクロでCSVを開くと勝手に変更される項目があります

    ExcelマクロでCSVを開くと勝手に変更される項目があります Excel2003のマクロでの質問なのですが。 AAAというCSV形式のファイルに「3-90」という項目があります。 Excelから、ファイル - 開く - AAA.CSV で呼び出したときはセルに「3-90」と表示されます。 ところがマクロから Workbooks.Open Filename:="C:\Book1.csv" を実行して開くと「3-90」が「Mar-90」と表示され、セルの内容も「1990/3/1」と勝手に変換されて しまいます。 解決策ありましたら、教えてください。 できたら原因もお願いします。 よろしくお願いします。

  • OutlookからExcelをひらく

    いつもお世話になっております。 OutlookのマクロからExcelファイル(ファイル名="sample")を開くために以下のようなマクロを組みましが、 "実行時エラー'424'; オブジェクトが必要です。" というメッセージが出てエラーになってしまいます。 Workbooks.Open FileName:="C:\Documents and Settings\My Documents\sample.xls" ヘルプを見たのですがよくわかりませんでした。 Outlookのマクロを実行してExcelファイルを開くにはどのようにすればよいのでしょうか。 よろしくお願いします。

  • ワードのマクロからエクセルシートを開きデータを読み込む

    ワードマクロからエクセルシートのデータを読み込みたいのですが、マクロを実行すると「コンパイルエラー:変数が定義されていません。」というエラーが出てしまいます。変数xlUpで引っかかってるようなんですが、どのように定義すればよいですか? コードは以下です。 Dim Workbooks As Object Dim ecell As Integer Workbooks.Open FileName:="namesheet.xls" ecell = Workbooks("namesheet.xls").Worksheets(1).Range("B100").End(xlUp).Row よろしくお願いいたします。

  • エクセルVBA

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

  • エクセル2007 マクロ CSVにコピー後日付がおかしくなった

    エクセル2007を使用しています CSVファイルを開き日付をコピーするマクロを作成しております ■問題 エクセル上2011/2/11という文字が、11/2/2011とCSVファイル上表示されてしまいます。 以下の対策をとってはいるのですがうまくいきません Workbooks.Open Filename:= _ "\\\\\\\\\\\\\.csv", Local:=False 他に対策はないでしょうか?

  • Excelでファイルを開くをマクロで行いたい

    マクロ初心者です "ファイルを開く"をマクロの記録で記録させると ChDir "C:\Documents and Settings\○○\△△\※※" Workbooks.Open Filename:= _ "C:\Documents and Settings\○○\△△\※※¥LotLog20070131.csv" Windows("●●●.xls").Activate End Sub と記録されます この中で 開きたいファイルネ-ム(上記ならばLotLog20070131.csv)を "●●●.xls"の どこかのセルを参照に開きたいのですが どうすれば宜しいのでしょうか?

  • エクセルのマクロでファイルを自動で保存するには?

    こんにちは。お世話になります。 エクセルのVBAマクロ文の書き方でお知恵を拝借したいと思います。 さて、私のかかる業務でエクセルファイルで営業実績を出しています。 COBOLで作ったファイルをCSVにインポートして そのCSVの値を別のエクセルファイルで引っ張るという手順を踏んでいますが、 それをマクロで動かすとエクセル上で『保存しますか?』と聞いてきます。 答えは『はい(Y)』で確定しているので、その命令文さえ組み込められればいいのですが、 その命令文の書き方が判りません。 (解決したいVBAマクロの命令文) Workbooks.Open Filename:="D:\(Aファイル).csv" Workbooks.Open Filename:="D:\(Aファイルの値を引っ張るBファイル).xls" ThisWorkbook.Saved = True (ここで聞いてくる注意に自動で『Y』を入れたいと思っています。) ActiveWindow.Close ActiveWindow.Close 以上、お知恵を拝借したく、お願いいたします。