Tag: excel 2003

运行macros后隐藏行“取消隐藏”: 我有一个工作表，其中行2是隐藏的。一个macros粘贴到这一行。每当我运行这个macros，隐藏的行重新出现。有没有办法防止行重新出现？这是我的代码，它仍然是取消隐藏第2行 Sub Update2029（） Dim LSearchRow As Integer Dim LCopyToRow As Integer Dim LSearchValue As String On Error GoTo Err_Execute Application.ScreenUpdating = False LSearchValue = InputBox("Please enter a serial number to search for.", "Enter value") 'Start search in row 5 LSearchRow = 5 'Start copying data to row 2 in "Master" (row […]

如何连接数百个单元格的string？: 我正在尝试将来自各种单元格的句子合并到一个单元格中。例： A1 – “你好” A2 – “如何” A3 – “你” A4 – =合并（A1：A3）—->“你好吗” 我知道这个技巧： =A1 & " " & A2…..但是我有700个单元格组合成一个单元格，这种方法看起来很野蛮。如果有内置函数，那将是理想的。我不介意VBA的答案，只要答案是非常详细的从如何打开VBA开始，因为我不知道VBA。

如何编辑我的Excel下拉列表？: 如何编辑我的Excel下拉列表？我去了数据 – >validation – >设置，在那里我发现值= Attribute_Brands。我需要做些什么来编辑这个？

Excel Vba：创build新工作表时执行事件或macros: 我正尝试在用户创build新工作表时在特定列上创build一个下拉列表。下拉列表作为模板存在于隐藏工作表中，需要在特定列上创build新工作表时填充。 1）我想应该有一些事件需要触发创build新的表格和书房调用macros 2）macros将使用值列表填充特定列中的每个单元格有人可以指导我如何做到这一点….

Excelmacros：如何复制3个工作表中的所有行并合并第一列中唯一的行？: 工作表中有数百行， A列为账号， B列为账户说明， C列为总计。我想复制所有3个工作表中的行到一个单一的第四个工作表，但重复的帐户号码被find，我想那里只有一个与汇总到该行C列的总和和额外删除，如下所示：来自工作表的input（所有工作表都在一个.xls文件中）：工作簿的工作表1 ABC 1 abc-123 Project Costs 1,548.33 2 abc-321 Housing Expenses 250 3 abc-567 Helicopter Rides 11,386.91 工作簿的工作表2 ABC 1 abc-123 Project Costs 1,260.95 2 abc-321 Housing Expenses 125 3 abc-567 Helicopter Rides 59,605.48 工作簿的工作表3 ABC 1 abc-123 Project Costs 1,785.48 2 abc-321 Housing Expenses 354 3 def-345 Elephant […]

如何实例化一个已命名的Excel.Application对象，以便在意外之后进行后置macros垃圾回收: 我是一个相对的VBA新手，devise一个相当复杂的macros，可以运行10秒到10分钟之间的任何东西，它的大部分工作在Dim appDatabaseInstance = New Excel.Application创build的Excel的另一个不可见实例中。在代码执行过程中有很多函数和子程序被使用，尽pipe我已经尽了最大的努力来确保在任何半可预测性出错的情况下调用appDatabaseInstance.Quit ，但有一件事我无法控制- 用户。具体来说，如果用户决定程序崩溃并且存在转义，VBA将会中断执行，并且由于发生了这个中断，我的垃圾收集例程（我认为）都不会发生。因此，如果我能以某种可预测的方式命名我创build的实例，然后在创build新实例之前尝试find一个现有的实例并进行适当的处理，我会更加快乐。这样，即使一个不幸的应用程序实例被打开，一旦用户尝试涉及程序的其他任何事情（如果不是这样，那么一个实例不太可能在上下文中引起太多的麻烦），它将被closures。有没有人有什么build议？

运行时错误'1004'：select范围类失败的VBA 2003的方法: 我正试图从一张表复制一列到另一张。我使用的代码是一个录制的macros，它工作正常，直到我连接到一个button。当我这样做，它会给出一个“运行时错误'1004'：select范围类的方法失败” 这是代码，我可以看到没有错。当我点击debugging时，突出显示第二行。 Sheets("Count").Select Columns("C:C").Select Selection.Copy Sheets("Add Invintory").Select Range("b1").Select ActiveSheet.Paste Sheets("Count").Select Sheets("Count").Columns("A:A").Select Columns("A:A").Select Selection.Copy Sheets("Add Invintory").Select Range("A1").Select ActiveSheet.Paste 我不知道问题是什么。请帮忙

一个工作簿中的macros是否可以更改另一个工作簿？: 我在一个工作表（internal.xls）中定义了一个macros Public Sub sheet2test() Workbooks.Open Filename:="external.xls" Windows("external.xls").Activate Sheets("Sheet3").Activate Range("A5").Value = 5 End Sub 运行这个代码，打开external.xls，并激活它的表3.然而，5的值被放在internal.xls而不是external.xls。我如何确保对其他工作表进行更改？

VBA有一个子运行另一个子: 如何运行存储在另一个工作表模块中的子？ worksheet1 sub endDay() 'something here end sub worksheet2 sub reCalc() 'something here end sub 我想recalc能够自己运行，但我想能够按下“endDay”button，让它做它的事情，然后预先形成“recalc”在结束而不是按下，然后去sheet2按另一个。有人可以给我一个样本，所以我可以有一个想法从哪里开始？

在Excel 2003中的代码错误: 我有一个与Excel 2007运行绝对好的代码，但它没有与Excel 2003运行。它给“complie错误”，这条线变成红色。 Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ 你的build议会有很大的帮助。谢谢。如果你需要我的信息，请告诉我。这是我的完整代码： '————————————- ' Create Final Report '————————————- Sub FinalReport() Dim thisWb As Workbook Set thisWb = ActiveWorkbook Dim btn, rght As Long Dim NewWbk As String NewWbk = "Final_Report" ' Add a new workbook Application.Workbooks.Add Range("A1").Select ' Rename the workbook ActiveWorkbook.SaveAs Filename:=thisWb.Path & Application.PathSeparator […]