请问如何将一个Excel文件中的一个Sheet的内容拷贝到另一个Excel中的一个Sheet中(不是以覆盖形式而是以Append形式)?顶者有分!

leq_82 2007-01-31 10:25:49

我想将a.xls(Excel文件)中的Sheet1中内容拷贝到b.xls(Excel文件)的Sheet1中,并且不能覆盖b.xls的Sheet1中的内容,而是附加在b.xls的Sheet1中原有内容的后面,请问该怎么做?

我是这样做的:
Dim sheetResult As Excel.Worksheet
Dim bookResult As Excel.Workbook = excelApp.Workbooks.Open("D:\\UsefulValue.xls")
sheetResult = bookResult.Worksheets.Item(1)
sheetResult.UsedRange.Copy("A"+(wSheet.UsedRange.Rows.Count+1).ToString)
bookResult.Close(Excel.XlSaveAction.xlSaveChanges)
bookResult = Nothing

结果是只把sheetResult中的文字考进去了,但sheetResult中的图片并没有被拷贝进去,麻烦大家帮我看看该怎么做,问题出在哪里.如果大家大家知道哪里有这方面的例子麻烦告诉我,谢谢!

...全文

1575 5 打赏收藏转发到动态举报

写回复

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

liuxingzilian 2007-02-08

打赏
举报

回复

图片当然贴不进去了
图片是独立的chartobject，你复制单元格中的数据并不能复制到图片
我也是前段时间用程序控制图片移动的时候才知道的
你这样该怎么做你自己再想想哈

水如烟 2007-01-31

打赏
举报

回复

那只能对相应Range进行处理.
Cells(i,j).Value =Cells(i,j).Value & " " & value

farrio 2007-01-31

打赏
举报

回复

在Range.PasteSpecial函数里面有参数，表示了你Paste什么东西，是Value，还是Cell Format，还是Number Format等等。你可以看看这个函数的参数就知道了。问题不是你Copy了什么，而是你Paste了什么。

枫舞秋山 2007-01-31

打赏
举报

回复

ding

leq_82 2007-01-31

打赏
举报

回复

不知道怎么回事,sheet中的图片就是贴不进去

【前言】工作或学习中可能需要实现基于VC读\写Excel文件的功能，本人最近也遇到了该问题。中间虽经波折，但是最终还是找到了解决问题的办法。在此跟大家分享，希望对跟我同样迷茫过的同学们有所帮助。 1、程序功能 1）打开一个excel文件; 2）显示到CListCtrl上; 3）新建一个Excel文件。以上均在对话框中实现。 2、平台 VC++2010 3、实现方法常用的Excel打开方式有两种 1）通过数据库打开; 2）OLE方式打开。由于方式1）操作繁琐，经常出现莫名的错误，这里选用方式2）. 4、准备步骤首先新建一个Dialog窗体程序，添加list control和两个按钮 1）将ExcelLib文件夹拷贝到程序目录下； 2）将Export2Excel.h，Export2Excel.cpp两个文件添加到项目； 3）包含头文件，#include "ExcelLib/Export2Excel.h" 通过以上步骤在程序中引入了可以读取Excle文件的CExport2Excel类； 5、打开excel文件通过按钮点击打开 void CExcelTestDlg::OnBnClickedButtonOpenExcel() { //获取文件路径 CFileDialog* lpszOpenFile; CString szGetName; lpszOpenFile = new CFileDialog(TRUE,"","",OFN_FILEMUSTEXIST|OFN_HIDEREADONLY,"Excel File(*.xlsx;*.xls)|*.xls;*.xlsx",NULL); if (lpszOpenFile->DoModal()==IDOK) { szGetName = lpszOpenFile->GetPathName(); SetWindowText(szGetName); delete lpszOpenFile; } else return; //打开文件 //文件中包含多个sheet时，默认打开第一个sheet CExport2Excel Excel_example; Excel_example.OpenExcel(szGetName); //获取sheet个数 int iSheetNum = Excel_example.GetSheetsNumber(); //获取已使用表格行列数 int iRows = Excel_example.GetRowCount(); int iCols = Excel_example.GetColCount(); //获取单元格的内容 CString cs_temp = Excel_example.GetText(1,1); //AfxMessageBox(cs_temp); //List control上显示 //获取工作表列名（第一行） CStringArray m_HeadName; m_HeadName.Add(_T("ID")); for (int i=1;iGetItemCount()>0) { m_list.DeleteColumn(0); } //初始化ClistCtrl，加入列名 InitList(m_list,m_HeadName); //填入内容 //第一行是标题，所以从第2行开始 CString num; int pos; for (int row = 2;row<=iRows; row++) { pos = m_list.GetItemCount(); num.Format(_T("%d"),pos +1); m_list.InsertItem(pos,num); for (int colum=1;columDoModal()==IDOK) { szGetName = lpszOpenFile->GetPathName(); SetWindowText(szGetName); delete lpszOpenFile; } else return; //文件全名称 CString csFileName = szGetName; //需要添加的两个sheet的名称 CString csSheetName = "newSheet"; CString csSheetName2 = "newSheet2"; // 新建一个excel文件，自己写入文字 CExport2Excel Excel_example; //新建excel文件 Excel_example.CreateExcel(csFileName); //添加sheet,新加的sheet在前，也就是序号为1 Excel_example.CreateSheet(csSheetName); Excel_example.CreateSheet(csSheetName2); //操作最开始添加的sheet:(newSheet) Excel_example.SetSheet(2); //添加表头 Excel_example.WriteHeader(1,"第一列"); Excel_example.WriteHeader(2,"第二列"); //添加核心数据 Excel_example.WriteData(1,1,"数据1"); Excel_example.WriteData(1,2,"数据2"); //保存文件 Excel_example.Save(); //关闭文件 Excel_example.Close(); } 7、注意事项 1)一般单个Excel文件包含多个sheet,程序默认打开第一个； 2)指定操作sheet，使用Excel_example.SetSheet(2)函数; 3）打开文件时最左侧的sheet序号为1，新建excel时最新添加的sheet序号为1. 【后记】本程序主要基于网络CSDN中---“Excel封装库V2.0”---完成，下载地址是：http://download.csdn.net/detail/yeah2000/3576494，在此表示感谢！同时， 1）在其基础上作了小改动，改正了几个小错误，添加了几个小接口； 2）添加了如何使用的例子，原程序是没有的； 3）详细的注释发现不足之处，还请大家多多指教！

excel文件合并 / 多个excel sheet复制到一个新的excel

public class CopyExcelSheetToAnotherExcelSheet {public static void main(String[] args) throws FileNotFoundException, IOException {String fromPath = "D:\\share\\jiemu_new\\";// excel存放路径String toPath =...

public class CopyExcelSheetToAnotherExcelSheet { 　 public static void main(String[] args) throws FileNotFoundException, IOException { 　　 String fromPath = "D:\\share\\jiemu_new\\";// excel存放路径 ...

/ 这里应该是复制sheet的逻辑，但EasyExcel没有直接提供复制sheet的API。// 这里应该读取原始sheet中的数据，然后写入到新的sheet中。// 由于不知道原始sheet的内容类型，这里无法给出具体的实现。// 假设原始sheet中存储的是某种类型的对象列表。// 因此，需要手动复制sheet中的每一行。// 读取完成后，开始写入到新的Excel。// 创建新的Excel写入器。// 创建sheet写入器。// 读取原始Excel的sheet。// 要复制的sheet的名字。

16,721

社区成员

110,527

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章