脚本使用vb查找特定文件夹下excel中的行数
script to find number of rows in excel under a particular folder using vb

我需要找出文件夹下每个Excel工作表中的行数.Google搜索显示以下脚本有效..但是对vb知之甚少,我无法解决它。脚本......

特定工作表值范围的循环图更改
Loop Chart Changes for Range of Specific Worksheet Values

以下代码删除图表中的线段。 我想重复运行它来获取一行值而不是$ A $ 1的单个值:使用Sheet1.ChartObjects(“图表1”)。图表....

VBA:从过滤器中检索数据并将其存储在变量中
VBA: Retrieve data from a filter and store it in a variable

我在列标题“Area”上有一个过滤器,当应用时,它只显示区域与应用的过滤器匹配的记录,例如5.是否有一段代码存储来自...的值

使用vba动态命名Excel范围
Dynamic Naming of Range of Excel using vba

我有两个变量:a = 5 b = 8我想定义一个范围,如'Activeworksheet.Range(a,b).select selection.copy Activeworksheet.Range((a + 1),(b + a))。select selection.paste`这可以......

以编程方式从Excel数据创建[邮件合并] PowerPoint幻灯片
Programmatically create [Mail Merge] PowerPoint slides from Excel data

使用Powerpoint 2010 for Mac。 我有一个需要每周创建的100张幻灯片演示文稿。 每张幻灯片都有相同的模板。 每张幻灯片上的元素由5个文本字段和一张图片组成,......

如何在黑色上下指向三角形VBA的语言中分配颜色?
How can assign the color at black Up-Down pointing triangle VBA's language?

我有这个文本用vba的语言,我必须编辑插入黑色向上/向下指向三角形,具体取决于数据是增加还是减少。范围(“F5”)。FormulaR1C1 =“= IF(...

VBA类型不匹配(条件编译)
VBA Type Mismatch (Conditional Compiling)

我的Dim语句不起作用:有一个错误mesasge:编译错误:类型不匹配我有条件地编译一个VBA宏,它使用了很多代数,很多数字和很多文件,......

Excel VBA代码在中断模式下工作正常,在运行时跳过
Excel VBA code works fine in break mode, skips in runtime

上次我在这里询问解决方案是一种待遇:)。 我的代码选择工作表,根据它们设置变量,然后调用一系列函数对它们进行计算。 我做 ...

在Excel中按颜色计数单元格
Count cells by their color in Excel

这个问题很简单:如何根据给定列中有多少个红色X来更新Excel中的总数量。 这对我来说太复杂了:我做了......

EXCEL VBA:如何提高此代码的速度
EXCEL VBA: how to increase the speed of this code

这段代码有效。 由于它有太多的循环,循环内循环,这非常缓慢。 我们怎样才能提高这个程序的速度? 我试图将范围从一个文件复制到另一个文件...

编译错误:预期:=
Compile error: Expected: =

在Sub DateDiff Public Sub TabPaint(ss As Integer,cc As Integer)中使用Sheets(ss)实现Sub TabPaint时出现错误.Tab .Color = cc .TintAndShade = 0 End With End ...

查找并突出显示可变范围中的最不常见的事件
Find and Highlight Least Common Occurrence(s) in Variable Range

我有一个具有可变范围的代码,每列中有许多类别用于显示数据。 我需要将最不常见的值突出显示为细胞总数的百分比。 如果......

让宏按钮与任何excel文件中的工作没有我写宏的打开文件
Let button with macro work in any excel file without open file where I wrote macro

我有一个代码,它可以帮助我在单元格中插入一些关键字,并设置一些打印参数。 每天我都有许多新文件,我必须这样做。 我在excel面板上用宏做了一个按钮,...

Excel VBA单元格引用
Excel VBA cell referencing

我对以下代码变得非常沮丧:范围(“H”和LastRow + 1)。选择NewRow = LastRow + 1 ActiveCell.FormulaR1C1 =“= C3R”&NewRow&“* C8R”&NewRow我保持...

Excel VBA删除空单元格并向上移动内容
Excel VBA delete empty cells and move contents up

我有这样的数据:xxxxx xxxxx xxxxx xxxxx xxxxx xxxxx xxxxx xxxxx我想编写一个宏来从上到下遍历每一列,剪切并粘贴单元格。 ...

保存从Excel中的范围导出到Word并在单元格A1中另存为名称
Save export from range in excel to Word and save as name in Cell A1

我现在使用excel中的宏将一系列单元格导出到Word中。 虽然有一些变化,但我需要将其复制到一个新的Word文档而不是现有的...

