Le forum (ô combien francophone) des utilisateurs de Powerbuilder.
Pages: 1
Est-ce possible de mettre certaines informations d'une table dans un fichier excel à des endroits bien précis de la feuille (exemple : pour faire une fiche de paye, ect...)?
Merci d'avance
Hors ligne
j'ai trouvé ca comme exemple :
// Connection to Excel objects OLEObject lo_Excel OLEObject lo_Sheet OLEObject lo_Workbook // Hookup to the Excel Document lo_Excel = CREATE OLEObject li_Result = lo_Excel.ConnectToNewObject ( "excel.application" ) IF li_Result < 0 THEN ...error handling goes here END IF // Open the excel file lo_Excel.Application.Workbooks.Open ( ls_destination ) lo_Workbook = lo_Excel.Application.ActiveWorkbook lo_Sheet = lo_Excel.Application.ActiveSheet // Move in the various header stuff that we know about lo_Sheet.Range("Q3").Value = ls_Month lo_Sheet.Range("T3").Value = ls_Year lo_Sheet.Range("AD2").Value = ls_Timebase lo_Sheet.Range("AG2").Value = ls_Workgroup lo_Sheet.Range("AJ2").Value = ls_Cbid lo_Sheet.Range("A7").Value = ls_Firstname lo_Sheet.Range("M7").Value = ls_Lastname lo_Sheet.Range("AD7").Value = ls_PositionNumber IF NOT IsNull ( is_NineEightEighty ) THEN lo_Sheet.Range("AH4").Value = "x" lo_Sheet.Range("AJ16").Value = is_NineEightEighty lo_Sheet.Range("AK17").Value = string ( li_Hours, '000' ) ELSE lo_Sheet.Range("AJ16").Value = "" END IF lo_Workbook.Save() lo_Workbook.Close() lo_Excel.Application.Quit lo_Excel.DisconnectObject()
Hors ligne
Merci beaucoup...
Dernière modification par poche (11-01-2007 02:06:21)
Hors ligne
Et ben poche, ta nuit a été courte ?
Hors ligne
peut etre des poches dans les yeux ?
Hors ligne
des poches sous les yeux, c'est moins douloureux...
Hors ligne
Pages: 1