Tag: debugging

一段代码只按预期运行多次: 目前我正在debugging一段代码。目前我的代码按预期工作，它将date分配给finaldatevariables，然后在代码中查找以删除高于finaldatevariables的所有date。唯一的问题是子程序需要多次运行才能生效。例如，当我运行一次，它删除了大约一半的date，再次运行它，它也是这样，我通常F5大约5次，以确认它的完整。虽然这是很好的debugging，我需要知道这将会完美的每一次。 Sub Remove_Unecessary_Data_1() Dim ALLCs As Worksheet Dim DS As Worksheet Dim finaldate As Date Set DS = Sheets("Data Summary") Set ALLCs = Sheets("Asset LLC (Input)") ALLCs.Select For y = 1 To 40 If InStr(1, Cells(13, y), "Timestamp of Execution") Then finaldate = ALLCs.Cells(50, y) End If Next ALLCs.Select For u […]

如何在C ++ / Excel环境中生成有用的debugging信息: 在许多银行中，人们使用大多数用C ++编程的各种插件来计算各种风险和价值。我的问题是：考虑使用内部Excel插件的Excel环境来完成大部分工作。有没有debugging信息的格式，你会build议产生有用的debugging信息，这是可读的，避免我们的开发人员系统地使用Visual Studio来debugging代码？目前，我所做的是在我的代码中，生成包含中间计算的.csv文件，其格式可读。这些文件具有代号，例如Risk-1-Stock-2012-08-13_8h33m00.csv，它们是随时生成的，也可以在临时文件夹中生成。问题在于，虽然它符合我的目的，但似乎不够灵活，无法被其他人使用，而其他一些人在同一个类似的function项目中也有自己的实现。也许这里有人有一个“银弹”，这将使标准和可读格式的报告debugging信息更容易？

通过Microsoft Visual Basic 6.0debuggingExcelmacros: 我有执行各种Excelmacros的VB6代码。我在VB6和Excelmacros中设置断点，然后在VB6应用程序中开始debugging。当它到达（断点）执行macros的语句时，它跳过命令并继续遍历VB6代码。我期待它跳转到Excel，并开始debuggingExcelmacros。是否有一些configuration或技巧，debugging从VB6应用程序正在调用的Excelmacros？

将单元格从一个工作簿复制到另一个工作簿，但是在运行时不工作: 我正在编写一个从活动工作簿（订单）抓取特定单元格的子工具，打开指定的工作簿（报表），并按特定顺序删除这些值。奇怪的是，这工作得很好，当通过，我可以看到报告工作簿打开和值填充，但运行时打开工作簿，但似乎并没有改变它。代码如下（有点粗糙和准备好，我还在学习…） Sub TransferTheData() Dim mySheet As Worksheet, myOtherSheet As Worksheet Dim myOtherBook As Workbook Dim i As Integer, j As Integer Dim vToday As String Set myOtherBook = Workbooks.Open("c:\\Test\Test Report.xlsx") Set mySheet = ThisWorkbook.Sheets("Order Form") Set myOtherSheet = myOtherBook.Sheets("Sheet1") vToday = Format(Date, "dd/mmmm/yyyy") j = myOtherSheet.Range("A" & Rows.Count).End(xlUp).Row + 1 For i = […]

