OraFAQ Forum: Forms » Merge Cell in excel is not working

Home » Developer & Programmer » Forms » Merge Cell in excel is not working (forms 6i)

Show: Today's Messages :: Polls :: Message Navigator
E-mail to friend

Merge Cell in excel is not working [message #395366]

Wed, 01 April 2009 03:59

mm_kanish05
Messages: 493
Registered: January 2007
Location: Chennai

Senior Member

Hi,
i am doing some excel work, the following code is not working

 Procedure MergeCells (Rstarting number,Rending number,Cstarting number,Cending number) is
  Begin
  	   arg := ole2.create_arglist;
       ole2.add_arg(arg,Cstarting||':'||Cending); 
       ccol := ole2.get_obj_property(worksheet, 'Columns', arg);
       ole2.destroy_arglist(arg);

      arg := ole2.create_arglist;
      ole2.add_arg(arg,Rstarting||':'||Rending); 
      rrow := ole2.get_obj_property(ccol, 'Rows', arg);
      ole2.destroy_arglist(arg);
      ole2.invoke(rrow, 'Merge');

  End;

the point where i am getting error;

ccol := ole2.get_obj_property(worksheet, 'Columns', arg);

when i fix as static value in procedure it working fine like below

 ole2.add_arg(arg,'1:5');

Please help in this

kanish

Report message to a moderator

Re: Merge Cell in excel is not working [message #395578 is a reply to message #395366]

Wed, 01 April 2009 22:50

mm_kanish05
Messages: 493
Registered: January 2007
Location: Chennai

Senior Member

I solved this issue.

Previously when i call the prcedure.

     Mergecells(1,1,1,4);

Now i am using

Mergecells(1,1,'A','D');

kanish

Report message to a moderator

Previous Topic:	Storing images into database using Oracle Forms
Next Topic:	Convert into jarfile

Goto Forum:

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

]

Current Time: Mon Feb 03 21:04:54 CST 2025