Move excel sheets

Move excel sheets

Postby César E. Lozada » Wed May 24, 2006 8:44 pm

Hi,

Anybody knows what's the traduction of this macro from VB to xH/FWH?


Sheets("Sheet1").Select
Sheets("Sheet1").Move After:=Sheets(3)


Thanks a lot.
User avatar
César E. Lozada
 
Posts: 128
Joined: Wed Oct 26, 2005 12:18 pm
Location: Los Teques, Miranda, Venezuela

Re: Move excel sheets

Postby Enrico Maria Giordano » Wed May 24, 2006 8:59 pm

César E. Lozada wrote:Hi,

Anybody knows what's the traduction of this macro from VB to xH/FWH?


Sheets("Sheet1").Select
Sheets("Sheet1").Move After:=Sheets(3)


Thanks a lot.


Try

Code: Select all  Expand view  RUN
oExcel:Sheets( "Sheet1" ):Select()
oExcel:Sheets( "Sheet1" ):Move( , oExcel:Sheets( 3 ) )


EMG
User avatar
Enrico Maria Giordano
 
Posts: 8719
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Postby Jeff Barnes » Thu May 25, 2006 10:34 pm

You should also be able to do this:

oSheet := oExcel:Sheets(“oSheet1”)
oExcel:Sheets( "oSheet2” ):Move( oSheet )

This example will move sheet2 infront of sheet1


Jeff
User avatar
Jeff Barnes
 
Posts: 929
Joined: Sun Oct 09, 2005 1:05 pm
Location: Ontario, Canada


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: dutch and 37 guests