如何在找到新值之前继续新创建的变量的值?
How do i continue the value of a newly created variable until a new value is found?

我目前正在使用Excel 2003并且有一个问题但是如果不显示图片则无法制定。 不幸的是,在我有10个声誉(?)之前,我不能这样做。 我会把它描述成......

创建excel文件的备份
Create backup of excel file

目前,当我打开我的xlsm文件时,它将标题中的名称更改为testing.xlsx,并在桌面上创建一个备份文件,这不是我想要做的。 我想要的只是打开xlsm ......

有条件地移动列
Conditionally moving columns

我有一系列我正在跟踪的拨款,其中一行是“状态”,可以是“有效”或“无效”。 当状态更改为“非活动”时,我希望该列为......

将格式化为日期的范围转换为文本
Convert range formatted as date to text

我有日期格式的单元格范围,格式为dd.mm.yyyy,如下所示:05.10.1993 05.10.1993 05.10.1993 05.10.1993我想使用VBA将此范围的单元格转换为文本格式,但没有...

无法获取工作表函数类的平均属性
Unable to get the average property of the worksheetfunction class

嗨,我正在尝试编写vba来帮助我将每日数据转换为每周数据。 我写了这个vba但是说无法获得工作表类的平均属性。 是否有人可以提供帮助......

根据列值将行复制到新工作簿上
Copy rows onto new workbook based on column value

我正在动态创建一个新的工作簿,并想知道如果满足某些条件,你如何复制数据,即在这种情况下,如果主要联系人=约翰和主要设备=桌面然后......

Azure检索空白记录集
Azure retrieves a blank record set

我目前正在尝试从Azure托管数据库中检索Excel中的记录集。 它检索正确的记录数,但将其作为选项卡写出 - 而不是正确的数据。 我可以 ...

行号的两列匹配
Two-column match for row number

我一直在使用一个强力的代码行进行两列匹配,看起来像这样:对于K = 1到TPrice.ListRows.Count如果TPrice.DataBodyRange(K,2).Value = str3和TPrice .. ..

当项目是数字时,收集功能无法收集唯一项目?
Collection function fails to gather unique items when the item is a Number?

我正在使用以下Collection脚本来处理每一列。 我为4列使用了相同的脚本,它完美地运行。 但是,1列只填充数值...

Excel VBA:根据条形图在条形图中着色栏时出错
Excel VBA: Error in colouring the bar in barchart according to their value

我有一个包含许多系列的图表。 并且我想要将图表中的所有条形图(所有系列)用红色(如果它具有值<100)和绿色(如果它具有值> = 100)。 我的代码是Private Sub ...

没有id VBA的网页抓取
Web scraping without id VBA

我正在尝试刮网,有些元素很容易搞定。 但我对那些没有这样的身份证的人有一个问题。 <TABLE class = DisplayMain1 cellSpacing = 1 cellPadding = 0> <TBODY> <...

自动过滤器不返回任何内容,只是将值复制到新电子表格中
Autofilter returns nothing but values are copied to new spreadsheet

我遇到了以下过滤器的问题。 当自动过滤器没有返回任何内容(即没有结果)时,它似乎将所有内容复制到生成的新电子表格中。 我怎么能阻止......

Outlook VBA 2013:自动保存附件
Outlook VBA 2013 : Automating Saving of Attachments

我正在使用以下代码将电子邮件照片保存到特定文件夹:Private Sub saveAttachtoDisk(itm As Outlook.MailItem)Dim objAtt As Outlook.Attachment Dim saveFolder As String saveFolder =“...

删除所有单元格,如果不是AZ
Delete All Cells if not A-Z

我正在处理6列数据(AF)行2-4379,并且大量单元格在过滤器列中显示为“空白”,但不是真正的空白,因为它们似乎在其中包含空格。 我曾是 ...

升级到Office 2013后出现对象所需的错误
Object Required Error after upgrading to Office 2013

我有以下子项复制传递到PowerPoint幻灯片的图表。 它用于从Excel电子表格中的图表和数据构建PowerPoint卡片组。 这段代码在Excel中运行得很好......

在没有轮询的情况下接收VBA中文件创建的通知
Receive notification of file creation in VBA without polling

我正在编写一个与ScanSnap扫描仪集成的程序。 ScanSnap扫描仪不支持TWAIN。 扫描文档后,它会自动保存为PDF。 我想要监控......

Eomonth在Excel中
Eomonth in Excel

如何在用户定义的函数中使用此函数? 我只是不能引用一个单元格。 函数SONxMonth()SONxMonth = EOMONTH(A1,0)+ 1 End Func

