- 締切済み
htaからExcelファイルを作成する方法
htaからVBScriptを使用して、Excelファイルを作成したいのですが、 Set xls = CreateObject("Excel.Sheet") を実行するとエラーが出てしまいます。 htaからVBScriptを使用して、 Excelファイルを作成する方法はないのでしょうか？
- sealtube
- お礼率0% (0/1)
- その他（プログラミング・開発）
- 回答数1
- ありがとう数0
- みんなの回答 （1）
- 専門家の回答
みんなの回答
- BLUEPIXY
- ベストアンサー率50% (3003/5914)
Set xls = CreateObject("Excel.Application") を使えばいいと思います。
関連するQ&A
- htaファイルの呼び出し
現在業務にて必要となる資料(フォルダやExcel、URL)へのアクセスをhtaファイル(今後A.htaとする)のボタン経由で 行っております。アクセスが必要となる資料の増加に伴い、ボタン経由で別ウィンドウ(別htaファイル=今後B.htaとする)を起動する 仕組みの構築を進めております。 そこでA.htaファイル内でVBScriptでB.htaファイルを起動する仕組みを作りました。しかしながら、ファイルサーバ上に 両htaファイルを配置し、実行したところ、B.htaファイル起動時に実行するかの確認ダイアログが出力されてしまいました。 このダイアログを出力しないようにしたいのですが、良い方法はございますでしょうか。 ※尚、そもそも本構成(hta実行をVBScriptで行っている)に問題がある場合は、ご指摘頂けますと幸いです。 ■A.htaファイル ==================================================================================================================================== Function submado() Set objWShell = CreateObject("WScript.Shell") objWShell.Run "submado.hta" End Function ～～～～～～～～割愛～～～～～～～～ <td><input type="button" class="btn-primary" value="サブウィンドウ" onclick="submado()" style="WIDTH: 200px; HEIGHT: 25px"></td> ====================================================================================================================================
- ベストアンサー
- Visual Basic
- Excelのファイルからシート毎にファイルを作成する方法
複数のシートで構成されているひとつのExcelファイルからシートごとに分割してファイルを作成（保存したいです） 具体的には、 ファイル名 file.xls 含まれているシート Sheet1 Sheet2 Sheet3 このfile.xlsから自動でSheet1.xls Sheet2.xls Sheet3.xlsという ファイルを作成してそれぞれのシートだけを保存する方法があれば教えてください。 標準の機能でなければ、フリーソフトなど別のソフトを使った方法でもかまいません。
- ベストアンサー
- オフィス系ソフト
- htaファイルに渡したパスを取得するには。
vbsファイルを開くと「ファイル選択」ダイアログを表示してテキストファイルを選択するとそのファイルのパス先をhtaファイルのSPANタグに渡して表示するところまで作成する事ができました。このSPANタグに表示したパスをVBScriptで取得する事が解らず、困っています。 どのようにすればhtaファイルに渡したパスをVBScriptで取得する方法をご存知の方がいましたらアドバイスいただけませんでしょうか。 何卒、宜しくお願いします。
- 締切済み
- その他（プログラミング・開発）
- htaファイルからhtaファイルへのリンク
htaファイルから別のhtaファイルにリンクさせたいのですが、セキュリティの関係上、「ファイルの実行か保存か」のダイアログが出てしまいます。そのダイアログなしですぐに画面が切り替わるようにしたいのですが何か良い方法はあるでしょうか。よろしくお願いします。
- ベストアンサー
- ホームページ作成ソフト
- CSVに書き出すVBSとHTA
フォームに入力したテキストをCSVに書き出すプログラムを VBScriptで書いて、HTMLに組み込み、 HTA形式で作成したのですが、 実行時にウイルスチェックソフトのエラーが毎回出ます。 回避する方法は、ありますか？ 初VB作成で、ソフト等もありませんので 的外れな質問だったらすみません。
- ベストアンサー
- Visual Basic
- Accessで空のExcelファイルを出力する方法について
下記を実行した所、C:\excel.xlsのセルA1に「1」と記述されました。 【ソース】 Private Sub コマンド0_Click() Dim objExcel As Object Set objExcel = CreateObject("Excel.Application") objExcel.Workbooks.Open FILENAME:="C:\excel.xls" objExcel.Range("A1") = 1 objExcel.Application.ActiveWorkbook.Save objExcel.Application.Quit End Sub しかし、C:\excel.xlsが存在しない状態で実行すると下記のエラーメッセージが表示されました。 【エラーメッセージ】 実行時エラー '1004' 'C:\excel.xls'が見つかりません。ファイル名およびファイルの保存場所が正しいかどうか確認してください。 上記現象を回避する為には、毎回空のExcelファイルを出力した上でセルに値を書き込めば良いと思いましたが、空のExcelファイルを出力する方法が分かりませんでした。 その為、何かアドバイスをいただける方がいらっしゃいましたら、どうかよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- htaファイルが実行されません
あるPCでhtaファイルを開くと、 ウィンドウはhtaの実行ウィンドウですが、 中身にソースが表示されてしまいます。 たとえば、 test.hta ------- <a>あああ</a> [EOF] ------- の内容のファイルを開くと、htaの実行画面で ------- <a>あああ</a> ------- と表示されます。 他のPCで同一ファイルを開くときちんと意図したものが表示され、この場合でしたら、 -------- あああ -------- と表示されます。 WindowsXP・IE6です。よろしくお願いします。
- 締切済み
- ホームページ作成ソフト
- アクセスからエクセルファイルが開けない
Ｃドライブに、新規 Microsoft Office Excel ワークシート.xlsxと言うファイルを作成しました。 そのうえで、アクセスから ―――――――――――――――――――――――――――――――― Sub できない1() Dim xlsWB As Object Set xlsWB = CreateObject("C:\新規 Microsoft Office Excel ワークシート.xlsx") xlsWB.Application.Run xlsWB.Name Set xlsWB = Nothing End Sub ―――――――――――――――――――――――――――――――― をすると ------------------------ 実行時エラー '1004' マクロ'新規 Microsoft Office Excel ワークシート.xlsxを実行できません。 このブックでマクロが使用できないか、またはすべてのマクロが無効になっている可能性があります。 ------------------------ となります。 なので別の方法で開こうと、 ―――――――――――――――――――――――――――――――― Sub できない2() Dim xlApp As Excel.Application Dim xlBook As Excel.Application Set xlApp = CreateObject("Excel.Application") Set xlBook = xlApp.Workbooks.Open("C:\新規 Microsoft Office Excel ワークシート.xlsx") xlApp.Visible = True Set xlApp = Nothing Set xlBook = Nothing End Sub ―――――――――――――――――――――――――――――――― にしたのですが、 実行時エラー’13’型が一致しません になります。 何がダメなのでしょう？ マクロ付きファイルにしないとダメですか？ もしくはファイル名に空白があるからエラーになるのでしょうか？ そして、なぜ二つのコードのエラー内容がちがうのでしょう？ それと、なぜか上記マクロを実行していると ~$新規 Microsoft Office Excel ワークシート.xlsx と言うファイルが出来上がります。（添付画像参照） でもファイルは開いていません。 この状態で、新規 Microsoft Office Excel ワークシート.xlsx をダブルクリックして開こうとすると、一瞬だけ画面に表れてすぐ消えます。 オフィスのバージョンは2007です。 ご回答よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- HTAのパッチファイル作成
自分のサイトでHTA方式のアプリケーションを配布しているのですが、 バグが見つかったのでアップデートしてもらおうと思い、 新しい圧縮ファイルをダウンロードしてもらいました ですが、そのHTAアプリケーションの中には隠しファイルがあり、 exe方式の圧縮ファイルを展開し、すべて上書きを押しても 隠しファイルだけはアップデートできません HTAアプリケーションを簡単にアップデートできるようにする方法は 無いのでしょうか？
- ベストアンサー
- HTML
- ＡＳＰでExcelファイルを開く場合
ＡＳＰでExcelファイルを開く場合WEBでいろいろ検索すると Set ObjExcel = Server.CreateObject("Excel.Application") ObjExcel.Workbooks.Open"****.xls" で開く方法が記載されていたので ためしているのいですが Set ObjExcel = Server.CreateObject("Excel.Application") でエラーが出てしまいます。 解決する方法はありますでしょうか。 環境：Windows XP,IIS,Office 2003 **************************************************** エラー タイプ Server オブジェクト, ASP 0178 (0x80070005) 許可を確認中に Server.CreateObject の呼び出しに失敗しました。このオブジェクトへのアクセスは拒否されます。 *****************************************************
- ベストアンサー
- Microsoft ASP
