baka の回答履歴

今開いているエクセルのファイルがエクセル95形式なのか97なのか2000なのかを調べる方法はありますか？

先日下記の質問をしましたが、５日以上経っても回答が１件もありませんでした（今はもう削除しました）。 >ワードで印刷するとき、ダイアログボックスを開くと印刷範囲は「すべて」にチェックが入ってますね。 >たまに間違えて不要なページを印刷してしまうのは私だけでしょうか？ >これを、開いたときはいつも「現在のページ」にチェックが入った状態にすることはできますか？ >同様にエクセルも「ページ指定」にすることはできますか？ そこで、質問内容を変えてみます。 上記のことができないのは不便だと思いませんか？ １、不便だと思う。 ２、そんな機能は必要ない。 どちらかを選んでお答えください。なるべく多くの方の回答をお待ちしますが、多数の場合はめいめいにお礼が書けないかもしれませんのでお許しください。 もちろん、方法をご存知の方は教えていただければ幸いです。

今開いているエクセルのファイルがエクセル95形式なのか97なのか2000なのかを調べる方法はありますか？

VBAProjectのプロパティ保護としてパスワードをかけたのだが、2年も前のことでそのパスワードが何だったのかわすれてしまったために、マクロの編集ができなくて困っています。どなたか解除の方法があれば教えていただきたい

Excelの新規作成で，ズームのデフォルト値を100%から任意の倍率に変更することは可能なのでしょうか． よろしくお願いします．

MsgBoxが画面の中央でなく、任意の位置におきたいのですが、InputBoxは位置指定できるのに？ 何かいい方法があれば教えてください。 よろしくお願いいたします。

VBのプログラム中で任意のタイミングでIMEパッドを表示したり消したりしたいのです。 よろしくお願いします。

VBEの標準モジュール（例Ｍｏｄｕｌｅ１）にＶＢＡのプログラムを書き、 実行した時、ワークシート（例Ｗｏｒｋｓｈｅｅｔｓ（”ｓｈｅｅｔ１”）のウインドウを自動的に開くには（前面に持ってくるには）どのようにコーディングすれば良いのでしょうか。今は実行後確認するため、プロジェクトのＳｈｅｅｔ１で右クリックして「オブジェクトの表示」でＳｈｅｅｔ１を出したり、タスクバーをクリックしていますが。まずＳｈｅｅｔ１を前面に出して処理をしたい。Ａｃｔｉｖａｔｅ，Ｓｅｌｅｃｔ、Ｓｈｏｗなど試しても効果がありません。

VBEの標準モジュール（例Ｍｏｄｕｌｅ１）にＶＢＡのプログラムを書き、 実行した時、ワークシート（例Ｗｏｒｋｓｈｅｅｔｓ（”ｓｈｅｅｔ１”）のウインドウを自動的に開くには（前面に持ってくるには）どのようにコーディングすれば良いのでしょうか。今は実行後確認するため、プロジェクトのＳｈｅｅｔ１で右クリックして「オブジェクトの表示」でＳｈｅｅｔ１を出したり、タスクバーをクリックしていますが。まずＳｈｅｅｔ１を前面に出して処理をしたい。Ａｃｔｉｖａｔｅ，Ｓｅｌｅｃｔ、Ｓｈｏｗなど試しても効果がありません。

　ＶＢのアプリケーションから文書名を指定してエクセルを起動したいのですが 出来なくて困っています。ちなみにコードは下記のとおりです。どこに問題があ るのか教えていただけないでしょうか。 Private Sub Command1_Click() Dim lngReturnCode As Long Dim strFileName As String strFileName = "AllTitles.csv" 　 lngReturnCode = ShellExecute(Me.hwnd, _ "open c:\***\***.xls", _ strFileName, _ vbNullString, _ App.Path, _ SW_SHOWNORMAL) End Sub

