Tag: 工作表

Excel复制工作表

在Excel VBA中(或者如果您可以在C#中使用.NET的Excels对象库),如何将工作表从一个工作簿复制到另一个工作簿中的另一个工作表。 基本上,我正在做的是将我的每一张表复制到另一个工作簿中的中央工作表中,然后在那里做所有我需要做的事情。 我尝试使用Range.Copy方法,我给目标参数作为其他工作簿的范围。 它工作完美,但有一个问题,那就是每次我复制它replace该工作表中的旧数据。 我怎么做这样的事情,当我把它粘贴到工作表的最后。 编辑:我search,并find了一种方式,但现在当我复制单元格时,我得到一个COMexception与消息“要将Excel工作表中的所有单元格粘贴到当前的工作表中,您必须粘贴到第一个单元格(A1或R1C1) “。 以下是代码,它是在C# logWorksheet = logWorkbook.ActiveSheet as Excel.Worksheet; Excel.Range tempRange = logWorksheet.Cells[logWorksheet.Rows.Count, "A"] as Excel.Range; tempRange = tempRange.get_End(Excel.XlDirection.xlUp); int emptyRow; if (tempRange.Row > 1) emptyRow = tempRange.Row + 1; else emptyRow = tempRange.Row; string copyLocationAddress = Convert.ToString(emptyRow); Excel.Range copyLocation = logWorksheet.get_Range( "A" + copyLocationAddress, Type.Missing) as Excel.Range; // copy […]

EXCEL 2007 – 需要帮助创build一个button,它将活动工作表的内容粘贴到一个新的工作表中

我在这个网站searchfind我的问题的答案和大多数相关的解决scheme是一个更复杂的问题。 这是我需要做的。 我在Excel 2007中创build了一个简单的表单。我正在寻找在表单底部添加一个button的function,允许用户单击该button并将该工作表复制到同一个Excel文档中的新工作表中。 基本上只是复制活动工作表。 我试图用macros来做,但没有得到所需的结果,我们大多数的同事仍然使用Excel 2003,所以我不确定macros是否可以在老版本的Excel中工作。 我不知道任何VBA,这就是为什么我来这里寻求所有你的帮助。 所以回顾一下。 一张表单文件,一个简单的表单和一个命令button在活动工作表的底部 将该工作表的命令button“复制并粘贴”到同一个Excel文档中的新工作表中 如果可能的话,这个解决scheme可以在Excel 2003和2007中使用。 如果不是,则为2007年。 任何愿意帮助新手Excel用户的人都会提前感谢您。

是否有可能将HTML文档转换为Excel与多个工作表/选项卡?

我知道我们可以通过pipe道发送普通的HTML文件,并让浏览器打开它们作为Excel文档(通过更改http头和文件名,然后excel进行转换)。 但是,是否有可能得到一个HTML文档在Excel中显示两个工作表/选项卡? 以下是我认为可能的工作,但没有完成工作: <html> <body> <table> …. </table> <hr class='pageBreak' /> <= I thought perhaps this would divide stuff up <table> …. </table> <body> </html> 有工作表选项卡或某种types的名称空间我可以添加到HTML以创build多个工作表? 编辑只要好奇,如果任何人有任何想法…: – / (我使用的是Ruby,所以如果你知道一个将HTML标签转换成某种Excel工作表对象的库,那也可以)

如何使用Spreadsheet gem在Ruby中创build新的电子表格工作表?

特别是我想要做的是添加新的工作表旁边已经有。 我试过使用book.create_worksheet :name => 'new_sheet'但它覆盖了以前的工作表。 我在这里search了这个网站,看到一些人使用了不同的gem,允许“book.add_worksheet”(电子表格gem应该支持其他的gem,就好像它应该像1gem中的3个gem一样)这几乎工作,但我得到错误undefined method 'workbook=' for "new_sheet":String (NoMethodError)时,执行line sheet = book.add_worksheet("new_sheet") 。 我试过的另一件事是sheet = Spreadsheet::Worksheet.new ,我在Spreadsheet ruby​​forge页面上看到有公共类方法new(opts={}) ,如果您单击以查看代码,则包含行@name = opts[:name] || Worksheet @name = opts[:name] || Worksheet导致我相信我应该能够使用这个来创build和命名一个新的工作表,但我无法弄清楚正确的语法。 我正在尝试什么? 看来我正在接近,但我没有完全击中它。

将一个Excel表格中的列镜像到其他多个Excel表格中,并自动更新

我有一个Excel工作簿,其中包含多个工作表。 为了这个问题,这些图纸被命名为Sheet1,Sheet2,Sheet3等等。 我希望将Sheet1中的Column A复制到其余的表单中,并且当新单元格添加到Sheet1中的A列时,它们将自动input到工作簿中的其他表单中。 我宁愿不要有一套“结束范围,即:A100000”。 例如,如果我在Sheet1的单元格A1中inputFirst,则单词“First”现在也应出现在Sheet2的单元格A1中。 我已经使用了下面的代码,它似乎不工作。 任何帮助将不胜感激。 Private Sub Worksheet_Change(ByVal Target As Range) Call UpdateFromSheet1 End Sub Sub UpdateFromSheet1(ByVal Sh As Object, ByVal Target As Range) If Sh.CodeName = "Sheet1" Then If Not Intersect(Target(1, 1), Range("A1:A1000")) Is Nothing Then Sh.Range("A1:A1000").Copy Sheet2.Range("A1") End If End If End Sub

在工作表2的Excel中设置标题

我有一些问题,为我的工作表2设置标题 这是我的代码: Excel.Application xlApp1 = new Excel.Application(); Excel.Workbook xlWorkBook; Excel.Worksheet xlWorkSheet1 = new Excel.Worksheet(); Excel.Worksheet xlWorkSheet2 = new Excel.Worksheet(); object misValue = System.Reflection.Missing.Value; xlWorkBook = xlApp1.Workbooks.Add(misValue); xlWorkSheet1 = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1); // Sheet1 xlWorkSheet1.Name = "XX"; xlWorkSheet2 = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(2); // Sheet2 xlWorkSheet2.Name = "YY"; Excel.Range headerRange = xlApp1.get_Range("A1", "V1"); headerRange.HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter; for (int i = 1; […]

