- ベストアンサー
VBScriptでのSaveAsについて
nicotinismの回答
間に合うかな？ 私はVBSで作る場合には その元となるWordやExcel、OutLookで下ごしらえします この際に各アプリケーションのVBAの定数 例、OutlookならVBEのイミディエイトウィンドウで ?olDoc でその値を調べています。 これをVBSではめ込んでいるのですが、後で見たときに マジックナンバーでは分からなくなるので Const olDoc as long = 4 'でしたっけ？ としています。 定数の一覧は無いのでは？ 説明も無いと意味不明ですしね。
関連するQ&A
- SaveAsメソッドについて
いつもお世話になっております。 Accessから抽出したデータをVBAを使って、Excelファイル として保存しています。 ExWorkSheet.SaveAs "ファイルパス" として保存しているのですが、上書き確認のダイアログ が表示されたときに、「いいえ」を押すと 「SaveAsメソッドは失敗しました」とエラーがでて しまいます。 エラー処理の書き方を調べているのですが、 よくわかりません。 ご存知のかた、どうかよろしくお願いいたします。
- ベストアンサー
- その他(データベース)
- VBScriptで
サーバ・クライアントの運用管理をすることになりました。 そこでVBScript(WMI含む)を学習し、運用の効率を上げたいと思います。 現在、以下のようなスクリプトを作成しました。 ・ある端末10数台のOSとSPを調べるもの ・指定したファイルを、指定の端末から探すスクリプト そこで ・このVBScriptは用意しておくと良い。 ・こんなことを注文されたので、VBScriptを作成し作業を行った という事例や経験がありましたらご教授のほうよろしくお願いします。 ただ、VBScript(WMI)を使用しているものに限定させていただきたいと思います。
- 締切済み
- Windows系OS
- VBAのSAVEASメソッド
こんにちわ。 ACCESS2000のVBAでEXCEL2000ファイルを操作していますが， ファイルを上書きする「.SaveAsメソッド」を実行したとき， 「ファイルを上書きしますか?-はい/いいえ/キャンセル」という ダイアログが表示されます。 このダイアログを表示せずに強制的に上書き保存したいのですが， どのようにすればよいでしょうか？ 教えてください。お願いします。
- ベストアンサー
- その他([技術者向] コンピューター)
- VBScript フォルダ以下からファイルの検索、コピー
VBScriptはまったくの初心者ですので、自分なりに調べてはみたのです がどうしてもわからなかったため質問しています。 OSはWinXPになります。 VBScriptで特定のフォルダ(C:\AAA\)以下からファイル(*.txt)を検索し てコピーするプログラムを書きたいです。 C:\AAA\・・・\*.txt 指定したフォルダからファイルを検索をすることはできたのですが、サ ブフォルダがたくさんある場合のファイル検索ができませんでした。 コピーの仕方は検索したファイルから最新のタイムスタンプのファイル以外を別フォルダにコピーしたいです。 あとわかりやすいVBScriptについて記載されているサイトも教えていただけると助かります。
- ベストアンサー
- その他（プログラミング・開発）
- アクセス VBA ファイル操作
ノートパッドなどテキストエディタで開くことができる、拡張子がtxtではないファイルがあります。 そのファイルをテキストエディタで開いて、名前を変えて、テキストファイルとして保存したいのです が、どのようなコードになりますでしょうか？ 下記で開くのですが、 Shell "NOTEPAD C:\test\sampl\abc.ini" その後、 SaveAs FileName:="C:\test\temp\xyz.txt", のように処理しようと思ったのですが、上手くいきません。 お手数ですがご教示ください。
- ベストアンサー
- オフィス系ソフト
- VBAでSaveAs使用し、指定していないのにデスクトップに保存される理由
VBAで構文中に ActiveWorkbook.SaveAs FileFormat:=xlCSV, _ CreateBackup:=False という記述をしました。すると、保存場所を指定していないのにデスクトップに保存されてしまいます。まず、なぜでしょうか？また、保存場所の指定はどのようにすればよいでしょうか？
- ベストアンサー
- オフィス系ソフト
- VBScriptで入力
VBScriptでダブルクリックした際に引数としてGUIでファイルパスを指定して 渡したいのですが、InputBoxでは1つしか渡せません。 複数パスをGUIで入力して渡すにはどうすればよいのでしょうか？ またそのとき参照ボタンを押下してフルパスをテキストボックスに 入力させるにはどうすればよいのでしょうか？ 簡単なサンプルソースを記述していただけると助かります。
- ベストアンサー
- Visual Basic
- VBScript フォント名出力
仕事で預かったフォントが、Ｄドライブの「Fonts」フォルダにあります。 このフォントのファイル名一覧は、VBScriptで簡単に作れました（テキストファイルに出力）。 しかし、ファイル名では、どんなフォントか分からないので、「フォント名」（「ＭＳ 明朝」など）も同時に出力したいのですが、フォント名の取得の仕方が分かりません。 VBScriptで、「フォント名」を取得する具体的な方法、または、書かれているサイトをご存じの方がおられましたら、お教えください。 それなりにサイトを調べたつもりなのですが、分かりませんでした。 よろしくお願いします。
- ベストアンサー
- その他(ソフトウェア)
- Excel マクロのsaveasでファイル保存の方法で教えて下さい
Excel2003で、USBメモリ上の2つのファイル（マクロを保存したmacro.xls及び作業を行うsagyo.xls）を開き、マクロをかけて、最後にxlsファイル形式で上書き保存したいのですが、 （1）ActiveWorkbook.Save で、上書き保存を行うと、なぜかUSBメモリ上にhtmlファイル保存されてしまいます。このため、xlsファイル形式保存をあえて明示し、saveasの既定値であるxlWorkbookNormalを指定し、 （2）ActiveWorkbook.SaveAs , FileFormat:=xlWorkbookNormal とすると、（カレントフォルダである）マイドキュメントに保存されてしまいます。 Q1.（1）のようになる原因は何でしょうか？ Q2.USBメモリは、他のPC環境でも使うので、「saveas "F:\sagyo.xls"」などとドライブ指定せずに使いたいのですが、USBメモリ上に上書き保存するマクロの書き方はないでしょうか？
- 締切済み
- オフィス系ソフト
- VBScript IF文の質問
あるフォルダ中のファイルを削除する、VBScriptを作成しています。使用上、フォルダ内には、数十種類の拡張子を持つファイルが存在します。 "GetExtensionName"を使用して削除対象のファイルを拡張子を限定しています。(例えば.txtや.logです) 対象としている拡張子のファイルの中に、さらに除外する必要のあるファイルが、3種類ほど、あります。(例えば、ファイル名にabcやxyzの文字列を含む.txtファイル) IF文を使って、色々と試しているのですがどうしてもうまく行きません。 どなたかご存知の方いたら、教えてください。 宜しくお願いします。 OSは、WindowsServer2003です。
- 締切済み
- その他([技術者向] コンピューター)
お礼
ありがとうございます。 結局、そういうことなのですね。 やりたいことがあれば、逐一、調べなければならない、ということなのですね。 きっと、プログラムを組む方もそうしておられるのでしょうね。 なお、「VBScript」では、すべてバリアント（Variant）型のため、「As Long」のようにタイプを設定することはできませんので、単純に、 Const olDoc = 4 となりますし、大変失礼とは思いますが、「Long-2147483648～2147483647）」で間違いではないでしょうけど、せめて「Integer（-32768～32767）」だと思いますし、「Byte（0～255）」でも良いのではないでしょうか？ 単にメモリをくうだけでなく、何となくですが、何か不都合が起こりそうな気がしてしまいます。 なにはともあれ、ありがとうございました。 大変、参考になりました。