在当前范围内重复声明: 我正在使用下面的代码来打开一个文件，将复制和粘贴数据，但是我得到一个编译错误 Duplicate declaration in current scope 当它给出编译错误时，突出显示wb为工作簿行。 Sub Test() Dim wb As Workbook Dim wksht As Worksheet Dim rng As Range Set wksht = Sheets("CBS001") Set rng = wksht.Range("A5") If Not IsEmpty(rng.Offset(1, 0)) Then Set rng = Range(rng.End(xlDown).Offset(0, 14), rng.Offset(1, 0)) Selection.Copy Set wb = Workbooks.Open(Filename:="H:\Finance\CBF\Invoices\Monthly Invoicing Summary\" & Format(Now, "yyyy") & "\ASM\" & Format(DateSerial(Year(Now), […]

是否有可能获得Excel工作表函数的调用堆栈？: 我试图debugging有外部加载项，意外崩溃而没有警告的工作簿（窗口只是消失和进程死亡）。有什么办法，我可以loggingfunction调用，擅长计算，以便我可以看到最后的Excel（或VBA）函数调用之前调用？

Visual Studio 2015 Exceldebugging器不工作: 几个星期前，我的Visual Studio 2015 exceldebugging刚刚停止工作，这让我疯狂。所以，这是问题，我创build一个空的Excelfunction区，没有逻辑，只是存根，我打debuggingbutton。 VS开始excel，并加载下面的exceptionpopup：托pipedebugging助手“FatalExecutionEngineError”在“C：\ Program Files \ Microsoft Office 15 \ root \ Office15 \ excel.exe”中检测到问题。其他信息：运行时遇到致命错误。错误的地址是0x73921620，线程0x1674。错误代码是0xc0000005。这个错误可能是CLR中的错误，也可能是用户代码中不安全或不可validation的部分。这个bug的常见来源包括COM-interop或PInvoke的用户编组错误，这可能会破坏堆栈。由于我正在使用我工作的笔记本电脑，我的猜测是，办公室更新已经安装，并打破了VS，但我无能为力。我已经重新安装VS并更新到最新版本。如果我没有debugging设置启动function区，它工作得很好。我正在使用Office 15.0.4797.1003和VS 14.0.25123.00更新2 你们有什么想法吗？

visual studio在debugging模式下附加到进程: 我有一个奇怪的问题。我build立的DLL（让我们称之为my.dll）在Visual Studio 2010中使用第三方库（称为tp.lib），反过来调用第三方DLL（说tp.dll）。 debuggingprupose我有在configuration属性 – >debugging – >命令：Excel.exe和configuration属性 – >debugging – > commandArguments：“$（TargetPath）” 在我的电脑中，我也设置PATHvariables到tp.dll所在的目录现在，当我在Visual Studio中打开F5时，excel打开了my.dll并崩溃，给我一个“无法在dos模式下打开”的错误。发生这种情况的原因是部署了my.dll的debugging版本时未部署tp.dll。当我打开Excel的实例单独和手动删除my.dll的debugging版本，然后一切工作正常，我可以看到我写my.dll中的所有函数唯一的问题是现在我不知道如何debugging，因为我不知道如何将视觉工作室附加到Excel的实例，我打开了分开。我的问题是： 1>如何将Visual Studio附加到已经打开的Excel实例要么 2>我怎样才能打开F5，并仍然使Excel从PATHvariables中指定的目录中拿起所需的tp.dll，然后开始部署my.dll。这两个中的任何一个都将允许我为了debugging的目的而逐步完成代码。提前致谢。

EXCEL DEBUG Formula“=: 我想弄清楚如何在下面列出的两种情况下使用语法。有一个单元格的公式='1a'！L21，要求我打开一个文件，我不知道为什么。当我select相同的Excel文件和工作表时，我得到#REF！错误。我试图用它来使用If语句如下： =IF((E8-'1a'!E8)>0,E8-'1a'!E8,0)

获取debugging错误“未find单元格”: 我试图改变一些现有的代码，以适应插入两行。代码看起来很合理，但它一直给我debugging错误没有find单元格。代码有一个1英寸的偏移值，它工作正常。一旦我添加了两行，我将Offset值更改为3 ，但之后开始给我一个debugging错误。在两行之前： With Sheets("Main") .Range("A1").CurrentRegion.AutoFilter field:=5, Criteria1:="SC Link" .Range("A1").CurrentRegion.Offset(1).SpecialCells _ (xlCellTypeVisible).EntireRow.Delete .Range("A1").CurrentRegion.AutoFilter End With 两行加法之后： With Sheets("Main") .Range("A1").CurrentRegion.AutoFilter field:=5, Criteria1:="SC Link" .Range("A1").CurrentRegion.Offset(3).SpecialCells _ (xlCellTypeVisible).EntireRow.Delete .Range("A1").CurrentRegion.AutoFilter End With 有没有人看到我不？