Tag: logging集

在错误退出子和返回错误分为称为错误的子: 一些背景：前体：我在其他error handling问题上查看过，但是我没有能够完全应用我的情况。我觉得像Err.Raise是我将如何完成我将在下面描述。但是，我不知道如何以我需要的方式来实现它。如果我要使用Err.Raise ，我Err.Raise如何退出Sub1-15之前提出的主要子错误代码？话虽如此，我有一个大的Excel VBA项目，执行过多的不同的例程。我select从一个主例程中调用所有例程，以便日后维护各个例程。我有一个On Error处理程序在我的主要子，我想要触发如果在该主例程调用的任何例程中引发错误。有没有办法： logging下发生的错误types 错误信息小组提出了错误在错误退出该子返回到主子，然后引发刚刚在另一个子节点发生的错误，以便调用NotifyandRepair Error Handler？我有以下情况 Sub MainSub() On Error GoTo NotifyandCorrect Call Sub1 Call Sub2 … Call Sub15 Exit Sub NotifyandCorrect: 'Send copy of faulty file, the error code and Sub that caused it 'Then stop macro […]

Excel：删除一列中的重复项，同时在相邻列中保留最高值: 我有一个Excel电子表格有两列。第一列是标签，第二列是数字值。我想删除列“A”中的所有重复标签，并保留在列“B”的最大数值。我试图在下面说明（filter会导致“合并表”给出“原始表”：注1：我试图parsing邮件服务器日志文件，以获取主机及其在特定date的最大SMTP连接的列表。如果你可以build议在Windows上这样做（即使它意味着使用草莓Perl），我会很感激解决scheme。注2：你可能不得不使用你的想象力，下面我画了“电子表格”，我试着把每一行放在一行中，但是所有的行都在一行中渲染。 [编辑]通过将所有内容放在无序列表中修复它。 “原稿” colA，colB name1，32.0， name1，12.5， name1，11.0， name1，10.1， name1，6.9，名称2，2.3， name2，1.1， name2，0.9， name3，54，名称3，60， name3，101， name3，12， “合并表” colA，colB name1，32.0，名称2，2.3， name3，101，问候，emk

如何在VBA中将string读入logging集: 我有一些代码从数据库中读取logging。当我读，logging集variables修改表格值为自己的格式。例如：在数据库中时间值是12345（不是date和时间），但是当logging集读取它时，它来自例如：23-06-2012 10:15:23 我刚刚发现logging集本身就是以自己的格式存储值。 Set rs = CmdSqlData.Execute() 那么有什么办法来定义一个logging集为String ？这是代码。 Dim rs As ADODB.RecordSet Set rs = CmdSqlData.Execute() Do While (rs.EOF = FALSE And rs.BOF = FALSE) p = rs.GetRows(1) cell(1,1) = p(0,0) Loop 任何人都可以让我知道如何读取数据作为string（因为它在数据库中），以便不会发生格式的变化。注意：由于其他要求，我无法转换Excel单元格格式，但我想从string表中读取everthing

M中的开放loggingtypes（Power Query Formula Language）的用途和用法: 我已经阅读了Power Query的M语言的语言规范，并且遇到了开放的loggingtypes，我的理解是开放types允许其他字段，但是我没有对这个意思的具体理解。声明正常（封闭）logging的方法很简单 myRecord = [name = "MyName", Age = 30] 从语言规范（5.4：loggingtypes）： myRecordType1 = type [Name = text, Age = number] // Closed Record _type_ myRecordType2 = type [Name = text, Age = number, …] // Open Record _type_ 然而， myRecord = [Name = "MyName", Age = 30, …] // Not valid code 所以看来这个概念只是关于自定义loggingtypes ，而不是一般的logging，但是我不知道该怎么做。 […]

VBA – 从电子表格的内容创buildADODB.Recordset: 我正在查询SQL数据库的Excel应用程序。查询可能需要很长时间才能运行（20-40分钟）。如果我错误地编码了一些东西，可能需要很长时间才能出错或达到一个中断点。我可以把结果保存到一张纸上，这是我使用logging集的时候可能会炸毁的。有没有办法将数据加载到ADODB.Recordset当我正在debugging跳过查询数据库（第一次后）？我会用这样的东西吗？在MS-Access VBA中查询Excel工作表（使用ADODBlogging集）

将logging集存储为一个类的实例？: 有以下情况。我有几个表单，基本上有几个dropboxes，列表等。我用ms sql db的logging填充他们。但是，是否有一种方法只查询数据库一次，并在应用程序的整个生命周期中将这些logging存储为一个类的实例，而不是每次用户打开表单时都要查询。连接是这样的： Sub connection_test() Dim Cn As ADODB.Connection Dim Rs As ADODB.Recordset Dim stSQL As String stSQL = "SELECT * FROM dbo.Client" Set Cn = New ADODB.Connection With Cn .CursorLocation = adUseClient .Open CONNECTION_STRING .CommandTimeout = 0 Set Rs = .Execute(stSQL) End With Rs.Close Cn.Close Set Rs = Nothing Set Cn […]

Excel错误：删除logging：从/xl/worksheets/sheet10.xml部分sorting: 我几乎可以肯定，我将不得不创build一个新的Excel文件，但也许至less在这里我得到一些想法是什么来源的问题。我的Excel文件不断给出以下错误： Excel在'filename.xlsm'中发现不可读的内容。你想恢复这个工作簿的内容？如果您信任此工作簿的来源，请单击“是”。所以我呢。该文件打开为修复显示：删除logging：从/xl/worksheets/sheet10.xml部分sorting。细节是，我甚至没有一张表10 它是一个完整的自定义对象的大型Excel文件。但我没有数据库连接或自动filter，所以不能与AutoFilter条件使用数组（错误） – 太大的string？或xlsx错误：尝试解决错误时“删除logging：命名范围从/xl/workbook.xml部分” 。任何人都有线索是怎么回事？ tks提前

在VBA中深度复制或克隆ADODBlogging集: 我一直在寻找一种在VBA中复制或复制logging集的方法。而我的意思是，让未确定的数据彼此独立。我努力了 Set copyRS = origRS.Clone Set copyRS = origRS 当我使用任何方法时，我无法修改一个logging集而不修改其他logging集。所以在这个例子中：我创build一个logging集我用John来填充logging集我克隆logging集我修改了克隆的检查结果码： Dim origRS As Recordset, copyRS As Recordset Set origRS = New Recordset 'Create field origRS.Fields.Append "Name", adChar, 10, adFldUpdatable origRS.Open 'Add name origRS.AddNew "Name", "John" 'Clone/copy Set copyRS = origRS.Clone 'Change record in cloned/copied recordset copyRS.MoveFirst […]