![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
お世話になります。
当方、Windows XP(Home Edition 2002 SP2)にoffice2000をインストールして使用しています。
Excel2000において、最後に印刷プレビューが出るマクロを作成し使用しているのですが、マクロが動作しきった後、「印刷」もしくは「閉じる」のボタンを押すと、エクセルそのものが閉じてしまいます。閉じてしまったファイルを再度開こうとすると、「別のユーザーが開いています 使用者:○○○(自分のユーザー名)」となり、読み取り専用でしか開くことができなくなります。
ただし、マクロを使用しないで印刷プレビューを開いた場合は、プレビューのみ閉じることができます。
PCを再起動させても同様のことが起こり、マクロウイルスも検知できませんでした。
内容が分かりづらいかもしれませんが、どうぞよろしくお願いいたします。
No.5ベストアンサー
- 回答日時:
とりあえず定番の対処法です。
上から順に試してみてください。1 または 2 の作業で回復することが多いです。
1. *.xlb ファイルの削除
http://homepage2.nifty.com/winfaq/c/trouble.html …
2. Temp フォルダ内の一時ファイルの削除
3. Office アップデートの実行
4. プリンタドライバを最新のものに更新
5. ディスプレイドライバを最新のものに更新
この回答への補足
ありがとうございます。
早速1→2と試してみましたが効果が無く、3を実行しSP3までインストールしましたが、マクロが入っているファイルの全てを開くことができなくなってしまいました。
ノートンのインターネットセキュリティをインストールしているため、オフィスのウィルス検索をしないようにしたりしましたが、「ファイルを開いています・・・」の状態で固まってしまいます。
なにか足りない作業があるのでしょうか。
ありがとうございました。
補足に書いたような現象は一旦収まりました。
5番まで試しましたが、画面が閉じてしまうのは相変わらずですので、新しいオフィスの購入も検討しつつ、様子を見たいと思います。
本当にありがとうございました。
No.4
- 回答日時:
>読み取り専用でしか開くことができなくなります。
[Alt]+[Ctrl]+[Delete]で、問題のExcelを終了すれば、再起動しなくてもいいかもしれません。
とりあえず、突然落っこちてるみたいですけど、問題のコードも一部なのでわからない部分もありますが、
1.壊れたファイルかも
新規にBookを作り、セルとモジュールをコピーしてみる。
動けば、ファイルが壊れてたんだと思います。
動かなければ、とりあえず問題のモジュールだけをコピーして動くか調べる。(セルに何もないと印刷やプレビューしないので、何か書きこんで)
補足のモジュールは end sub はあるけれど、その上が分からないので、できたらまず sub test() にしてやってみる。
動けば順に他のモジュールやシートをコピーしてみる。
2.APIとか使ってません?
他の部分でAPIとか使ってませんか?
Workbook_Openや、Worksheet_Activateとかで、何かしてませんか?
3.セキュリティがあやしい
とりあえず、セキュリティを一時無効にしてみる(怖い話だけれど)。
とかではどうでしょうか?
ありがとうございます。
マクロ・VBAに関して初心者で、作成するのもコードを入力したのではなく、マクロの記録を行って作成したものでした。
教えていただいた内容を試してみます。結果については補足の欄で報告させていただきます。ありがとうございました。
No.3
- 回答日時:
こんばんは。
#2の回答者です。
#2で考えていた内容とは違い、それでは、ハングするはずはありませんね。
そういう現象は覚えがあるのですが、今は、はっきりしません。
Sub TestMacro2()
With ActiveSheet
.Columns("U:V").Hidden = True
' .Range("W1:X1").Select '意味が分かりません。
'.PageSetup.PrintArea = .Range("W1:X20").Address ''例
.PrintPreview
.Columns("U:V").Hidden = False
End With
End Sub
No.2
- 回答日時:
こんばんは。
私も、#1 さん同様に、コードを見せなくてトラブルがあるという質問には、基本的に、VBAの質問として成り立ちません。コードを披露しても、決して、あなた自身を批判するような人はいませんし、さげすむような人はいません。いたら、その人は相手にしないほうがよいです。誰でも、最初はあるわけで、いきなり上手になる人は、数少ないです。
実際、そのコード自体は、言うまでもなくハングしています。
直すべき点というよりも、もともと内容的に印刷のユーザー選択ですから、プレビューまででコードは止めることにします。これ以外にも、作ったことがありますが、あまりはっきり覚えがありません。確か、公開されていない方法があったように思います。
Sub TestMacro()
With ActiveSheet
.PageSetup.PrintArea = .Range("A1").CurrentRegion
.PrintPreview
End With
End Sub
ありがとうございます。
肝心なことをお伝えしていませんでしたが、マクロ・VBAに関して初心者で、作成するのもコードを入力したのではなく、マクロの記録を行って作成したものでした。
教えていただいた内容を試してみます。結果については補足の欄で報告させていただきます。ありがとうございました。
No.1
- 回答日時:
>最後に印刷プレビューが出るマクロを作成し使用しているのですが
ご自身で作成されたのですか?
Excelを閉じるようなコードがあるとか?
と言うかコードの提示がないので何とも言えないですが。
この回答への補足
マクロは自分で作成しました。
エクセルを閉じるコードは入れていないつもりです。
概要は、印刷の際に必要の無い列を隠してページの設定を調整し、プレビューを表示させるというものです。
コードとは下記のことでよいのでしょうか。
Columns("U:V").Select
Selection.EntireColumn.Hidden = True
Range("W1:X1").Select
ActiveWindow.SelectedSheets.PrintPreview
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) DisplayAlertsブロパティで ”実行時エラー424オブジェクトが必要です” 5 2022/05/15 18:02
- Excel(エクセル) 【マクロ】webアドレスにて指定されたCSVファイル【excelソフト表示】を印刷する件 1 2023/02/15 01:52
- その他(Microsoft Office) Excelのマクロについて教えてください。 1 2022/03/25 10:03
- Excel(エクセル) excelのマクロ実行でブロックされます。 2 2022/06/08 09:14
- Excel(エクセル) Excelであるシートだけ印刷できない 1 2022/04/01 09:04
- Visual Basic(VBA) VBA アドインについて お詳しい方 ご教授をお願いします。 相談事項 現在以下の対応を実施した所、 1 2022/11/02 16:53
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Word(ワード) office 2021へ自分用のクイックアクセスとマクロをコピーしたい 2 2023/03/11 21:15
- Excel(エクセル) 記録マクロのみでできますか? 7 2022/08/07 20:38
- Excel(エクセル) 【マクロ】プリントスクリーンした画像をエクセルに貼付して印刷したい 6 2022/11/30 20:11
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル連番自動印刷について
-
Excelでマクロ実行中に画面を固...
-
エクセルファイルを値でのみし...
-
セルに入力するたびにマクロを...
-
VBA Shapes コピーと名前
-
VBAで行コピーして挿入
-
【Excel】マクロでページを追加...
-
ブックの共有でVBAエラー
-
worksheet_changeの一時無効化
-
EXCEL 行番号や列番号が選択で...
-
エクセル マクロ写真帳に一括で...
-
【ExcelVBA】マクロブックを通...
-
エクセルでマクロ登録の不具合解消
-
エクセルのマクロで数値に応じ...
-
EXCEL VBA 他のアプリケーショ...
-
VBAで保存しないで閉じると空の...
-
Excel マクロの編集がグレーに...
-
WPSOffice_マクロの有効化について
-
エクセルの表を複数枚印刷した...
-
【Excel VBA】マクロでExcel自...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelでマクロ実行中に画面を固...
-
エクセルファイルを値でのみし...
-
エクセル連番自動印刷について
-
【Excel】マクロでページを追加...
-
VBA Shapes コピーと名前
-
エクセル マクロ写真帳に一括で...
-
セルに入力するたびにマクロを...
-
エクセルVBAで納期管理システム...
-
EXCEL VBA 他のアプリケーショ...
-
エクセル 図形の寸法を取得したい
-
VBAで行コピーして挿入
-
EXCEL 行番号や列番号が選択で...
-
ブックの共有でVBAエラー
-
エクセルのマクロについて教え...
-
【ExcelVBA】マクロブックを通...
-
エクセルファイルの回数期限の...
-
VB.NETによるEXCELの行挿入
-
グラフ要素のセルを参照したい...
-
再度,ExcelVBA,public変数が消える
-
VBAの記述について 値のみの貼...
おすすめ情報