前に比べてEXCELファイルの開閉、保存に異常な時間がかかるようになってしまいました。すごくイライラします。
これって システムリソースの不足も関係あるのですか?
他になにか 考えられる原因は ありますでしょうか?
ちなみに メモリは128mb、Cドライブの空き容量大丈夫そうなのですが。
初心者のとんちんかんな質問でしょうが、教えてください。 お願いします。

このQ&Aに関連する最新のQ&A

A 回答 (2件)

こんにちは



 以下のページがご参考になるのでは?
【エクセル技道場】-エクセル以外の技-PCの環境改善
http://www2.odn.ne.jp/excel/other.html#SEC2

参考URL:http://www2.odn.ne.jp/excel/other.html#SEC2
    • good
    • 0

とりあえず、思いつく原因をいくつか。



・ディスクがフラグメントをおこしてる
  →デフラグをしてみる
  →Excelは、テンポラリファイルを作るので、空き領域の最適化もする

・あまり使わないアドインを入れてしまった
  →アドインを外してしまう
  →でも、閉じる場合も遅いのであれば、関係ないかも

・とっても大きな Excel ブックが遅い
  →大きなブックの開閉に時間がかかるのは仕方ありません
  →不必要なグラフを無くするとか、小さくするしかない

・常駐プログラムが増えている
  →常駐プログラムを外す
  →メモリは十分有りそうですが、動いているプログラム次第です
   スワップが発生すると、Excel のスプラッシュウィンドウ
   (最初のロゴのような奴)が出る前に、がりがりハードディスクを
   アクセスに行きます


とりあえず、思いつくのはこんなところです。参考まで。
    • good
    • 0

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Q「保存」に時間がかかる

 オンボロVistaのWord 2007です。最近、作ったファイルを保存しようとすると、数分以上かかるようになり困ってます。以前は1~2秒で終わってました。ファイルが小さくても同じです。解決方法を教えて下さい。

 素人の浅はかさ、システムの復元や、Wordの入れ替えをやっても駄目です。ちなみに、Cドライブの容量は80GB、空きは40GB。

Aベストアンサー

う~ん、遅くなる原因は何だろう?
とりあえず、以下の手順は実行済みなのですね?
【方法(2) レジストリを削除する】は、関係しないと思うけど。
http://office-qa.com/Word/wd114.htm

残るはこちら↓ぐらいだと思う。
http://support.microsoft.com/kb/313937/ja
http://hp.brs.nihon-u.ac.jp/~momose/MS-Office_W_Err/index.html

これでも解消されないとしたら、私には原因が分かりません。
もう一度、すべての方法を再度試して検証してみて。
それでもだめなら、私には解決に導く手段を知りませんので、他の回答
を待つか、新規質問で上記手順をしたのに解消されなかったことを記載
して投稿してください。

これが最後のアドバイスなので、これにて失礼(-_-)/~~~

QエクセルVBAでクリップボード内容をクリア

こんにちは。
エクセルのVBAの処理の中で、ある部分をコピーしてそれを、
貼り付けする処理をしています。
処理終了後、ファイルを閉じるときに、クリップボードに
コピーの内容が残っている旨のメッセージがでてきます。
このメッセージを出さない様に、クリップボードの内容を
クリアするにはどのようにすればよろしいでしょうか?
申し訳ありませんが、お教え頂きますようお願いいたします。

Aベストアンサー

Excel.Application.CutCopyMode = False
Workbooks(fName).Close savechanges:=False

かな。1行目だけでいいかも。

QExcelファイルを開くのが異常に遅い・・・バグ?

数十KBしかないExcelファイルを開くのに30秒くらいかかってしまいます。
ノートPCで利用しているのですが、CoreDUOの2G・メモリ1GB・WinXPを利用していてWordなどは一瞬で開くのに、Excelで特定のファイルを開くときだけ、Excelの画面になったまま開かない状態になります。
計算式が大量に入っているわけではないのに、これはバグでしょうか?

Aベストアンサー

こんにちは。

例えば、以下のフォルダで、Excelの残骸を掃除してみると速くなることがあります。

C:\Documents and Settings\[ユーザー名]\Local Settings\Temp\*.emf

他の要因としては、

以下の二点のファイルのトラブル
Excel設定用のフォルダ
C:\Documents and Settings\[ユーザー名]\Application Data\Microsoft\Excel
  \*.xlb ファイル
その下位フォルダの
  ..\XLSTART\PERSONAL.XLS
この二つを削除するか、移動することによって、xlbファイルを再生成させます。(なお、メニューはリセットされてしまいます)

・不要なアドインを外す
・プリンタのドライバ(バージョンを下げるか・あげるか)
・履歴を自動記録するアプリケーション(中止させる)
・アンチウィルスの設定(Office を外す-お勧めしません)

