Ciao a tutti!
come posso impostare la proprietà di allineamento testo di una cella excel?
Sono riuscito a modificare i bordi ma non riesco a trovare la proprietà dell'allineamento (sinistra, destra, centro)...
![]()
Ciaoooooo!
Ciao a tutti!
come posso impostare la proprietà di allineamento testo di una cella excel?
Sono riuscito a modificare i bordi ma non riesco a trovare la proprietà dell'allineamento (sinistra, destra, centro)...
![]()
Ciaoooooo!
ciao
non capisco bene?
e' una domanda riferita a excel o a delphi?
se e' riferita a excel allora puoi farlo dal menu Formato/Cella/Allineamento....
se riferito a delphi... penso che devi indicare il componente che stai utilizzando....
prova a postare un po di codice
ciao![]()
Consulta la Guida in linea di VBA accessibile da Excel lavorando nell'ambiente di sviluppo integrato e verifica quale proprietà rappresenta ciò che vuoi modificare; da Delphi, potrai accedere a tale proprietà allo stesso modo usando l'oggetto "wrapper" che identifica il corrispondente oggetto COM su cui lavori in Excel.Originariamente inviato da alanf1981
come posso impostare la proprietà di allineamento testo di una cella excel?
Ciao!![]()
MARCO BREVEGLIERI
Software and Web Developer, Teacher and Consultant
Home | Blog | Delphi Podcast | Twitch | Altro...
Ce l'ho fatta!!!
Metto il mio codice, magari può servire a qualcuno :
var XLWB : ExcelWorkbook;
XLWS1 : ExcelWorkSheet;
ExcelApplication1 : TExcelApplication;
sheet2, range : variant;
const
LCID : DWORD = LOCALE_SYSTEM_DEFAULT;
ExcelApplication1 := TExcelApplication.Create(nil);
ExcelApplication1.Connect;
ExcelApplication1.Visible[0] := false;
ExcelApplication1.Workbooks.Open(fileDaAprire, Null, Null, Null, Null, Null, Null, Null,
Null, Null, Null, Null, Null, Null, Null, 0);
XLWB := ExcelApplication1.ActiveWorkbook as ExcelWorkbook;
XLWS1 := ExcelApplication1.Sheets[1] as ExcelWorkSheet;
XLWS1.Activate(LCID);
Sheet2 := ExcelApplication1.ActiveSheet;
sheet2.cells[riga, 2].Borders.LineStyle := xlContinuous;
sheet2.cells[riga, 2].HorizontalAlignment := XlHAlignCenter;
XLWB.Save(LCID);
ExcelApplication1.Workbooks.Close(0);
ExcelApplication1.Quit;
ExcelApplication1.Disconnect;
ExcelApplication1.Free;
Ciaooooo![]()