こんにちは、いつも質問に答えていただきありがとうございます。 ＶＢＡにて、Ａ４横で設定してある２種類のシートを自動で印刷しているの ですが、特定のＰＣのみ１種類目はＡ４横で印刷されますが、 ２種類目はＡ４縦で印刷されてしまいます。 プリンターの設定も調査しましたが特に問題はありませんでした。 ちなみに、そのＰＣでステップ実行を行うと、２種類ともＡ４横で印刷されます。 この不可解な現象ですが、対処方法があれば教えていただきたいのですが、 動作環境は以下のとおりです。 ＯＳ：Windows98 Ｅｘｃｅｌ：Excel97 SR-1 ＣＰＵ：MMX166MHz プリンター:EPSON LP-8400 本体:FMV5166 NU8/Y よろしくお願いします。

ＶＢ６（ＳＰ５）でプログラムを作っていますが、ツールバーのボタンの動作がおかしくて困っています。 ツールバーにボタンを３つ作り（Ａボタン、Ｂボタン、Ｃボタンとします）、スタイルをtbrButtonGroupにしました。当然、どれかひとつのボタンを押すと、他の二つは自動的にUnPressed状態に変わります。 起動直後、どのボタンがPressed状態になっているかは、INIファイルの設定にしたがいます。 この、ボタンを押しての機能切り替えをメニューからもできるようにしています。 つまり、メニューでＡを選択すると、Ａボタンを押したのと同じ状態になり、ＡがPressed、Ｂ、ＣボタンがUnPressed状態になります。 ところが、メニューで操作すると、起動時にPressed状態になっているボタンがずっとUnpressed状態のままになってしまいます。一度ツールバーでボタンを操作すると、その後はメニューで操作してもボタンは正常にトグルするのですが、メニューだけで操作していると、ずっとPressed状態のままです（ボタン表面の色だけ、PressedとUnpressedで変わります）。 現時点で以下の対策を試してみましたが、まったく効果ありませんでした。 ・ツールバーのリフレッシュ。 ・押されない他の二つのボタンに対してtbrUnPressedを設定する（本来tbrButtonGroupにしてあればいらないはず）。その後ツールバーをリフレッシュしてもダメ。 ・メニューを選択した場合でも、一度Toolbar_ButtonClick()へ飛んでからボタンの処理に飛ぶようにする。 上記以外に、何か手段はありますでしょうか？ また、ツールバーコントロール自体のバグなんじゃないかとも思っているのですが、何かこの現象について情報がありましたら、お教えください。

ＶＢ６（ＳＰ５）でプログラムを作っていますが、ツールバーのボタンの動作がおかしくて困っています。 ツールバーにボタンを３つ作り（Ａボタン、Ｂボタン、Ｃボタンとします）、スタイルをtbrButtonGroupにしました。当然、どれかひとつのボタンを押すと、他の二つは自動的にUnPressed状態に変わります。 起動直後、どのボタンがPressed状態になっているかは、INIファイルの設定にしたがいます。 この、ボタンを押しての機能切り替えをメニューからもできるようにしています。 つまり、メニューでＡを選択すると、Ａボタンを押したのと同じ状態になり、ＡがPressed、Ｂ、ＣボタンがUnPressed状態になります。 ところが、メニューで操作すると、起動時にPressed状態になっているボタンがずっとUnpressed状態のままになってしまいます。一度ツールバーでボタンを操作すると、その後はメニューで操作してもボタンは正常にトグルするのですが、メニューだけで操作していると、ずっとPressed状態のままです（ボタン表面の色だけ、PressedとUnpressedで変わります）。 現時点で以下の対策を試してみましたが、まったく効果ありませんでした。 ・ツールバーのリフレッシュ。 ・押されない他の二つのボタンに対してtbrUnPressedを設定する（本来tbrButtonGroupにしてあればいらないはず）。その後ツールバーをリフレッシュしてもダメ。 ・メニューを選択した場合でも、一度Toolbar_ButtonClick()へ飛んでからボタンの処理に飛ぶようにする。 上記以外に、何か手段はありますでしょうか？ また、ツールバーコントロール自体のバグなんじゃないかとも思っているのですが、何かこの現象について情報がありましたら、お教えください。

