Bugzilla – Attachment 104003 Details for
Bug 76552
Massive memory leak in <sheet>.moveRange (only) when called after <sheets>.insertNewByName
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
Code of the macro found in previous attachment
code.bas (text/plain), 691 bytes, created by
Roman Polach
on 2014-08-04 15:32:25 UTC
(
hide
)
Description:
Code of the macro found in previous attachment
Filename:
MIME Type:
Creator:
Roman Polach
Created:
2014-08-04 15:32:25 UTC
Size:
691 bytes
patch
obsolete
>REM ***** BASIC ***** > >Public Sub RunMe() > Dim PS As Object, c As Integer > Dim YSh As Object, YShId As Integer > Dim Crng As New com.sun.star.table.CellRangeAddress > Dim Pcl As New com.sun.star.table.CellAddress > > Set PS = ThisComponent.getSheets() > Set YSh = PS.getByName("A") > For c = 0 to 77 > PS.insertNewByName("i" + CStr(c), 0) > Next c > YShId = YSh.getRangeAddress().sheet > For c = 0 to 66 > Crng.Sheet = YShId > Crng.StartColumn = c > Crng.StartRow = 19 > Crng.EndColumn = c > Crng.EndRow = 19 > Pcl.Sheet = YShId > Pcl.Column = c > Pcl.Row = 29 > YSh.moveRange(Pcl, Crng) > Next c > MsgBox ("Macro finished.") >End Sub > >
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Raw
Actions:
View
Attachments on
bug 76552
:
96285
| 104003 |
104072