Method to take data into excel template

[KhairilSyahrin]

is there a way to take data from msflexgrid and put it into a ready made excel file(meaning some boxes in excel is already filled)? And it is put into some specific place in the Excel template.

Data from MSFlexGrid-->Excel Template.

Thank you.

[AndreRet]

Yes it is possible.

Firstly by copying and pasting using only code. Look at this link -

http://sunxran.wordpress.com/2007/12/15/transferring-data-from-msflexgrid-to-ms-excel-ms-vb-60/

Or, by adding the data to certain cells and columns etc -

http://www.freevbcode.com/ShowCode.Asp?ID=1112

[KhairilSyahrin]

I have put up the coding that i did in this thread.

If you can, please mend or at least tell me what is wrong. Much appreciated.

[KhairilSyahrin]

Thanks for the link. By the way, all of the links that you gave me were to put the data into a new excel when i wanted to put it into an existing excel. Is there a specific line of coding where it will put data directly into the existing excel? I just need that. Thank you for being patient with me.

[AndreRet]

Yes, there is. Firstly you need to find out if the excell sheet is open or not. Unfortunately in vb6, it only checks for the LAST workbookthat has been opened. If there is more than one workbook open, it will only read the last open. Once you have determined that the workbook is open, activate it and add the data to the sheet -

Dim MaximiseExcel As Excel.Application

On Error Resume Next

Set MaximiseExcel = GetObject(, "Excel.Application" 'Do not forget the comma ',' after the first bracket!!)

'All code to add to workbook here.
'ExcelOpen.ActiveWindow.Caption can be used to determine that you will be adding the data to the correct workbook as well.

MaximiseExcel.WindowState = xlMaximized 'Only use this to show the workbook once all the data has been added.

The "GetObject" can be used for ALL MS office applications.

I hope this helps.

[KhairilSyahrin]

can you tell me what's wrong with this code? It kept saying "User defined type not defined"

Public objExcel As Excel.Application

[AndreRet]

You need to go to 'References' and select Microsoft Excel object library 11 (or whatever version you have). This will then define the object in code.

[KhairilSyahrin]

Thnks Andre! thanks for all you assisted me.

[AndreRet]

Only a pleasure.