VBA:从服务器获取/下载Excel文件并将内容复制到新的工作表中

由于某些原因,下面的macros将不起作用: Sub ExtractDataTest() Dim FilePath$, Row&, Column&, Address$ 'change constants & FilePath below to suit '*************************************** Const FileName$ = "Dxo.xlsx" Const SheetName$ = "Open" Const NumRows& = 50 Const NumColumns& = 20 FilePath = ("http://enhanced1.sharepoint.hx.com/teams/") '*************************************** DoEvents Application.ScreenUpdating = False If Dir(FilePath & FileName) = Empty Then MsgBox "The file " & FileName & " […]

如何使用VB.NET检查Excel工作表名称中的特定文本? (这个代码有什么错误?)

我想实现以下, 我有一个包含不同名称的工作表的Excel文件。 一些表被命名为A1,A2,B1,B2,C1,C2等 如果工作表名称包含“A”,则将A3:A70导出到另一个名为“range.xlsx”的工作簿 如果工作表名称包含“B”,则将范围B3:B70导出到“range.xlsx” 如果工作表名称包含“C”,则将范围C3:C70导出到“range.xlsx” 任何帮助将非常感激。 这是我试过的: 创build了一个表格名单,并通过这个列表循环做我想做的事情。 谢谢

允许用户更改表单名称,VSTO

这与我的问题类似,但我的解决方法dosn't没有帮助这些实例和原因是更多的定义。 我有一个工作簿级别定制,将从保留复制的工作表的名称的文件夹添加工作表。这工作正常,并不会导致任何问题,除非用户重命名工作表。 如果用户重命名工作表,保存工作簿,然后回到它,然后尝试执行引用工作簿或工作表,他们得到错误的任何操作: Microsoft.VisualStudio.Tools.Applications.Runtime.ControlNotFoundException: This document might not function as expected because the following control is missing: Sheet5. Data that relies on this control will not be automatically displayed or updated, and other custom functionality will not be available. Contact your administrator or the author of this document for further assistance. —> System.Runtime.InteropServices.COMException: Programmatic access […]

用于从外部工作表更新工作簿的Excel vba代码

又一个工作表复制问题! 这是一个简单的问题,让我难住。 我想单击一个命令button(在action.xlsm)重新填充一个单独的Excel文件(inventory.xlsx)范围内的值(“股票” – 2列和可能100行 – 这是主库存logging)从活动工作表(在action.xlsm中)的已命名范围(“newInventory” – 与其他命名范围的大小相同)中删除原始“库存”值减去缺货项目的值。 计算是好的我只是不能让主库存文件来更新。 我已经检查了一堆论坛,并尝试了两种方法无济于事。 我努力了: Private Sub CommandButton1_Click() Dim InventoryFileName As String InventoryFileName = "C:\Users\david\Documents\inventory.xlsx" Workbooks(InventoryFileName).Worksheets("Sheet1").Range("stock") = ThisWorkbook.Worksheets("inventory").Range("newInventory").Value Workbooks(InventoryFileName).Save End Sub 在第4行抛出“运行时错误”9:“下标超出范围”。我也尝试过: Private Sub CommandButton1_Click() Dim wbTarget As Workbook 'workbook where the data is to be pasted Dim wsTarget As Worksheet Dim wbThis As Workbook 'workbook from where […]