Beste Julien,
Op een Calc-blad met Basic een Range kopiëren en elders plakken *kan
ook* als volgt:
*Sub KopieerEnPlak* 'voorbeeld kopieer Range A1:C10 en plak op D1:F10)
Sheet1 = ThisComponent.Sheets.getByIndex(0) '= Blad1
RangeOrg = Sheet1.getCellRangeByName("A1:C10").RangeAddress 'te
kopieeren range
RangeCpy = Sheet1.getCellRangeByName("D1:F10").RangeAddress 'te
plakken range
CellCpy = Sheet1.getCellByPosition(RangeCpy.StartColumn,_
RangeCpy.StartRow).CellAddress 'maak de kopie
Sheet1.CopyRange(CellCpy, RangeOrg) '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