によって起動が早くなることがあります。

QExcel)軽いデーターのはずなのに、メチャメチャ重い!

こんにちは。
会社の共有フォルダーに「見積り書」というエクセルファイルがあります。
従業員はそれを各PCにダウンロードして、それぞれが見積りを作ります。
ある日をきっかけにめちゃめちゃこの見積りが重くなりました。
このたった1枚の見積りなのにサイズは4MB。写真、画像、マクロ、一切ありません。
それならまだ許せるのですが、、開くのにかーーーーなり時間かかります。5分以上はかかります。

「誰が触った!」「どう触った!」など調べるより新しく作り直そうと試みました。

なんとか10分ほど待って開きました。
そして7列x20行ほどのセルを囲んで「Ctrl」+「C」を押してコピーして、その新しいエクセルに貼付けようと試みました。
ところがコピーした段階でまた「応答無し」なります。
この症状は1人を除く従業員全員、しかもこの見積りだけです。あとはスイスイ開きます。
どれかのセルにゴミのようなデーターが入ってしまってるのでしょうか。
何が原因でしょうか?考えられるものを挙げていただけましたら幸甚です。

Aベストアンサー

コメントでも大量に入力されたのでしょうか。コメントの付いたセルはセルの右上に赤い三角マークが付くので見た目で分かります。コメントってテキストだから容量は大きくならないと思っていたんですけど、入れると凄く大きくなるんです。びっくりしました。

入力されている数式や書式を諦められるなら、他のbookからその問題のbookを参照してはいかがでしょう。値だけを参照するだけですので不要なものは一切付いてきません。
問題のファイル(Book)をBook1とした場合、Book2のA1セルに
=[Book1]Seet1!A1
と入力して必要な範囲までコピーします。
そののちに、Book2のseet全体をコピーして、「形式を選択して貼り付け」から「値」を選んで同じ範囲に上書き貼り付けすると良いです。
あとは正常に開ける人のパソコンの画面を見ながら数式や書式を設定してみてください。

Qエクセル、ワードを終了するとき遅すぎる。

エクセル、ワードを使用し、終了するときに20秒くらいかかります。
常駐ソフトはほとんどありません。
ウィルスバスターとMS-IMEと音量だけなのですが・・・
ですから他のソフトを使用するときは問題ないのですが
この2点は凄く遅いのです
いらないアプリケーションは削除したつもりですが・・・
他に何か出来る事ありますか?

ノートPC
シィンクパッド
ウィンドウズ98

です。
宜しくお願いいたします。

Aベストアンサー

こんにちは

 以下のページがご参考になるのでは?

【エクセル技道場】-エクセル以外の技-PCの環境改善
http://www2.odn.ne.jp/excel/other.html#SEC2

参考URL:http://www2.odn.ne.jp/excel/other.html#SEC2

QSub ***( ) と Private Sub ***( ) の違い

初歩的な質問で申し訳ありませんが・・・

自分でコードを書いていても、イベントが発生したりした時の処理で、コードのウィンドウで上のドロップダウンリストで選択できる時の処理などは自動的に[Private Sub Command1_Click( )]などと出てくるのでそのまま使っています。自分で別途プロシージャーを作成する時は[Sub ****( )]としています。
ですがその違いを理解しないまま、自分で作成する時は[Private Sub]ではなくて[Sub]を使っています。

Sub ***( ) と Private Sub ***( ) の違いは何なんでしょうか?
どなたか説明頂けませんか?
よろしくお願いします。

Aベストアンサー

「Sub」の部分にカーソルを置いて[F1]を押せばヘルプが起動します。
「指定項目」のところに「Public」と「Private」の説明がありますよ。
省略して「Sub hogehoge()」とした場合は「Public」とみなされます。

Publicは「すべてのモジュールから呼び出せるプロシージャ」ということになります。
Privateとすると「同じモジュールの中からしか呼び出せないプロシージャ」となります。

もしExcelをお持ちでしたらExcelのVBEで標準モジュールを追加し、「Sub Test1()」と「Private Sub Test2()」を作成してみてください。
そしてExcelの[ツール]-[マクロ]-[マクロ(Alt+F8)]でマクロ実行のダイアログを表示させてみるとわかります。
ここには実行できるプロシージャの一覧が表示されますが、Test1は表示されているけれどTest2は表示されません。
Test1はPublicで、Test2はPrivateだからです。

QエクセルVBAが途中で止まります

