To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=111471
                 Issue #|111471
                 Summary|calc, record macro, cells with function written manual
                        |ly not recorded
               Component|Spreadsheet
                 Version|OOo 3.2
                Platform|PC
                     URL|
              OS/Version|All
                  Status|UNCONFIRMED
       Status whiteboard|
                Keywords|
              Resolution|
              Issue type|DEFECT
                Priority|P2
            Subcomponent|programming
             Assigned to|spreadsheet
             Reported by|lcn





------- Additional comments from [email protected] Sat May  8 06:37:44 +0000 
2010 -------
In calc, when record macro, cells with function written manually not recorded.

Tested with OOo 3.1.1 french, 3.2 french and US, on windows 2000 french, windows
XP french, and windows 7 64 bits french.


Steps to reproduce :
0. Open OOo calc.
1. Run the macro recorder. Select menu « Tools » → « Macros » → « Record Macro 
».
2. In cell $B$1, write : =ACOS(0.5), press keyboard « Enter ». It results 1.05.
3. In cell $C$1, select menu « Insert » → « Function… » ; in « Functions »,
select ACOS ; in « number » , write 0.5 ; click « OK ». It results 1.05.
4. Stop the macro recorder. In the window « Macro record » (an ugly small
window), click « Stop Recording », window « OpenOffice.org Basic Macros » 
appears.
5. Save the macro. In window « OpenOffice.org Basic Macros » ; select «
OpenOffice.org Macros » → « Untitled 1 » ; Click « Save ». Window « New Module »
appears with name « Module1 » ; click « OK ».
6. Delete all values in the sheet. With keyboard, Ctrl+a, Del ; window « Select
Contents » appears ; click « Delete all » ; click « OK ».
7. Click anywhere in the sheet.
8. Run the macro. Select menu « Tools » → « Macros » → « Organize Macros » → «
OpenOffice.org Basic… » ; window « OpenOffice.org Basic Macros » appears ;
select « Untitled 1 » → « Standard »  → « Module1 » ; in right-pane, name « Main
» appears ; click « Run ».


Actual results :
In cell $C$1, value 1.05 appears.
No value in cell $B$1.


Expected results :
In cell $C$1, value 1.05 appears.
In cell $B$1, value 1.05 appears.


Note :
Display the source of the macro. Select menu « Tools » → « Macros » → « Organize
Macros » → « OpenOffice.org Basic… » ; window « OpenOffice.org Basic Macros »
appears ; select « Untitled 1 » → « Standard »  → « Module1 » ; in right-pane,
name « Main » appears ; click « Edit ».

In the source, there is no action recorded in cell $B$1.


sub Main
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "ToPoint"
args1(0).Value = "$B$1"

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:JumpToNextCell", "", 0, Array())

rem ----------------------------------------------------------------------
dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "ToPoint"
args3(0).Value = "$C$1"

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args3())

rem ----------------------------------------------------------------------
dim args4(0) as new com.sun.star.beans.PropertyValue
args4(0).Name = "StringName"
args4(0).Value = "=ACOS(0,5)"

dispatcher.executeDispatch(document, ".uno:EnterString", "", 0, args4())


end sub

---------------------------------------------------------------------
Please do not reply to this automatically generated notification from
Issue Tracker. Please log onto the website and enter your comments.
http://qa.openoffice.org/issue_handling/project_issues.html#notification

---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]


---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to