Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Keywords: Excel Paste Special Cell OLE pastespecial
1 and 3 work ok, but the =NOW() function looks a little funky. You might try recording a new macro copy/paste special by hand, then go in and edit the macro and see what VBA has to say...
; Start excel here excelxls = objectopen("Excel.Application") excelxls.visible = @true rptxls = excelxls.workbooks rptxls.add actSheet = excelxls.activesheet xlsvalues = "77;=now();=11+22+33" for y = 1 to 3 val = itemextract(y, xlsvalues, ";") cells = actSheet.cells(y, 1) cells.value = val next xlFormulas = -4123 for y = 1 to 3 cells = actSheet.cells(y, 1) cells.copy newcell = actSheet.cells(y, 3) newcell.PasteSpecial(::Paste=xlFormulas) next exit
Article ID: W14692
Filename: Excel Paste Special.txt
File Created: 2000:10:10:10:38:16
Last Updated: 2000:10:10:10:38:16