Beste Julien,

Op een Calc-blad met Basic een Range kopiëren en elders plakken gaat als volgt:

*Sub KopieerEnPlak*/'voorbeeld kopieer Range A1:C10 en plak op D1:F10) /
  oSheet1 = ThisComponent.Sheets.getByIndex(0) '/= Blad1/

oRangeOrg = oSheet1.getCellRangeByName("A1:C10").RangeAddress '/te kopieeren range/ oRangeCpy = oSheet1.getCellRangeByName("D1:F10").RangeAddress '/te plakken range/

  oCellCpy = oSheet1.getCellByPosition(oRangeCpy.StartColumn,_
  oRangeCpy.StartRow).CellAddress '/maak de kopie/

  oSheet1.CopyRange(oCellCpy, oRangeOrg) '/plak de kopie/
*End Sub*

Met vriendelijke groet,
Willem



Op 08-02-15 om 16:06 schreef Lamont J:
Doe momenteel verwoede pogingen om libre-basic een beetje te verstaan :wil niet 
te best lukken
Heb bvb “introduction to API van internet geplukt
daarin staat pag98 een en ander over move and copy
en een voorbeeld :
Dim Doc As Abject
Dim Sheet As Object
Dim CellRangeAddres As New com.sun.star.table.CellRangeAddress
enz
maar als ik letterlijk hetzelfde ingeef krijg foutmelding “geen toegang tot 
object”
Staat er toch een fout in de handleiding of moet ik nog ergens instellingen 
veranderen ??

De bedoeling is om in basic en bepaalde range waar berekende resultaten in 
staan via een copy/paste/values
ergens op een andere plaats te copiëren
alle suggesties welkom !


--
Unsubscribe instructions: E-mail to [email protected]
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/nl/users/
All messages sent to this list will be publicly archived and cannot be deleted

Antwoord per e-mail aan