HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2009
1201
まさきExcelの他のデータへのリンク設定の変更について1未解決


まさき

リンク

2009/12/1(Tue) 23:44:05|NO.29109

開こうとするブックが、他のデータソースへリンクされているとき、
一度、リンクを更新しないでをブック開き、
リンクの設定を「メッセージを表示しないでリンクの自動更新も行わない」状態で
ブックを保存するプログラムを作りたいのですが、どなたかご教授お願いします。

エクセルVBAでは、
1.リンクの更新を行わないでブックを開くときは、UpdateLinks:=0
2.メッセージを表示しないで自動更新も行わない設定は
ActiveWorkbook.UpdateLinks = xlUpdateLinksNever
を使用してますが、HSPでどの様に行ったら良いか分かりません。

いろいろ参照しまして、リンクされていないブックを「開く」事と「保存」する事は、
出来る様になりました。リンクされているブックを開こうとすると、更新するか、しないの
メッセージが表示してしまいます。 

xlsname = "book1.xls"
xlspass = "D:\\TEST\\"
xlsfname = xlspass+xlsname

newcom xlApp, "Excel.Application"
xlApp("Visible") = 0 ; Excelウィンドウは非表示
xlApp("DisplayAlerts") = 0 ; 警告メッセージを表示させない
xlBooks = xlApp("Workbooks") ; Workbooks コレクション取得
xlBooks->"Open" xlsfname ; 指定ファイルを開く
xlBook = xlBooks("Item",xlsname) ; book取得
xlSheet = xlBook("Worksheets","sheet1") ; Sheet取得

xlBook->"save" : delcom xlBook
xlBooks->"Close" : delcom xlBooks
xlApp->"Quit" : delcom xlApp

dialog"終了しました。"
end



この記事に返信する


KA

リンク

2009/12/2(Wed) 13:30:05|NO.29111

どんな状況で、どうしてそうしたいのか、良く分かりません?

そういうファイルが大量に有るのでしょうか?

リンク先をどうにかした方が、速いのでは?

バイナリレベルで書き換えた方が、手っ取り速いです。
(出来るかどうかは不明)



ONION software Copyright 1997-2023(c) All rights reserved.