excel-vba

2热度

4回答

我想选择x行的最后8行（每个月的数量更改），这里有一个线程已经在这里，但只有一列。我需要它为几列，并尝试了两种不同的方式，但都不符合语法。 Sheets("Sheet2").Select LastRow = Range("D" & Rows.Count).End(xlUp).Row Set Last8Rows = Range("A" & LastRow).Offset(-7, 0).Resiz

0热度

3回答

VBA块数据透视表创建

有没有办法编写一个将禁用在工作簿中插入数据透视表的功能的子？

1热度

4回答

使用SQL中的复选框值“IN”--operator

我有一个表单中有几个复选框。勾选复选框的值在包含Excel宏的SQL查询中使用。我在SQL“IN” - 操作符中使用这些值。所以，everythig工作。但我不喜欢我的宏的代码。对于勾选复选框我用这样的代码（如果有更多的价值列表将是非常巨大的）： Public Location1 As String Public Location2 As String Public Location3 As

0热度

4回答

定义使用IF与现有的属性声明

我有一个类的类属性，称为cMilestones我有多个属性设置，有些是Date，有些是Integer和一些String。的问题/挑战：我坚持，我想用Let和Get Property语句，而是使用类（称为CommittedDate和UncommittedDate）的已定义的属性。 PlanDate物业条件： If IsDate(CommittedDate) Then PlanDate = Comm

0热度

1回答

如何在SharePoint上禁用多个Excel文件的只读属性？

我想在位于Sharepoint文件夹上的多个Excel 2016文件上运行VBA代码。问题是这些文件被设置为“锁定以进行编辑”，因此VBA代码在尝试运行时崩溃。那么有没有办法为所有这些文件更改这些属性，以便VBA代码可以成功运行？在此先感谢。

1热度

1回答

从personal.xlsb导出所有模块

我想使用VBA导出/维护/管理我的个人宏工作簿personal.xlsb中模块的文本文件备份。我无法在msdn上找到指向模块本身的对象库。请有人指出我在这个正确的方向吗？使用Excel 2013年

-1热度

1回答

excel vba在新工作表中的多个图表

我有一个问题，准备宏将在工作表中选择3个范围，然后用这些数据创建3张图表的新工作表。我该如何准备？这是我现在所拥有的，但不起作用：ActiveChart.Location Where:="Inwestycje wykresy"被突出显示，并且出现'Type mismatch'错误。我还必须包含图表的尺寸和位置吗？这里是我的代码： Sub InwestycjeWykresy() Range(

0热度

1回答

VBA如何使用StreamReader跳过一行

在VBA中，我必须比较文本文件的两个版本并打印不匹配的行。但是，如果附加（用户指定的）行已添加到更新的文本文件中，则必须忽略此行，并且必须继续比较最近的文本文件中的下一行。文本文件非常大，我无法使用ReadAll属性。到目前为止，我已经假定每个文本文件中的行数都相同，顺序保持不变，因此我只使用第一个文本文件循环遍历所有行。 Dim JsonPrev, JsonCurr As String 'Na

2热度

1回答

传递表要子程序

我试图通过传递一定SHEETNAME作为参数调用一个子程序，但我收到以下错误： Object doesn't support this property or method 这里是我的代码： Public Sub PerformanceLeague() Dim wsPerformanceLeague As Worksheet Set wsPerformanceLeague = Work

0热度

1回答

试图访问同一文件夹中的其他文件，但获取文件夹外的文件

我试图访问与程序相同的文件夹中的所有其他文件，但它想要转到整个目录中的文件。我知道这就是我要说的，但我仍然对vba不熟悉，并且不知道完成我想要的语法。有没有一种方法可以从程序中获取当前文件夹的位置，并让它只通过该文件夹中的所有文件？此外，我需要一个解决方案，不使用Scripting.Object的东西，因为我遇到了需要下载的东西的问题，我觉得不舒服，需要使用这个工具的人下载的东西特别是因为他们将