<em>jxl</em>如何根据模板sheet生成新的sheet，要求可以在一...-jxl e

1、在电脑桌面里将两个表格都打开，也就是要复制的原EXCEL文件，zhidao还有目标EXCEL文件。

2、打开了之后，在需要复制的Excel中选中工作薄，右键单击鼠标点击移动或复制工作表。专

3、然后在弹出来的选项里面点击工作簿旁边的下拉按钮，选择目标Excel文件。

4、然后在下列选定工作表之前点击需要复制的工作簿，并在属建立副本前面打√，确定就可以了，这样就可以将某个Excel文件中的特定sheet复制到一个另一个Excel文件中去。

亲，在Sheet名称上点击右键，选择“移动或复制”，勾选下面的“建立副本”，确定。

 

'下面代码把c:\1.xls中Sheet1工作表的内容拷贝到另外一个新建工作表中，并保存为“c:\2.xls”

Private Sub Command1_Click()
Dim S() As String, i As Integer, j As Integer
Dim xlApp
Dim xlBook
Dim xlSheet
Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象
xlApp.DisplayAlerts = False '不显示对话框
Set xlBook = xlApp.Workbooks.open("c:\1.xls") '打开已经存在的EXCEL工件簿文件
xlApp.Visible = True '设置EXCEL对象可见（或不可见）
Set xlSheet = xlBook.Worksheets("Sheet1") '设置活动工作表
xlSheet.Cells.Select
xlSheet.Cells.Copy
xlApp.Workbooks.Add
xlApp.ActiveSheet.Paste
xlApp.Application.CutCopyMode = False
xlApp.ActiveWorkbook.SaveAs FileName:="c:\2.xls" '保存工作表,结束时一定别忘了保存
xlBook.Close (True) '关闭工作簿 这里的True表示退7a686964616fe4b893e5b19e333出时保存修改
xlApp.Quit '结束EXCEL对象
Set xlApp = Nothing '释放xlApp对象
End Sub

public class Test {

	public static void main(String[] args) {
		try {
			InputStream fis = new FileInputStream("c:/test.xls");
			Workbook wb = Workbook.getWorkbook(fis);
			WritableWorkbook newWb = Workbook.createWorkbook(new File(
					"c:/newTest.xls"), wb);
			newWb.importSheet("NewSheet", 0, wb.getSheet(0));
			fis.close();
			wb.close();
			newWb.write();
			newWb.close();
		}catch (BiffException e) {e.printStackTrace();} 
		 catch (IOException e) {e.printStackTrace();} 
		 catch (WriteException e) {e.printStackTrace();}
	}
}

建议用poi，jxl不支持office2007格式，

而且有的时候如果模板里有不支持的内容，

会提示，文件显示文件错误，可能某些格式丢失的情况，但并不影响使用

哪怕你安装的是2007，另存的时候是也选择的是2003格式，也可能会有这个提示的

原因未知，可能是兼容性的问题，另存为就又好了e799bee5baa6e58685e5aeb9366