Excelで「同じ名前のファイルが既に開いています」

解決済

  • 質問者：cakemama
  • 質問日時：2001/08/23 10:21
  • 回答数：2件

Excelのファイルを開くと、そのファイルしか開いていないのに
「同じ名前のファイルが既に開いています」と毎回出ます。
OKを押せばそのまま作業はできますが、どのExcelファイルを開いても
毎回出るのでうっとうしいです。
特に変なことをした覚えはないんですが、何かよい解決方法を教えて下さい。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

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

「Excel 名前」に関するQ&A： excel 名前の抽出

さらに表示

「名前 エクセル」に関するQ&A： エクセル・ワード　名前を付けて保存

A 回答 (2件)

No.2ベストアンサー

  • 回答者： table_1969
  • 回答日時：2001/08/23 22:16

もしかしてエクセルを先に起動してから、「開く」でファイルを開けば正常に開くんじゃありませんか？


そうであれば、「フォルダオプション」－「ファイルの種類」タブでMicrosoftExcelワークシートを選んで「編集」ボタンをクリックすると「ファイルの種類の編集」ウィンドウが開きます。その中の「アクション」の中にOpenもしくは開くが２つありませんか？もし、２つあると1つのファイルをダブルクリックすると２回開くことになってしまいます。ですから、どちらか(たぶん下にあるほう)を削除して下さい。
    • good
    • 0
    • 件
通報する
この回答へのお礼

確かにExcelを先に起動すると正常に開いたので、さっそくフォルダオプションを
見てみたのですが、openはひとつしかなく、ちょっとさわるともっと悲惨なことに
なったので、とりあえず一度関連付けを削除し、再度設定するとなんとか
正常に開けるようになりました。回答ありがとうございました。

通報する
お礼日時：2001/08/24 09:12

No.1

  • 回答者： fu-fu-fu
  • 回答日時：2001/08/23 13:55

ツール→ユーザー設定→ツールバー



チェックを見直す。
    • good
    • 0
    • 件
通報する
この回答へのお礼

回答ありがとうございました。

通報する
お礼日時：2001/08/24 09:09

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

「名前 エクセル」に関するQ&A： エクセルで、列内が同じ名前を集計する方法は？

さらに表示

「Excel 名前」に関するQ&A： Excelで入力したデータを自動的に並び替える方法

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

Q質問する（無料）

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

関連するQ&A

関連するカテゴリからQ&Aを探す

専門家回答数ランキング

専門家

※過去一週間分の回答数ランキングです。

Q質問する（無料）

他の専門家の回答をチェック

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

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

Q「古い圧縮ファイル」の確認方法

Ｄドライブのディスクのクリーンアップをしたいのですが、実行できるものが、「古い圧縮ファイル」の削除しかありません。

「古い圧縮ファイル」がどのプログラムかを確認する方法を教えてください。

また、圧縮されたファイルの名前は青くなるらしいのですが、見つかりません。どうしてでしょうか
圧縮ファイルは１Ｇ弱あります。

Aベストアンサー

http://www.atmarkit.co.jp/fwin2k/win2ktips/106cleanup/106cleanup.html

初期設定では、５０日以上アクセスの無かったファイルに対して、圧縮が行われます。
当然、圧縮してからでないと、ファイル名は青色にはなりませんので、ディスク・クリーンアップでの候補段階では、黒色のままです。


尚、設定によっては青色表示にならない場合も有りますけど。

http://121ware.com/qasearch/1007/app/nec.jsp?005084

他の回答も見る

QEXCEL VBA)ファイルを作成する際に「そのファイルは既に存在します」の警告を出さずに上書きしたい

下記の「AAA」ブックを作成するコードを実行した際に、「そのファイルは既に存在します。上書きしますか[はい][いいえ]」という警告が出ます。この警告を出さずに、即上書きするようにしたいのですが、どうすればよいでしょうか。よろしくお願いします。

ActiveWorkbook.SaveAs Filename:="c:\FILE\AAA.xls"

EXCEL2000を使用しています。

Aベストアンサー

Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:="c:\FILE\AAA.xls"
Application.DisplayAlerts = True

他の回答も見る

Qファイルの圧縮方法

AVIやMPGの画像ファイルを圧縮する方法を教えてください。900mb位のファイルをCD-Rに落とし込める700mbまで圧縮したいんですが。できれば、zipやlzhなどの後で解凍しなくてはいけないような圧縮方法ではなく、多少画像が荒くなってもファイルを単純に縮小させるような方法を教えていただけると有り難いのですが。。
因みに、TMPGEncを試してみたんですが、どうもうまくいかなくて。。ファイルサイズが元のファイルより逆に大きくなってしまうんです。
すいませんが、宜しくお願いします。