ライティングソフトとしてB's Recorder GOLDを使用していますが、Win XPにアップグレードしてから不具合で一部機能が使えなくなりました。 当初使用してたのはcompaqのノートにプリインストールされていたバージョンでXP対応ではありません。XPレディPCであり、申し込んだXPアップグレードCDに同梱されていた対応バージョンをインストールしたら下記のような症状になり、その後同ベンダーのサイトから改めて最新のバージョン3.16をダウンロードしてアップデートしましたが、解決しません。 症状は次のとおりです。 ソフト自体は通常に起動し、CD-ROMドライブも認識します。 ただ、CDを入れた状態で起動すると、マイコンピュータで見るとドライブは認識するものの、CDが入っていない状態となり、音楽CDを開いてドラッグできず補助メニューの音楽CD作成が使えません。いったんマイドキュメントなどにWAVファイルを作成した後に書き込むことは可能なので支障はないのですが、ちょっと不便です。 WAVファイルの作成は可能なので、ドライブに入っているCDは認識しているハズなんですが・・・ ベンダーのサイトを見たのですが、掲載されているFAQの症状とは異なるので対処方法がわかりません。ご存知の方がおられましたらアドバイスいただければ幸いです。

VBをやりはじめてまだあまりたっていない、小４のkunpaです。今、同じフォルダにあるHTMLファイルをOLEコンテナで開こうとしたのですが、どうしても"C:\WINDOWS\TEMP"フォルダにHTMLファイルを作ってしまうので、元が開けません。どうすればよいでしょうか。教えてください。

教えてください。 ワードのフッダーに頁数/総頁数を入れたら、印刷プレビューでは、「1/3、2/3、3/3」となるんですが、いざ印刷すると「1/1、2/2、3/3」となって印刷されてしまいます。 つい先日まで何の問題も無くちゃんと印刷されていたんですが、突然おかしくなってしまいました。再起動してもダメでした。ちなみに、OSはWIN2000で、word2000です。どなたか解決方法を教えてください。

日本とUSの両方で使うVBAマクロの作成を行っています。MsgBox等の文面を日本語環境と英語環境で切り替えたいと思っています。もちろん文面は日本語、英語の対応表を用意しておきます。Excelが英語版か日本語版かをVBAで読み取る方法があればそれが使えるかと思っているのですが、どなたかご存知ありませんか。ちなみに現在は最初に一度だけMsgBoxで英語、日本語を選択させて、以後はその情報をもとに文面の切り替えを行おうと思っています。 Excelは2000です。OSは98,ME,NT,2000の混在です。またマクロ作成担当の私はWindows2000にExcel2000（いずれも日本語版）です。 よろしくお願いします。

ＶＢ６．０でExcelを起動はできて文字もでは制御できたのですが、色をかえたり線を引いたり・プリンターに出力したり・ディスクにかいたりしたいですが、なにかよいサンプルプログラムはないでしょうか。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　よろしくお願いします。

ＶＢ６．０でExcelを起動はできて文字もでは制御できたのですが、色をかえたり線を引いたり・プリンターに出力したり・ディスクにかいたりしたいですが、なにかよいサンプルプログラムはないでしょうか。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　よろしくお願いします。

超初心者です。 Workbooks.Openを使って他の任意のxslファイルを開きたいのですが、 Sub Test_FileOpen() Workbooks.Open Filename = "c:\MyDocuments\data.xls" End Sub のように書いても 「実行時エラー'1004': 'False.xls'が見つかりません。ファイル名およびファイルの保存場所が正しいかどうか確認してください」 と言うアラートが出て上手くいきません。 ファイルのパスは何度も確認したので間違いはないです。 ちなみに同じフォルダに置いて、 Sub Test_FileOpen() Workbooks.Open Filename = ThisWorkbook.Path & "\data.xls" End Sub とやっても同じアラートが出ます。 どこがおかしいのでしょうか？ 原因が推測できる方、どうかご教授願います。