Top > OOobbs3 > 88

OOobbs3/88 Edit

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

質問 Edit

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

回答 Edit

  • マクロの記録でコピーして形式を選択して貼り付けるのが普通です。そうでなければ、getDataArray などを利用します。 -- はにゃ? 2012-03-28 (水) 22:40:25
  • 了解しました。いつもありがとうございます! -- クロッピ 2012-03-29 (木) 09:11:40

感想,コメント,メモ Edit



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