VBA Excel:如何将不同类型的一个参数传递给函数(或将Int / String转换为Range)?
VBA Excel: How to pass one parameter of different types to a function (or cast Int/String to Range)?

我正在Excel中编写一些VBA函数来计算字值和交叉输入的总和。 我将输入作为公共函数cross_sum(myRange As Range)作为整数传递给他们,以便他们采取...

使用VBA,如何访问连接字符串的Source Data属性?
Using VBA, How do I access the Source Data property of the connection string?

我有一个到SQL服务器的ODBC连接。 我需要返回连接字符串,以便我可以使用“;”拆分它 作为分隔符。 我只需要字符串中的Source数据属性。 我发现了......

尝试使用AppleScript将.xls和.xlsx转换为.txt(制表符分隔),需要修复
Trying to Use AppleScript to Convert .xls and .xlsx to .txt (Tab Delimited), Needs Fixing

我从另一个帖子的答案中复制了这个。 我试图将~300 .xls和.xlsx文件转换为制表符分隔。 它们都在同一个文件夹中。 如果有人知道更好的方法,请让我......

清理条件格式(Excel VBA)
Clean Conditional Formatting (Excel VBA)

如果已经回答这个问题,我很抱歉,但我无法找到它。 这就是我想要的:我们都知道删除范围,行和列将分割条件格式并使其变得可怕....

VBA将数据移动到最左侧的列
VBA Move data to the left most column

假设你在Sheet1上给出了这组数据:ABC 31 123 32 45 33 6789(有很长的数字列表而且没有一个......

使用VBA for Excel中的SOAP更新sharepoint列表中的查找字段
Updating a lookup field in a sharepoint List using SOAP in VBA for Excel

我正在尝试使用Excel 2010中的宏更新Sharepoint列表。到目前为止,我没有更新常规文本或数字字段的问题,但是当涉及到查找字段时,它会抛出...

excel数据库函数结合vba,如果没有记录怎么办?
excel database function in combination with vba, what if there are no records?

我正在使用excel的数据库功能。 参见示例图像我使用vba来选择具有'yes'的记录,例如A Selection.AutoFilter Field:= 2,Criteria1:=“yes”Range(“B3”)。选择Range(...

插入问题(access / vb)
Issue with insert (access/vb)

我已经试图解决这个问题两天了,我不会再这么做了。 我的访问应用程序中有两个表:其中一个名为tabDerroga,其中一些文档的数据......

带变量的Range对象
Range object with variables

我发现很多例子使用Range标识符和变量作为范围的结尾但不是第一部分。 范围(“B2:B”和lastrow)对我有用,只要我确定...

如何在visual basic中将列添加到listview?
How to add columns to a listview in visual basic?

这可能是一个简单的问题,但我是视觉基础的新手,我在线跟踪教程,我有这个添加列到列表视图,但我收到编译错误。 如何添加列? ...

edited- if语句vba - 如果单元格有值,如何跳过单元格
edited-- if statement vba -- how to skip a cell if it has a value

我编辑了我的原始帖子,并为您提供了更多详细信息。 基本上我有这个代码:对于x = 1到1000如果track.Cells(x,1)= Date那么如果track.Cells(x,2)=“EU”那么如果track.Cells(x,3)......

Excel VBA:宏仅导出非空白单元格
Excel VBA: Macro to only export non blank cells

大家好,我有这个宏,用公式输出所有单元格,但是输出空白。 我只希望导出显示为非空白的单元格。 有任何想法吗? Sub Export_A()Dim sPath As ...

基于2个参数的动态过滤,一个是空单元
Dynamic filtering based on 2 parameters, one being an empty cell

我正在尝试创建一个相当简单的excel基于输入和输出日志。 我有一个用户表单,检查某人,以及一个用户表单来检查某人。 签入后,有一个新的条目(行)添加到...

Excel VBA自动筛选取消选中/排除项目
Excel VBA autofilter uncheck/exclude items

快速问题,如何通过VBA排除列表中的项目。 一直在处理一张自动打印出没有特定日期的列表的工作表。 行(“2:2”)。选择选择....

尝试删除子表单记录返回“无当前记录”
Attempt to delete subform record returns "No current record"

使用Access 2010.我有两个子表单来自和。 我在主窗体上有两个按钮addRecord,它使用来自当前所选记录和主要...的值添加新记录。

Microsoft Acess中的事务,错误3034
Transaction in Microsoft Acess, error 3034

我有Access 2010的问题。我使用事务将我的修改封装在一个表单中。 此事务在Form_Load()子系统中启动。 Private Sub Form_Load()Debug.Print“就在这里”......
1 2 3 4 5 6 7 517 518