Excel AddCommend

[MarcoBoschi]

Hi,
If I add a comment to a cell is it possible to determine the dimension
of the dialog containing toe commens istelf?
Directrly from code...
Bye

Code: Select all | Expand

#include "fivewin.ch"
#define crlf CHR(13) + CHR(10)

FUNCTION MAIN()
   LOCAL oExcel, oAs

   oExcel := CREATEOBJECT( "Excel.Application" )
   oExcel:Workbooks:Add()
   oAs := oExcel:Activesheet()

   oAs:Range( "A1" ):Value := "Simple comment"
   oAs:Range( "A1" ):AddComment( "FiveTech Software tech support forums" )
   oAs:Range( "A1" ):Comment:visible := .F.


   oExcel:visible := .T.

RETURN NIL

[MarcoBoschi]

This is the solution:

oAs:Range( "A1" ):Comment:Shape:Textframe:Autosize := .T.

[Gale FORd]

Don't forget, you can record macro in excel and do what you want. Then go back and see what the commands are to perform action.

[MarcoBoschi]

ok!