- ベストアンサー
EXCELのリンクが消えません
Excel2000をwindows98SEで使用しています あるブックの他ブックへのリンクがどうしても消えません。 当然参照式は全てチェック、名前も全て消しました。 最後の手段で既存のワークシートを全て削除してもなお リンクが残っています。 そのブックを開くときにリンクの更新のダイヤログが開かなくなったので、実質的にはリンクは切れているとは思いますが 編集-リンクの設定をみるとやはりリンクが残っているのでやはり気になります。 他にチェックするところがあるのでしょうか? よろしくお願いします。
- みんなの回答 (4)
- 専門家の回答
質問者が選んだベストアンサー
次の操作すると一発で他ブック参照が、解除されると思います。 ・ いずれかのシート名タブを右クリックして「コードの表示」を指定し、 開いたコードウィンドウに下記コードをコピーして貼り付けます。 ・ 貼り付けたコード内(1行目とか)にカーソルがある状態で、F5キーを押します。 ・ これで、他ブック参照が全て解除になりますので、今貼り付けたコードを全て削除 してから、右上の×で閉じ、シートに戻ります。 これで完了です。 これで如何でしょうか? Sub 他ブック参照解除() Dim Sh As Worksheet Dim Rng As Range Dim First As String For Each Sh In Worksheets Set Rng = Sh.Cells.Find(".xls]") If Not Rng Is Nothing Then Do Rng.Formula = "" Set Rng = Sh.Cells.FindNext Loop Until Rng Is Nothing End If Next Sh Worksheets(1).Activate End Sub
その他の回答 (3)
- mshr1962
- ベストアンサー率39% (7417/18945)
#1のmshr1962です。 >他のパソコンのExcel2002でこのブックを開いたところリンクが消えていました。 次のファイルとフォルダを確認してください。 Perasonal.xls:個人用のマクロブックです。 Excel.xlb:ツールバーのユーザー設定の保存ファイル XLStartフォルダ:Excel起動時に読み込まれる個人設定のファイルを保存するフォルダ 上記に他ファイルへのリンクがあるのかもしれません。 ファイルがあったら削除してみてください。
お礼
ありがとうございました Perasonal.xls、XLStartフォルダにはリンクは見当たりません。Excel.xlbは何をみればよいのでしょうか。 マイクロソフトの技術情報にファイルの一部に異常がある場合があるとの記述がありましたので、それかもしれません。
- snoopy64
- ベストアンサー率42% (337/793)
MS技術情報です。 http://support.microsoft.com/default.aspx?scid=kb;ja;402643&Product=xlw2kINT すでに対応済みでしたらごめんなさい。 頑張ってくださいヽ(^。^)ノ
お礼
ありがとうございました MS技術情報大変参考になりましたが 残念ながら解決しませんでした 御礼が遅くなってすみませんでした
- mshr1962
- ベストアンサー率39% (7417/18945)
「挿入」「名前」「定義」の中は確認しましたか? 外部ファイルの範囲を名前付けしている可能性があります。 後は外部リンクしたシートが非表示になっている。 「書式」「シート」で「再表示」が選択できるなら非表示のシートがあります。
補足
さっそくありがとうございました。 マイクロソフトの技術情報見ましたが、該当しないようです。名前-定義、非表示シートも再度確認しましたが関係ないようです。 他のパソコンのExcel2002でこのブックを開いたところリンクが消えていました。保存して元のExcel2000で開くとリンクが残っています。 また、新規ブックに問題のブックのシートを(どれでも)コピーすると、コピー先のブックに問題のリンクも一緒に移動しています。 よろしくお願いします。
補足
ありがとうございました 試してみましたが、ダメでした マクロはよくわからないのですが、コードを見る限りワークシートに上の「.xls」を含む数式を探し出してそれらを削除するようなマクロのようですね 今回のケースでは、試しに元のブックに新規シートを挿入し元のシートを全て削除し、新規シートのみを残してリンク式が入っているセルは絶対無いはずの状態にしてもリンクが消えないので別の原因(ファイル異常?)だと思います。