[#39106] What processor do you run ruby on? — "K.Sasada" <ko1@...>

 ささだです。

13 messages 2004/02/09
[#39200] Re: What processor do you run ruby on? — "K.Sasada" <ko1@...> 2004/02/17

"K.Sasada" <ko1@namikilab.tuat.ac.jp> wrote :

[#39207] Re: What processor do you run ruby on? — Isamu KOZUKA <kozuka@...> 2004/02/17

小塚@しなきゃならないテストがいっぱいだ〜....です。

[#39129] InternetExplorer ってインターフェースとして使える? — Shin-ichiro HARA <sinara@...>

原です。

34 messages 2004/02/10
[#39130] Re: InternetExplorer ってインターフェースとして使える? — Yac <yac@...> 2004/02/10

岡です。

[#39136] Re: InternetExplorer ってインターフェースとして使える? — Yac <yac@...> 2004/02/10

岡です。

[#39140] Re: InternetExplorer ってインターフェースとして使える? — arton <artonx@...> 2004/02/11

artonです。別件。

[#39144] Re: InternetExplorer ってインターフェースとして使える? — Shin-ichiro HARA <sinara@...> 2004/02/12

原です。

[#39145] Re: InternetExplorer ってインターフェースとして使える? — arton <artonx@...> 2004/02/12

artonです。

[#39146] Re: InternetExplorer ってインターフェースとして使える? — nobu.nakada@... 2004/02/12

なかだです。

[#39147] Re: InternetExplorer ってインターフェースとして使える? — arton <artonx@...> 2004/02/12

artonです。

[#39150] Re: InternetExplorer ってインターフェースとして使える? — nobu.nakada@... 2004/02/12

なかだです。

[#39151] Re: InternetExplorer ってインターフェースとして使える? — arton <artonx@...> 2004/02/12

artonです。

[#39275] DnD on win32 — Shinichiro HIDA <shinichiro@...>

飛田と申します。

21 messages 2004/02/26
[#39276] Re: DnD on win32 — たむらけんいち <sgs02516@...> 2004/02/26

たむらです。

[#39277] Re: DnD on win32 — Shinichiro HIDA <shinichiro@...> 2004/02/27

飛田です。

[#39278] Re: DnD on win32 — Itou-T15@... 2004/02/27

[#39288] 固有値、固有ベクトルの計算 — Masahiro Sato <msato@...>

19 messages 2004/02/27

[ruby-list:39203] Re: WORD Graph のデータシートにデータを貼り付けようとしています

From: Kazuhiro Yoshida <moriq@...>
Date: 2004-02-17 11:07:29 UTC
List: ruby-list #39203
もりきゅうです。

Hideyuki Oya <h_oya@k7.dion.ne.jp> wrote:
> Apolloを使っているのですが、サンプルを示していただければものすごく助かる
> のですが...

[ruby-list:39193]伊藤T15さんのコードを翻訳するとこんな感じでしょうか。
c:/原紙.doc は存在して、事前にグラフを挿入しているとします。
とりあえず動くようです。

require 'win32ole'
application = WIN32OLE.new('Word.Application')

application.visible = TRUE
document = application.Documents.Open("c:/原紙.doc")

# http://www.geocities.co.jp/SiliconValley-SanJose/9156/wordconst.rb.html
wdOLEVerbPrimary = 0

document.InlineShapes.each do |shp|
  format = shp.OLEFormat
  if format.ProgID == "MSGraph.Chart.8"
    format.DoVerb("VerbIndex" => wdOLEVerbPrimary)  # データシートが開く
    format.Activate  # データシートは見えなくても値はマクロで入る
    obj = format.Object
    obj.Parent.DataSheet.Cells(3, 3).Value = 1
  end
end

なお、Apollo固有の話題は ap-list@freeml.com へどうぞ。

----
YOSHIDA Kazuhiro  moriq@moriq.com  http://www.moriq.com/

In This Thread

Prev Next