プログラミング質問広場 |
本掲示板は、プログラミングに関する情報を作者様同士で共有・議論していただく場として用意いたしました。 JV-Link、JV-Dataに直接関連しない(一般論としてのプログラミング方法やAPI・メソッドの利用法などの)スレッドはこちらに立ててください。
|
|
タイトル | : JVRSSでExcelのセルを明示的に更新 |
記事No | : 14 |
投稿日 | : 2007/10/04(Thu) 21:24 |
投稿者 | : JRA-VANソフトサポート |
|
JRA-VANソフトサポートです。
JV-Link 質問箱 No.2747に関連するサンプルソースです。
【JVRSSのExcelのセルの値を明示的に更新】 ActiveWorkbook.UpdateLinkメソッドを利用して、アクティブシート内のすべて のリンクソースについてJVRSSのデータベースの値に更新します。 ※実行にはJRA-VAN JVRSSのインストールが必要です。
【ソース】
Sub sample() Dim aLinks As Variant Dim i As Integer 'シート内のすべてのリンクソースを取得 aLinks = ActiveWorkbook.LinkSources(xlOLELinks) If Not IsEmpty(aLinks) Then '画面更新を無効化 Application.ScreenUpdating = False For i = 1 To UBound(aLinks) 'リンクソースの値を更新 ActiveWorkbook.UpdateLink Name:=aLinks(i), Type:=xlOLELinks Next i '画面更新を有効化 Application.ScreenUpdating = True End If
End Sub |
|
タイトル | : Re: JVRSSでExcelのセルを明示的に更新 |
記事No | : 123 |
投稿日 | : 2009/06/04(Thu) 15:31 |
投稿者 | : INO |
|
JVRSSのことで、新たにご質問なのですが、 お許し下さい。
JVRSSは、エクセルのセルに =JVRSS|'0011112'!RA競走条件 など入力して データをよ呼び出すようになっていますが、 これを、VBAで呼び出すやり方はないのでしょうか?
たくさんセルに入力すると、更新が重くなってしまうので、 情報を更新したいときのみ、ボタンなどを押すと、 VBAでデーターベースから引っ張ってセルに入力できないか 考えています。 |
|
|
|
copyright ©2007 JRA SYSTEM SERVICE CO.,LTD. All Rights Reserved.
|
|
|