oExcel = CREATEOBJECT('Excel.Application') WITH oExcel .Workbooks.Add(-4167) .Visible = .T. * 指定区域的单元格分行合并 .WorkSheets(1).Cells(1, 1).Resize(3, 4).Merge(.T.) .ActiveSheet.Cells(1, 1).Value = "指定区域的单元格分行合并" * 指定区域的单元格合并为一个单元格 .WorkSheets(1).Cells(5, 1).Resize(3, 4).Mer...

oExcel = CREATEOBJECT('Excel.Application') WITH oExcel .Workbooks.Add(-4167) .Visible = .T. .ActiveCell.EntireRow.Cells(5, 1).Value = 5 .Worksheets(1).Columns(6).Hidden = .T. .Worksheets(1).Rows(6).Hidden = .T. ENDWITH

oExcel = CREATEOBJECT('Excel.Application') WITH oExcel .Workbooks.Add(-4167) * 添加测试数据 .ActiveSheet.Cells(2, 2).Value = "abcd" .ActiveSheet.Cells(4, 4).Value = "abcd" .ActiveSheet.Cells(6, 6).Value = "abcd" .ActiveSheet.Cells(100, 10).Value = "ABCD" *删除空白行 lnRow = .ActiveSheet.U...