Aベストアンサー

画像圧縮？くす(^^
エンコはTMPGEncやaviutlでやるのがふつーです。
ええ　絶対！　
aviutl
http://ruriruri.zone.ne.jp/aviutl/

zipとかで圧縮しても意味ありません　サイズ的に。

で、TMPGEncで元より大きくなるのは問題は
コーデック、画像サイズ、　音声ファイルなど
理由はいっぱいあります。対処は類似質問みて↓
http://oshiete1.goo.ne.jp/kotaeru.php3?q=625581

だから圧縮というか再エンコードが面倒なら
ファイルをテキトーな部分でカットする方向性はどお？
CD-R　２枚に保存　450　450　くらいでカット。
対処は類似質問みて↓
http://oshiete1.goo.ne.jp/kotaeru.php3?q=610331
ではでは！

追伸
カンタンにならrmファイルに変更かなあ
でも画質は落ちますよ
ネット配信　ストリーミング形式でどぞ！
RealplusG2とかRealEncoderで変換
でもaviでもないしmpegでもないですけど、どお？

参考URL：http://oshiete1.goo.ne.jp/kotaeru.php3?q=610331

画像圧縮？くす(^^
エンコはTMPGEncやaviutlでやるのがふつーです。
ええ　絶対！　
aviutl
http://ruriruri.zone.ne.jp/aviutl/

zipとかで圧縮しても意味ありません　サイズ的に。

で、TMPGEncで元より大きくなるのは問題は
コーデック、画像サイズ、　音声ファイルなど
理由はいっぱいあります。対処は類似質問みて↓
http://oshiete1.goo.ne.jp/kotaeru.php3?q=625581

だから圧縮というか再エンコードが面倒なら
ファイルをテキトーな部分でカットする方向性はどお？
CD-R　２枚に保存　450...続きを読む

他の回答も見る

QExcelのVBAで、選択したファイルが既に開かれているか確認したい

ExcelのVBAで、PowerPointのファイルに対し処理を行ないたいと思っています。
処理の前にファイルを選択し、そのファイルが既に開かれていた場合に処理を中断する判定を入れたいと思っているのですが、ファイル選択後に
「実行時エラー429ActiveXコンポーネントは、オブジェクトを作成できません」
というエラーになってしまいます。
「For Each PptFile In」のあとの「PowerPoint.Presentations」の記述に問題があるようなのですが、改善方法をお教えいただけませんでしょうか。

Sub test()
Dim PptApp As PowerPoint.Application
Dim PptFile As Object
Dim myFilename As String

myFilename = Application.GetOpenFilename
Set PptFile = GetObject(, "Powerpoint.Application")
For Each PptFile In PowerPoint.Presentations
If PptFile = Dir(myFilename) Then
MsgBox "指定したファイルは開かれています"
Exit Sub
Else
MsgBox "PowerPointの処理を実行します"
'処理
End If
Next
End Sub

ExcelのVBAで、PowerPointのファイルに対し処理を行ないたいと思っています。
処理の前にファイルを選択し、そのファイルが既に開かれていた場合に処理を中断する判定を入れたいと思っているのですが、ファイル選択後に
「実行時エラー429ActiveXコンポーネントは、オブジェクトを作成できません」
というエラーになってしまいます。
「For Each PptFile In」のあとの「PowerPoint.Presentations」の記述に問題があるようなのですが、改善方法をお教えいただけませんでしょうか。

Sub test()
Dim PptApp A...続きを読む

Aベストアンサー

こんばんは。

どこが間違いとかいうよりも、私なら、こう書いているかなっていう感じですね。直してみると、違った趣旨のコードが残る所をみると、まったく違ったことを考えていらっしゃるのかなぁっていう気がします。

'//
Sub test1()
　Dim PptApp As Object
　Dim PptFile As Object
　Dim myFilename As String
　
　myFilename = "PowerPointの使い方" 'Application.GetOpenFilename　
'ここでファイル名を求めると、まったく違った内容になるはずです。
　Set PptApp = GetObject(, "Powerpoint.Application")
　If PptApp Is Nothing Then
　　MsgBox "PowerPointは、起動しておりません", vbExclamation
　　Exit Sub
　Else
　　For Each PptFile In PptApp.Presentations
　　　If PptFile.Name Like myFilename & "*" Then
　　　　MsgBox "指定したファイルは開かれています"
　　　　Exit Sub
　　　Else
　　　　MsgBox "PowerPointの処理を実行します"　'この意味が分かりません。
　　　'処理
　　　End If
　　Next
　 End If
End Sub
'//

こんばんは。

どこが間違いとかいうよりも、私なら、こう書いているかなっていう感じですね。直してみると、違った趣旨のコードが残る所をみると、まったく違ったことを考えていらっしゃるのかなぁっていう気がします。

'//
Sub test1()
　Dim PptApp As Object
　Dim PptFile As Object
　Dim myFilename As String
　
　myFilename = "PowerPointの使い方" 'Application.GetOpenFilename　
'ここでファイル名を求めると、まったく違った内容になるはずです。
　Set PptApp = GetObject(, "Powerpoint.Applicat...続きを読む

他の回答も見る

Qファイルの圧縮方法が解りません

窓の杜やベクター等に置かれている、フリーの圧縮、解凍ソフトをダウンロードしていますが、テキストファイルや、画像ファイルの圧縮方法が解りません。何方か教えて頂けませんか?

Aベストアンサー

ソフトの開発者のサイトで質問することをお奨めします。

ソフトごとに操作方法が異なりますので、使用しているソフト名すらない状態では誰も必要とする回答を出せません。

窓の杜やベクターでは開発者のサイトへのリンクがありますから、そこからアクセスできますよ。

他の回答も見る

Q「もし既にファイルを開いているなら、開かない」

おはようございます。
accessからExcelのブックを開く処理をしています。

VBAでファイルを開く時に、「もし既にファイルを開いているなら、開かない」
という行為をしたいのですが、どのようにすればいいでしょうか？

***************************************************************************
Sub サンプル()
Dim xlApp As Object
Dim xlBook As Object

Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("C:\【Excel】\料理.xlsm")

xlApp.Visible = True'ファイルを開く？表示する？

Set xlApp = Nothing
Set xlBook = Nothing
End Sub
***************************************************************************
このコードの、
xlApp.Visible = Trueを、

if　xlBook がまだ開いてない　then
xlApp.Visible = True
Else
End If

のような事がしたいのですが、可能でしょうか？
ご教授よろしくお願いします。

おはようございます。
accessからExcelのブックを開く処理をしています。

VBAでファイルを開く時に、「もし既にファイルを開いているなら、開かない」
という行為をしたいのですが、どのようにすればいいでしょうか？

***************************************************************************
Sub サンプル()
Dim xlApp As Object
Dim xlBook As Object

Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("C:\【Excel】\料理.xlsm")

xlApp.Visible = True'ファイル...続きを読む

Aベストアンサー

accessが使える環境でないので未確認ですが

Set xlBook = xlApp.Workbooks.Open("C:\【Excel】\料理.xlsm")
を操作した後なので

If xlBook.ReadOnly Then
？？
Else
xlApp.Visible = True
End If

開いたブックが読み取り専用かどうかで判断します。

他の回答も見る

Qpsdファイルの圧縮方法

psdファイルの圧縮方法を教えてください。（基本的質問で恐縮ですが）
win98です。なお、ファイルは９ＭＢ程度ですが、圧縮したものを解凍する際、鮮明度が落ちずに元通りの画像で開けますでしょうか？

Aベストアンサー

●大きなサイズのファイルを分割して送付

+Lhaca 1.20 デラックス版での分割方法
http://park8.wakwak.com/~app/Lhaca/

　1. インストールは、ダウンロードした Lhaca120.exe を実行する。
　2. デスクトップに作成された +Lhaca のショートカットに、
　　 対象のファイルをALTキーを押しながらドロップする。
　3. 保存場所を聞いてくるので、望みの場所を指定する。
　　 （圧縮形式は、相手が解凍できる形式を選ぶ。）
　4. 分割されたファイル群と結合用のバッチファイルが作成される。
　　 （デフォルトでは 1.2MB を上限として分割される。）
　　 （このサイズは +Lhaca で変更できる。）
　5. (4)のファイル全てを、容量を超えないようにメールに添付して送信
　　 する。
　　 （添付ファイル総数を本文に明記すること。）
　6. 受け取った側は、全ての添付ファイルを一箇所に集めて、バッチファ
　　 イルを実行する。
　　 （操作手順は、本文に明記すること。）
　7. 分割されたファイルが結合されるので、結合された圧縮ファイルを解
　　 凍する。
　8. 9MBのファイルが解凍されるので、作業する。


これでどうかな！？

※他の圧縮ソフトも分割機能が備わっていると思うが・・・

●大きなサイズのファイルを分割して送付

+Lhaca 1.20 デラックス版での分割方法
http://park8.wakwak.com/~app/Lhaca/

　1. インストールは、ダウンロードした Lhaca120.exe を実行する。
　2. デスクトップに作成された +Lhaca のショートカットに、
　　 対象のファイルをALTキーを押しながらドロップする。
　3. 保存場所を聞いてくるので、望みの場所を指定する。
　　 （圧縮形式は、相手が解凍できる形式を選ぶ。）
　4. 分割されたファイル群と結合用のバッチファイルが作成される。
　　 （...続きを読む

他の回答も見る

QとあるExcelファイルを開くと、勝手に同じファイルが２つ開いてしまう

OSはXPで、Excelのバージョンは2003です。

例えば「abc01」というExcelファイルがあるとします。
それをダブルクリックして開くと、同じファイルが２つ開いてしまいます。
（今までそんな事はありませんでした。今日初めてそうなりました。）

と言っても、全く同じ名前のファイルは開けませんので、
「abc01.1」「abc01.2」という名前も勝手に付けられて開きます。
それを閉じると、デスクトップにはやっぱり「abc01」というファイルしかありません。

なぜこんな現象が起きるのでしょうか・・・？
試しに他のExcelファイルを2～3個開いてみましたが、
そんな事は起きませんでした。

例えば「abc01.1」の方でsheet2を表示して、
「abc01.2」の方を見てみるとsheet1のままだったりするので、
連動（？）はしていないようです。
あと「abc01.1」の方をちょっと編集して一旦両方閉じて、
また開くとちゃんと両方編集されていました。
「abc01.1」を編集→上書き保存の時点で「abc01.2」がどうなっているかは見ていません。

職場のパソコンで起きた事で、
今は家から投稿しているので上記の状況以外は書けませんが、
どなたか原因が分かる方、よろしくお願いいたします。
（もしかして明日には普通になっているかも知れませんが・・・）

※次に職場のパソコンを開くのは明日の夜になりますので、
　補足・その後の報告・お礼などは遅くなってしまいます。

OSはXPで、Excelのバージョンは2003です。

例えば「abc01」というExcelファイルがあるとします。
それをダブルクリックして開くと、同じファイルが２つ開いてしまいます。
（今までそんな事はありませんでした。今日初めてそうなりました。）

と言っても、全く同じ名前のファイルは開けませんので、
「abc01.1」「abc01.2」という名前も勝手に付けられて開きます。
それを閉じると、デスクトップにはやっぱり「abc01」というファイルしかありません。

なぜこんな現象が起きるのでしょうか・・・？
...続きを読む

Aベストアンサー

http://oshiete1.goo.ne.jp/qa3816162.html

たぶん、↑と同じ現象です。

他の回答も見る

QNTFS圧縮したファイルを全部まとめて戻す方法

NTFS圧縮したファイルをプロパティからひとつひとつチェックをはずして戻すのではなく、圧縮されたファイルを全部まとめて元に戻す方法ってあるのでしょうか？

Aベストアンサー

圧縮を解除したいファイルを全て選択した状態で
→プロパティ→NTFS圧縮のチェックを外す→OK

それらのファイルがフォルダに入っているなら
フォルダのプロパティからやってもいい。
（サブフォルダにも適用するか尋ねられるからOKにする）

他の回答も見る

QＥｘｃｅｌ2007で新規ファイルを２回開くと使用中のファイルとメッセージが開きます。

Ｅｘｃｅｌ2007を使用しています。エクセルを起動中にデスクトップのエクセルアイコンから起動させると「PERSONAL.XLSBは編集のためロックされています。」というメッセージが表示されます。
今までそんなメッセージが表示されることはなかったのですが、急に表示するようになってしまいました。どーしたらよいのでしょうか？
特にべつのファイルを開いていることはないのですが…

Aベストアンサー

NO1追加
＞PERSONAL.XLSBは編集のためロックされています


一度でもPERSONAL.xlsにマクロを保存すると、マクロを削除してもファイルは残ってしまいますから、削除します。
2つ起動させようとすると、エラー表示されます。
Excelがすでに開いていれば、「ファイル」「新規作成」　またはツールバーの「新規作成」から、新しいブックを呼び出します。
参考URLをご覧ください。

参考URL：http://cgi.fuji.ne.jp/~fj2094/cgi-bin1/exqalounge.cgi?print+200508/05080076.txt

他の回答も見る
ページトップページトップ

Q質問する（無料）

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

人気Q&Aランキング

おすすめ情報