以前別のカテゴリで質問したのですが、そちらでは解決出来なかったので、こちらで改めて質問します。
下記のマクロで、一つのブックからSheet1だけをコピーして来て、少し処理をし、元のブックを閉じるというもので、ブックの数は多くて3000程、少ない時は300位です。
で、このマクロだと900位までですと最後まで行くのですが、それを超えるとリストが95位で止まってしまいます。
自宅で別データを作ってやってみるとうまくいきました。
コピー元のブックにはテキストデータのみで、200文字から500文字程度の大きさしかありません。
ファイル名も50文字程度の物を全部20文字程度まで短くしてもみましたが、ダメでした。
どうかお知恵をお貸しください。

Sub ★1★ブックの結合()
Dim sFile As String
Dim sWB As Workbook, dWB As Workbook, aWB As Workbook
Dim dSheetCount As Long
Dim i As Long
Dim SOURCE_DIR As String

'エクセルデータに変換されたファイルのあるフォルダを選択します。
MsgBox "エクセルに変換されたデータのフォルダを選択"
With Application.FileDialog(msoFileDialogFolderPicker)
If .Show = True Then
SOURCE_DIR = .SelectedItems(1) & "\"
End If
End With

Application.ScreenUpdating = False

'指定したフォルダ内にあるブックのファイル名を取得
sFile = Dir(SOURCE_DIR & "*.xls")

'フォルダ内にブックが無ければ終了
If sFile = "" Then Exit Sub

'集約用ブックを作成
Set dWB = Workbooks.Add

'転記マクロの中のDMリストシートをコピーする
Workbooks("転記用マクロ.xlsm").Worksheets("DMリスト").Copy Before:=dWB.Worksheets("Sheet1")
Application.DisplayAlerts = False
Worksheets(Array("Sheet1", "sheet2", "sheet3")).Select
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = True

'集約用ブック作成時のシート数を取得
dSheetCount = dWB.Worksheets.Count

Do
'コピー元のブックを開く
Set sWB = Workbooks.Open(Filename:=SOURCE_DIR & sFile)

'コピー元のsheet1を集約用ブックにコピー
sWB.Worksheets("sheet1").Copy After:=dWB.Worksheets(dWB.Sheets.Count)

シート転記

'コピー元ファイルを閉じる
Application.DisplayAlerts = False
sWB.Close
Application.DisplayAlerts = True

'セルA2の名前を変更する


'シート名をセルA2の値に変更
'ActiveSheet.Name = Range("A2").Value


'次のブックのファイル名を取得
sFile = Dir()
Loop While sFile <> ""

'集約用ブックを保存する
'dWB.SaveAs Filename:=DEST_FILE


Application.ScreenUpdating = False


End Sub

以前別のカテゴリで質問したのですが、そちらでは解決出来なかったので、こちらで改めて質問します。
下記のマクロで、一つのブックからSheet1だけをコピーして来て、少し処理をし、元のブックを閉じるというもので、ブックの数は多くて3000程、少ない時は300位です。
で、このマクロだと900位までですと最後まで行くのですが、それを超えるとリストが95位で止まってしまいます。
自宅で別データを作ってやってみるとうまくいきました。
コピー元のブックにはテキストデータのみで、200文字から500文字...続きを読む

Aベストアンサー

http://oshiete.goo.ne.jp/qa/8750372.html


例えば、30ファイルあっても10ファイルしか読み込まれない事があり、
エラーメッセージもない、何事もなく終了するが10ファイルしか処理されていない、
常に発生する訳ではなく、マシンが変われば同じデータでもOKだったり、
データが少し変わればOKだったりする。
なので、昨日までOKだったのに、今日データが変わった為、急にダメになったりする。
もし、10ファイル目で発生した場合、何度実行しても必ず、10ファイル目までしか処理されない。
そのファイルがおかしいかと思い、その前後の2~3ファイルを削除しても、
やっぱり、10ファイル目(さっきとは違うファイル)までしか処理されない、
という恐ろしいバグがExcel VBAにありますが、それじゃないですかね?

While文などのループの中に、ワークブックのオープンがあると、
何度目かでオープンが実行されず、エラーなしでスルンと終わります。

回避方法は、Open 文の前に DoEvets の1行を書く事。
だいたいこれで直りますが、これで直らなかったマクロもあったので、
Open 文の後ろにも DoEvets の1行を書いて、前後を DoEvets ではさむと直りました。
安全(?)の為、前後をはさんでおいた方が良いと思います。

こんな感じ:
DoEvents
Workbooks.Open aaa
DoEvents

かなり前(1年くらい?)にハマりググりまくったところ、ほとんど情報はなかったですが、
1人だけ、自分の質問に「直った」と自己回答している方がいて、Open文の前にDoEvetsをつけたら直ったそうです。
半信半疑で真似たら私も直りました。
何故、これで直るのかはわかりませんが、DoEvetsを外すと見事に再現し、DoEvetsではさむとピタッと直ります。

ググりまくった際、とても情報が少なく、こんなに顕著に再現するのに、
何故、情報が少ないのかは不思議に思いました。

