Home » Developer & Programmer » Forms » Merge Cell in excel is not working (forms 6i)
Merge Cell in excel is not working [message #395366] Wed, 01 April 2009 03:59 Go to next message
mm_kanish05
Messages: 487
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
Re: Merge Cell in excel is not working [message #395578 is a reply to message #395366] Wed, 01 April 2009 22:50 Go to previous message
mm_kanish05
Messages: 487
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
Previous Topic: Storing images into database using Oracle Forms
Next Topic: Convert into jarfile
Goto Forum:
  


Current Time: Thu Dec 08 16:38:27 CST 2016

Total time taken to generate the page: 0.06910 seconds