VBA使用更改的字符串名称设置字符串值
VBA是Visual Basic for Applications的缩写，是一种用于宏编程的编程语言，常用于Microsoft Office套件中的应用程序，如Excel、Word和PowerPoint等。VBA可以通过编写宏来自动化执行各种任务，包括数据处理、报表生成、自定义功能等。
在VBA中，可以使用字符串变量来存储和操作文本数据。要使用更改的字符串名称设置字符串值，可以按照以下步骤进行操作：
- 声明字符串变量：在VBA中，可以使用
Dim语句声明一个字符串变量。例如，Dim myString As String会声明一个名为myString的字符串变量。 - 设置字符串值：可以使用赋值语句将一个字符串值赋给字符串变量。例如，
myString = "Hello, World!"会将字符串"Hello, World!"赋给myString变量。 - 更改字符串名称：要更改字符串变量的名称，可以使用
Name语句。例如，Name myString As newName会将myString变量的名称更改为newName。 - 设置新字符串值：更改字符串变量的名称后，可以使用赋值语句为新的变量设置字符串值。例如，
newName = "New String Value"会将字符串"New String Value"赋给newName变量。
总结： VBA使用更改的字符串名称设置字符串值的步骤包括声明字符串变量、设置字符串值、更改字符串名称和设置新字符串值。通过这些步骤，可以在VBA中灵活地操作和处理字符串数据。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云函数（云原生）：https://cloud.tencent.com/product/scf
- 腾讯云数据库（数据库）：https://cloud.tencent.com/product/cdb
- 腾讯云服务器（服务器运维）：https://cloud.tencent.com/product/cvm
- 腾讯云对象存储（存储）：https://cloud.tencent.com/product/cos
- 腾讯云人工智能（人工智能）：https://cloud.tencent.com/product/ai
- 腾讯云物联网（物联网）：https://cloud.tencent.com/product/iotexplorer
- 腾讯云移动开发（移动开发）：https://cloud.tencent.com/product/mobdev
- 腾讯云区块链（区块链）：https://cloud.tencent.com/product/baas
- 腾讯云视频处理（音视频、多媒体处理）：https://cloud.tencent.com/product/vod
- 腾讯云网络安全（网络安全）：https://cloud.tencent.com/product/ddos
- 腾讯云CDN加速（网络通信）：https://cloud.tencent.com/product/cdn
相关·内容
我有一个变量来存储文件路径。如果缺少该文件，应用程序将提示用户选择一个新文件。如何在下次用户打开程序时保存新的文件路径？
我知道我可以将文件路径写入一个表，然后在运行时检索它，但是是否有一种方法可以严格地在VBA代码中实现呢？
浏览 3提问于2015-08-11得票数 1
回答已采纳
2回答
我有一个电子表格，它链接到其他几个电子表格，以提取编译到一个工作表中的数据；我的任务是修改该工作表以绘制此数据。在一个人的报告中，每个月都有12个空位；如果一个人在一个月内工作，那么这个月将显示在适当的空位中。对于这个图，我想使用一个动态的名称范围，这样图中的月数就等于线上的月数；唯一的问题是，开始指针会根据一个人开始的月份而变化。
我可以创建一个相当大的嵌套if语句，但这似乎不是解决我的问题的好方法。有没有办法让VBA脚本更改动态名称范围的值，或者直接修改图表的值？如果这不是一个可行的选择，除了动态命名范围之外，还有其他方法来解决这个问题吗？
我不能更改此报表的行为方式，因为这是一个与工作相
浏览 4提问于2013-04-16得票数 2
如何使用VBA设置Outlook日历视图的列、筛选器、排序和条件格式？另外，是否有一种方法可以导出视图，与其他人共享并使用VBA应用它？
浏览 0提问于2015-01-19得票数 1
回答已采纳
2回答
是否有一个函数或属性来获取变量名称？
就像这样
msgBox myVariable.name或
msgBox nameOfVariable(myVariable)
当我用myVariable = "whatever"定义它时，它会返回"myVariable"？Google只是给变量引用带来了问题……
浏览 5提问于2016-08-24得票数 5
我有一张带有组合盒的表格。在组合框中选择某些选项将触发表单中的不同操作。
我希望在打开表单或转到下一个记录时自动选择第一个下拉选项。使用VBA命令，ComboBox.Value = "Option1"只向组合框输入一个字符串；这与手动单击一个选项不一样，也不触发其他操作。
如何在组合框下拉菜单中选择一个选项，使其访问识别方式与单击该选项相同？
浏览 1提问于2016-04-22得票数 0
回答已采纳
我想用VBA创建一条规则，而不是在规则中运行脚本，这将添加一个类别(红色)的电子邮件来自一个特定的域时收到。我可以弄清楚接收部分和特定的域部分，但我正在为类别的正确VBA语法而苦苦挣扎。类别的颜色是红色，类别的名称是“垃圾邮件”。这是我最新的尝试：
Dim oRuleNew As Outlook.Rule
Dim oCategoryRuleConditionSpam As Outlook.CategoryRuleCondition
Set oCategoryRuleConditionSpam = oRuleNew.Conditions.Category
With oCategoryRuleC
浏览 4提问于2015-02-24得票数 1
我已经开始尝试编写一些VBA来执行一些查询，但我被第一个障碍卡住了。这给出了一个错误3078，这显然意味着它找不到表或查询。该表肯定存在，并且拼写正确。确实，SQL运行得很好--我对它进行了测试。我做错了什么？ Public Function Tester()
str_tbl = "tblGames_atp"
str_mkvrec = "SELECT * FROM " & str_tbl
dbl_fs_pct = DSum("FS", str_mkvrec)
End Function
浏览 9提问于2019-08-31得票数 0
回答已采纳
1回答
我想从有参数的vbscript调用vba函数，我知道如何调用参数化的子函数，但是函数有问题。
下面是我尝试过的，我尝试了这里的代码，，但是这也不起作用，它给出了一个预期的语句结束时的错误
Set xlObj = CreateObject("Excel.Application")
Set objWorkbook = xlObj.Workbooks.Open("E:\Headers.xlsm")
xlObj.Application.Visible = False
xlObj.Workbooks.Add
Dim result
result = xlObj.App
浏览 0提问于2019-10-21得票数 0
回答已采纳
我拥有的是一个由Excel2010VBA客户端使用的C#，.NET 4.5 ComVisible(true)库。
我有两个问题：
1-
在VBA中，当我从"Tools -> References“中添加对tlb的引用时，会得到”可用引用“对话框，该对话框显示我的库引用名与.tlb文件的相同名称，但没有扩展名。如果我的.tlb文件有一个空格，那么它将被对话框中的下划线替换。
下面的线程讨论了一个类似的问题，但从VBA项目的角度来看：
来自我的C#项目，我如何控制将出现在“可用引用”中的名称(包括使用空格)？
二-
关于库的名称空间，如何选择独立于引用名称和.tlb
浏览 1提问于2012-10-23得票数 3
回答已采纳
如何将参数传递给在Excel VBA中使用onAction事件注册的方法？
我的代码是：
With ActiveSheet.CheckBoxes.Add(rCell.Left, rCell.Top, rCell.Width, rCell.Height)
.Interior.ColorIndex = xlNone
.Caption = ""
.OnAction = "CheckboxChange"
End With
我希望将"rCell“传递给"CheckboxChange”子例程。任何方法都可以做到
浏览 1提问于2009-09-11得票数 4
回答已采纳
假设我有一个html文件，其中的javascript代码如下：
<script type="text/javascript">
var test1 = 1;
var test2 = 2;
var tset3 = 3;
</script>
如何通过Excel VBA获取在Excel VBA宏中使用的javascript变量？
浏览 1提问于2010-04-30得票数 1
回答已采纳
1回答
我试图用VBA添加命名范围。
Nname = "FindMe"
Formulas = "Vlookup(" & Chr(34) & Nname & Chr(34) & ";Translations!$A:$C;2;False)"
ActiveWorkbook.Names.Add Name:=Nname, RefersToR1C1:=Formulas
但我得到
Vlookup(""FindMe"";Translations!$A:$C;2;False)
而不是
Vlookup
浏览 4提问于2015-11-23得票数 0
回答已采纳
2回答
我正在运行下面的代码，它工作得很好-它用Sheet1上的单元格B1中指定的名称创建我的文件，但是当我将我的工作表命名为其他名称(例如FileNames)时，它会给我一个错误。
Sub OpenFiles()
Dim fso As Scripting.FileSystemObject
Dim ts As Scripting.TextStream
Set fso = New Scripting.FileSystemObject
Set ts = fso.CreateTextFile("C:\Users\Betty_smith\Desktop\VBA\" &
Replace
浏览 0提问于2016-04-05得票数 0
1回答
我被要求创建一个Excel外接程序，以便人们从Excel将一系列xml文档加载到Excel电子表格中。我将编写一个外接程序，并发布它的位置，供人们下载自己的本地副本使用。理想情况下，我希望为每个最终用户配置一些VBA常量，以定制他们的体验和功能。
我认为最好有一个按钮运行外接程序，另一个按钮名为“配置”或其他什么，它将编辑VBA中某些变量的值，并保存新值，以便用户下次打开Excel时，外接程序仍然为它们配置。有可能发生这样的事情吗?你对我应该走的路有什么建议吗？
有什么办法让变量保持不变吗？我想我需要将值保存在外接程序的本地版本的某个地方，但是如果是的话，存储一组参数的最佳方法是什么？
任何一
浏览 2提问于2016-07-28得票数 0
回答已采纳
我继承了一个充满VBA的电子表格，我几乎一无所知。
当数据被刷新时，电子表格通过VBA重新格式化自身。我不得不更改一些选项卡名和表名，而现在当自动重新格式化在其中启动时，会出现一个错误，因为它正在寻找旧的表名。
对不起，如果这是一个糟糕的解释/术语，我真的从来没有涉及到VBA通常！
所以我得到的错误是
运行时错误“450”：错误的参数数或无效的属性分配
调试带我到了这一行
For Each rptTable In sID.ListObjects
rptTable.TableStyle = teamName <--- this is the highlighted li
浏览 0提问于2018-05-22得票数 0
“显示页眉和页脚”属性出现在“属性”面板中，但我在MSDN帮助页上找不到它：
如何使用VBA设置此属性的值？
浏览 2提问于2015-07-22得票数 2
回答已采纳
2回答
我有一个csv文件，需要使用VBA导入到Access。
我使用了以下代码：
Call DoCmd.TransferText(acImportDelim, , TableName, SourceFile, HasFieldNames)
其中，TableName、SourceFile和HasFieldNames是存储有关文件信息的变量。
导入工作正常，但我在表中只导入了一列。
有谁有主意吗？
该文件是带有分隔符";“的csv，并且具有多列。
谢谢。
浏览 1提问于2016-02-11得票数 1
回答已采纳
1回答
我收到了来自我以前的团队/角色的电子邮件，这些邮件是关于我不再参加的中断期间的技术桥梁的。如果它们被发送到一个特定的分发列表(我仍然是其中的一部分)，我想自动拒绝它们。
我一点也不知道VBA，但这能起作用吗(我修改了我找到的另一个脚本，用收件人替换了SenderEmailAddress )。不想运行这一点，直到有人真正知道他们正在观察，确认或否认这将发挥作用(偶然的机会，它做了一些疯狂的东西，我的电子邮件)。
Private Sub Application_NewMailEx(ByVal EntryIDCollection As String)
Dim xEntryIDs
Dim xItem
浏览 12提问于2022-10-05得票数 0
1回答
我正在尝试将OsiSoft Pi数据链路与Excel连接起来，并将输出放入一个变量中，以便进行进一步的VBA处理。
当在excel单元中运行命令时，它工作得很好，但是当我尝试在VBA中运行它时，就会得到“Error 2015”。
这是在单元格中工作正常的代码：
= PITimeDat("PP2941FIC01_PV_S", "7/07/2018 11:01:58 AM", "", "interpolated")
将其转换为VBA：
Sub getPiData()
Dim tagName As String
浏览 0提问于2018-08-29得票数 1
我正在用VBA编写一个小分数查找程序，下面的代码给出了标题中的错误，我是VBA新手，错误指向Excel本身生成的第一行。
Private Sub btnSearch_Click()
Name = txtSearch.Text
AmountOfEntries = Range("i10")
For i = 1 To AmountOfEntries
If Range("a" + i) = Name Then
cell = i
Else
cell = "Err
浏览 31提问于2013-03-18得票数 0
在.NET中，我只是在连接字符串中使用Application Name = MyApp，但是当通过VBA使用ADO连接时，无论我在VBA代码中设置什么名称，SQL Server Management Studio的活动监视器总是在Application列上显示Microsoft Office 2010 In Processes。
conn.ConnectionString = "UID=" & UID & ";PWD=" & PWD & ";DSN=" & DSN & _
";App
浏览 0提问于2013-12-05得票数 7
回答已采纳
我给excel中的名字分配了一个公式，计算起来很慢。
假设是这样的：
Name: ImportantItems
Scope: Workbook
RefersTo: =FILTER(A1:A10000, complexCondition(A1:A10000))
我有一些VBA宏，它们在每次迭代时运行一个修改A1:A 10000的模拟，但是模拟只需要每100次迭代访问一次ImportantItems数组。如果
=FILTER(A1:A10000, complexCondition(A1:A10000))
..。在单元格中是一个正常的公式，我知道Excel会遵守它的先例(A1:A 10000)，并触
浏览 0提问于2021-06-08得票数 2
回答已采纳
非常具体的问题。我有一项任务要学习vba，但是我真的找不到任何解决我的问题的方法。
基本上，如果列"Sammelvorgang“中写着"Nein"，列"Text7”应该包含"Nr.“的值。在那一行
我查看了VBA的基础知识，但我找不到针对特定列或特定行的解决方案。
Sub schedule_Number()
Dim tsk As Task
For Each tsk In ActiveProject.Tasks
If Not (tsk Is Nothing) Then
If (tsk.Sammelvorga
浏览 2提问于2022-04-21得票数 1
我不知道如何告诉VBA正确的日期格式，因为它似乎以错误的方式假定。所以CDate("24/02/2016 10:59")给出了正确的日期- dd/mm/yyy。然而，当它遍历像CDate("01/03/2016 00:59")这样的日期时，它假设03不是一个月，而是一天，所以VBA假设它是mm/dd/yyyy，所以它给了我一个日期03/01/2016，这是错误的，并且扰乱了我的数据。那么，我如何告诉VBA，它实际上是dd/mm/yyyy格式。即使是"2016/01/14"，VBA似乎也能很好地自动恢复，但是当不太清楚哪一部分数字是月份时，它就失败
浏览 6提问于2016-04-05得票数 1
回答已采纳
问题：
当使用DLookup将全局变量名(String)返回到分配给.BackColor(long)属性的RHS时，我将得到一个类型不匹配错误。
如何通过记录查找name(**string**/**text**)传递变量，并在表达式的RHS上计算其内容.
“给我名称与此字符串匹配的变量的值”
调试：
我尝试过各种版本的转义(使用"或')、评估(使用Eval())、类型转换(使用Clng和Cstr)，以及检查适当的范围，但都没有成功。参见“调试立即输出”一节
在下面的代码中，特别是这一行：Me.cboSelect.BackColor = DLookup("[BackCol
浏览 3提问于2015-02-10得票数 1
回答已采纳
我在Excel VBA中有以下代码片段：
With Worksheets("MLS").Shapes.Range(Array("Rounded Rectangle 1")).Fill
.ForeColor.RGB = RGB(166, 166, 166)
.Transparency = 0.3
End With
我不知道“圆角矩形1”是在哪里定义的，也不知道它指的是哪种形状或范围。它不是在VBA代码中定义的，我已经尝试在整个项目中搜索该名称。
我在哪里可以找到“圆角矩形1”的定义，以及程序员使用这种形状/范围/数组构造引用范围/形状的意图可能是什
浏览 0提问于2015-02-18得票数 2
回答已采纳
我对一些VBA代码有一个问题，这些代码看起来很基本，但却不起作用。我对VBA太陌生了，所以我错过了一些东西。
代码应该检查一个单元格(XFD3002)，看看它是否等于0，然后它是否会显示一条消息，并停止文件的保存。对于背景，需要检查某些单元格是否已被填充，如果没有，则返回0。
守则是：
Private Sub Check_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim check As Integer
check = Sheets("Data").Range("XFD3002").Val
浏览 3提问于2016-10-12得票数 0
回答已采纳
我有一些excel vba代码，它通过对象名引用工作表：
price = wks_PRICE.Range("A1")
我的问题是，我们现在已经将所有工作表名称更改为camelcaps，因此工作表对象现在被称为"wks_Price“。
但excel仍在自动将代码中的所有内容资本化，使其回到原来的资本化，然后就无法运行。
即。我将输入代码：
price = wks_Price.Range("A1")
然后vba将自动将其更改为
price = wks_PRICE.Range("A1")
即使不再定义"wks_PRICE“。
然后它将崩
浏览 1提问于2018-07-06得票数 1
回答已采纳
2回答
我不是Excel或VBA专家，但我想使用VBA将当前的excel公式插入到单元格中。
当前Excel公式：
=IF(OR(ISNUM(D570)=FALSE;ISNUM(D573)=FALSE);"";IF(C573="Total";D573-D570;""))
VBA公式：
ActiveSheet.Range("a" & ActiveSheet.Rows.Count).End(xlUp).Offset(2, 12).Value = "=IF(OR(ISNUM(R[-3]C[-9])=FALSE;ISNUM(R[
浏览 2提问于2010-01-08得票数 6
2回答
我在网上关注了一些例子，在这些例子中，我试图在VBA中将一个值从一个子传递到另一个子，但得到了错误：
编译错误:过程声明与具有相同名称的事件或过程的描述不匹配。
Sub next_sat_click()
Dim iweekday As Integer
Dim nextsat As String
Dim index As Integer
Dim str_game_date As String
iweekday = weekday(Now(), vbSunday)
nextsat = Format((Now + 7 - iweekday), "mm-dd-yy")
Call
浏览 0提问于2017-09-05得票数 1
2回答
我想知道是否有办法通过VBA将回复箭头添加到Outlook中选定的邮件中。背景是，我们通过VBA处理选定的邮件，并从中创建一个新邮件。这不会触发原始邮件获得回复箭头。如果邮件仍能得到箭头，这将是可取的。
现在编码：
On Error Resume Next
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set myItem = ActiveExplorer.Selection.Item(1)
Case "Inspector
浏览 10提问于2022-02-22得票数 0
2回答
我在同一个工作簿中创建了许多工作表(大约30张)。我试图用VBA编程，其中一个值将出现在一个指定的倍数单元格中，但是存在一个“运行时错误9，Subscript超出范围”的问题。
Sub Invoice()
For i = 5 To 11
With Sheets("Sheet" & i)
.Range("J2") = "a"
End With
Next i
End Sub
如代码所示，值"a“必须出现在从sheet5到sheet11的每个工作表的单元格she
浏览 3提问于2019-10-13得票数 0
回答已采纳
我试图用vba代码隐藏一个访问表或querytable，它会抛出运行时错误“您输入的表达式是指关闭或不存在的对象”
Private Sub Command0_Click()
Application.SetHiddenAttribute acQuery, samplesql, False
End Sub
浏览 2提问于2014-02-05得票数 1
回答已采纳
是否有任何方法可以使用VBA来更改系统默认打印机？以及改变它的设置？还是对VBA T的要求太高了？
浏览 2提问于2017-06-07得票数 0
回答已采纳
让我在这个问题的序言中说，我知道这个问题在许多帖子中都是从不同的角度来处理的。然而，我已经花了好几个小时在这个问题上，但仍然不能让它工作，所以我寻求帮助。
我在Excel表格中的单元格中有一些汉字。我使用VBA将这些单元格的内容导出到mysql表中。在mysql命令行中，我能够成功地将汉字插入表中(我使用的是utf8mb4字符集)。
我还在VBA连接字符串中设置了charset=utf8mb4。
但是，我不能让VBA在查询字符串中包含中文字符，如下所示：
SQLStr = "INSERT INTO " & VBA.Trim(databaseName) &
浏览 0提问于2016-01-31得票数 1
回答已采纳
1回答
这里是Excel VBA n00b；如果我问的是一个简单的问题，…，对不起
我已经创建了一个带有“设置”工作表的Excel工作簿，该工作表中有一些数据验证(列表)单元格，宏的用户可以在使用命令按钮运行宏之前选择一些选项。其中一个单元格是下拉列表，用户从列表“Black”、“White”、“Red”等中选择颜色。我已经为单元格设置了条件格式规则，以便对单元格进行与用户选择的颜色相对应的格式化(填充)。但是，当我尝试使用Interior.Color选项读取这个单元格时，条件格式似乎没有真正地“填充”单元格的背景色，而这种方式可以由我的VBA宏读取。
相反，我尝试找出如何将字符串转换为常量；因为这样
浏览 5提问于2021-07-01得票数 0
回答已采纳
1回答
对VBA来说是新手。尝试创建将用另一列(C)的平均值填充列(D)的宏。我创建了一个变量nb_rows，并从以下代码开始：
Dim myRangeC As String
Let myRangeC = "C4:C" & nb_rows
For i = 4 To nb_rows
Range("D" & i).Value = Application.Average(myRangeC)
Next i
我搞错了。我哪里出错了。例如，目前nb_rows设置为27。
浏览 3提问于2017-07-31得票数 0
回答已采纳
我知道如何使用VBA在Word 2010中使用变量。但是，当文档关闭并重新打开时，它们都会被重置。
如何将变量永久存储在Word文档中？
浏览 3提问于2014-10-08得票数 3
回答已采纳
能否帮助我创建一个动态访问查询(参数化访问查询)&
使用excel vba中的变量初始化它
eX:选择&从id =1的客户处选择
其中id =1应该用一个变量初始化，比如id = @id
浏览 1提问于2012-02-19得票数 0
我对这个论坛很陌生，也很新.
我有一个报告与6个复选框和一个按钮都位于报告头。单击该按钮的目的是将一个或多个筛选器应用于子报表并请求子报表。注:子报告未链接
在最初启动报表时，子报表将显示其关联查询中的所有记录。每个记录都有一个名为Blk的字段，该字段可以是1、2、3、4或5，看起来如下(Blk 1)。父报表头中的前五个目录框对应于Blk数字。第六个盒子就够了。
这个愿望就像follows...Initial报告的发布一样->所有的记录都显示
然后，用户选择Blk 1 --> Blk 2-5，并且没有选中所有
用户单击更新按钮-> VBA代码构建一个筛选字符串，然后更
浏览 11提问于2022-10-21得票数 1
2回答
我尝试使用VBA Excel命令创建进度线我有定义进度的所有数据，但我不知道如何使用VBA创建进度线
例如，我尝试使用连接线，但似乎行不通
ActiveSheet.Shapes.AddConnector(msoConnectorStraight, 60, 405,800, 477).Select
Range("Z20").Select
ActiveSheet.Shapes.Range(Array("Straight Connector 11671")).Select
浏览 2提问于2014-07-23得票数 1
2回答
我有一个在MS Access和MS Excel中使用的VBA函数。在MS中使用时，我使用Application.Volatile，但在MS中放置或使用它时，它将不会编译。是否有办法使这一行可以互换，而不必在MS Access中删除它？
谢谢你，弗雷德
浏览 1提问于2015-03-18得票数 2
回答已采纳
1回答
我有5个工作表：(1)摘要(2) 2020 (3) 2019 (4) 2018 (5) 2017
在我的“摘要”工作表中，A列中每个单元格都包含每个工作表的名称(A1: 2020、A2: 2019、A3: 2018、A4: 2017)和B列，每一行的编号为"1“。
假设我删除了"2019“工作表，使其不再介于工作表"2020”和"2017“之间--我是否可以在第2行中使用任何公式来标记？也许是通过B列的"if(..,1,0)“公式？我不想使用VBA。
浏览 3提问于2022-04-13得票数 2
我的VBA access窗体中有三个组合框控件(MFG、Code和GrpID)。一旦用户从第一个组合框(MFG)中选择了一个选项，其余的组合框就会为我提供可用的选项。但我需要做一些验证，例如，如果用户决定更改第一个组合框的值怎么办？应清除rest组合框的值。我所需要做的就是，一旦第一个组合框被更改，第二个和第三个组合框需要被清除，或者至少设置为专注于它们，这样用户就会意识到他们不能使用旧值，因为第一个组合框中的第一个值被清除了。我为第一个组合框添加了一个代码块'AfterUpdate，如下所示：
Private Sub MFG_AfterUpdate()
Code.Value =
浏览 2提问于2017-09-20得票数 0
1回答
我有一个excel工作簿，每个工作表中有5个工作表，其中有一个有值的表。然后根据用户选择(使用下拉列表)删除一些行(使用VBA)。在我的VBA代码删除了所有不必要的行之后，Excel声明我有“不一致的列公式”，我想在用户看到它之前用VBA解决它。
有没有办法用VBA来做这件事？
我已经搜索了一整天的Google，仍然没有发现任何有用的东西，我脑子里唯一能想到的就是遍历包含公式的所有行和列，检查公式是否包含错误，这肯定会非常慢.
注意:如果这算作是重复的，我很抱歉，但是唯一的答案不适用于表作为数据范围
浏览 6提问于2016-02-29得票数 1
回答已采纳
1回答
当前，我正在使用power查询处理连接到sql查询的Excel工作簿作为数据源。此sql查询包含一个日期值。我需要添加一个vba代码，使用户能够在sql查询中自定义日期值
为了使我自己更清楚，例如，sql查询包含以下代码，我当然可以手动更改它，但我需要的是向工作表添加一个按钮或其他东西，使用户能够更改dat周期
例如。声明@DT_FROM NVARCHAR(23)；设置@DT_FROM = N'2018-03-29'；声明@DT_TO NVARCHAR(23)；设置@DT_TO = N'2018-03-29'；
这有可能吗？致谢问候
浏览 1提问于2018-03-31得票数 0
1回答
我正在通过Excel访问Outlook，因为我的企业Outlook VBA已被禁用。我特别迭代了我的收件箱，并更新了Mail.object categories属性。 Dim objOutlook As Object
Set ObjOUtlook =CreateObject("Outlook.Application")
Dim objNSpace As object
Set ObjNSpace = objNaspace.GetDefaultFolder(olFolderInbox)
Dim myFolder As Object
Set myFolder= objNSpac
浏览 46提问于2021-10-09得票数 0
回答已采纳
我有一个非常简单的VBA函数，它接受两个范围参数，并使用两个范围的值返回一个双值。我在单个单元格的公式栏中使用了这个，但是如果某些地方不太正确，我希望返回一个字符串错误。有什么方法可以不让它在单元格中显示#值而显示它呢？
Public Function CPP(aPreviousPercentage As Range, aCurrentPercentage As Range) As Double
If (aPreviousPercentage.Value > 0.2) Then
CPP = "Invalid Starting Value"
浏览 4提问于2012-03-21得票数 2
回答已采纳
我正在创建一个excel VBA用户表单，这需要在飞行中创建许多按钮(即可能的要求，运行时)。我想给这些按钮分配一个子例程，这样当它们被点击时，就会执行子例程。
这就是我想做的
Set obj4 = usrform.Controls.Add("forms.commandbutton.1")
obj4.Height = 17
obj4.Left = 450
obj4.Top = 75
obj4.Font.Size = 11
obj4.Name = "compare" & (j - i) 'j and i are some variables in
浏览 20提问于2013-03-13得票数 2
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
