Top > OOobbs3 > 88

** [[OOobbs3/88]] [#y9399528]
-''サマリ'': セルの範囲のコピーで、コピーが数式でなく数式の結果をコピーしたい
-''環境'': Basic
-''状態'': 未解決
-''状態'': 解決
-''投稿者'': [[クロッピ]]
-''投稿日'': 2012-03-28 (水) 18:26:44

*** 質問 [#sec4b6a0]
calcでセルの範囲をコピーするのをマクロで実行していますが、下記のコードを流用して作成しました。コピーの結果、コピー元の数式がコピーされます、このコードで数式によって得られた結果(文字や数字)でコピーしたいのですがどの様にしたら出来るのでしょうか?

以下参考にさせて頂いたコードです。

 Sub cellrange_1
 Dim oDoc As Object, oSheet As Object
 Dim aCellAddress As New com.sun.star.table.CellAddress
 Dim aCellRangeAddress As New   com.sun.star.table.CellRangeAddress
 
   oDoc = ThisComponent
   oSheet = oDoc.Sheets(0)
   With aCellAddress
     .Sheet = 1
     .Column = 5
     .Row = 5
   End With
   With aCellRangeAddress
      .Sheet = 0
      .StartColumn = 0
      .EndColumn = 3
      .StartRow = 0
     .EndRow = 3
   End With
   oSheet.copyRange( aCellAddress, aCellRangeAddress )
 End Sub
*** 回答 [#zfd5f6da]
- マクロの記録でコピーして形式を選択して貼り付けるのが普通です。そうでなければ、getDataArray などを利用します。 -- はにゃ? &new{2012-03-28 (水) 22:40:25};
- 了解しました。いつもありがとうございます! -- クロッピ &new{2012-03-29 (木) 09:11:40};

#comment


*** 感想,コメント,メモ [#le00852f]

#comment

Reload   New Lower page making Edit Freeze Diff Upload Copy Rename   Front page List of pages Search Recent changes Backup   Help   RSS of recent changes