http://oshiete.goo.ne.jp/qa/8750372.html


例えば、30ファイルあっても10ファイルしか読み込まれない事があり、
エラーメッセージもない、何事もなく終了するが10ファイルしか処理されていない、
常に発生する訳ではなく、マシンが変われば同じデータでもOKだったり、
データが少し変わればOKだったりする。
なので、昨日までOKだったのに、今日データが変わった為、急にダメになったりする。
もし、10ファイル目で発生した場合、何度実行しても必ず、10ファイル目までしか処理されない。
そのファイルがおかし...続きを読む

QEXCELで特定ファイルの動作が重い

Windows7でEXCEL2010を使用しています。
特定の一つのファイルだけが動作が異様に重くなるのですが。
そのファイルを開くときも時間がかかり、開いた後も範囲指定やシートのコピーなどを
実行しようとすると応答なしとなってしまいます。
しばらくしてメモリ不足のメッセージが上がります。
それ以外のEXCELファイルについては動作が遅くなることもなく、問題なく使用できています。
原因がわかる方いらっしゃいましたら教えてください。

Aベストアンサー

1.見えないところにゴミがたくさんある
 特にテキストボックスやオートシェイプがテキスト削除では削除できない
 ためゴミとなって残っている。
 何かのファイルを変更して使用すると小さいはずなのにファイルサイズがやたらと大きい場合があります
 必要な部分のみを新しいファイルにコピーしてみてください。


2.写真などの大きな画像がある
 写真を大きな容量のまま挿入すると、表示は小さくしてもファイルは大きくなる
 挿入する前に小さいサイズにリサイズしてみてください。
 最近のデジカメは大きすぎます。
 写真であれば1024x768以下で解像度が十分ななるべく小さいサイズにします。


以上2003ですが・・・

Qエクセル:マクロ「Application.CutCopyMode = False」って?

エクセルのマクロを記録していると

「Application.CutCopyMode = False」

というものがよく出てきますが、これは何でしょう?
どういう意味のものかわかりません。
削除しても差し支えないのもでしょうか?

Aベストアンサー

「Application.CutCopyMode = False」の前で
セルのコピー、または切り取りを行っていると思います。
これは、その操作(セルのコピー、または切り取り)を無効にしているだけです。
------------
Range("A1").Select
Selection.Copy ← これを無効にしている
Range("A2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
------------
上記の場合であれば、「Application.CutCopyMode = False」を削除しても問題ありませんが、
以下の場合、貼り付け処理でエラーになります。
------------
Range("A1").Select
Selection.Copy
Range("A2").Select
Application.CutCopyMode = False
ActiveSheet.Paste ← ココでエラー
------------
ご自分で、セルをコピーしてみると分かると思いますが、コピーした範囲が点線で点滅されます。
「Application.CutCopyMode = False」をすると、
その点滅がなくなります。

「Application.CutCopyMode = False」の前で
セルのコピー、または切り取りを行っていると思います。
これは、その操作(セルのコピー、または切り取り)を無効にしているだけです。
------------
Range("A1").Select
Selection.Copy ← これを無効にしている
Range("A2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
------------
上記の場合であれば、「Application.CutCopyMode = False」を削除しても問題ありませんが、
以下の場合、貼り付け処理でエラーになります。
------------
...続きを読む

Qエクセルで、条件に一致した行を別のセルに抜き出す方法

エクセルで、指定した条件に一致するセルを含む行をすべて抜き出す方法が知りたいです。

たとえば、

<A列> <B列> <C列>
7/1 りんご 100円
7/2 ぶどう 200円
7/2 すいか 300円
7/3 みかん 100円

このような表があって、100円を含む行をそのままの形で、
別のセル(同じシート内)に抜き出したいのですが。

7/1 りんご 100円
7/3 みかん 100円

抽出するだけならオートフィルターでもできますが、
抽出結果を自動的に、別の場所に、常に表示させておきたいのです。

初歩的な質問だと思いますが、検索しても分からなかったので、よろしくお願いします。

Aベストアンサー

同じ質問が結構よく出てますが、そんなに初歩的でもありません
別シートのA1セルに「100円」と入力し、そのシートの任意のセルに以下の式を貼り付けて下さい。後は、下方向、右方向にコピー。
日付のセル書式は「日付」形式に再設定してください

=IF(COUNTIF(Sheet1!$C:$C,$A$1)>=ROW(A1),INDEX(Sheet1!A:A,LARGE(INDEX((Sheet1!$C$1:$C$500=$A$1)*ROW(Sheet1!$C$1:$C$500),),COUNTIF(Sheet1!$C:$C,$A$1)-ROW(A1)+1)),"")

データ範囲は500行までとしていますが、必要に応じて変更して下さい


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング