使用字符串变量引用工作簿
是指通过一个字符串变量来表示工作簿的名称或路径，从而动态地引用特定的工作簿。这种方式在开发中经常用到，特别是当需要在不同的工作簿之间进行数据传递、操作或者复制等操作时。
在Excel中，可以使用字符串变量引用工作簿的方法有两种：
- 使用工作簿名称引用：
- 概念：使用工作簿的名称作为字符串变量，通过
Workbooks对象的Item属性来引用特定的工作簿。 - 分类：这种方式适用于已经打开的工作簿，通过名称唯一地标识工作簿。
- 优势：使用简单方便，不需要指定具体的路径。
- 应用场景：适用于在同一Excel实例中进行工作簿之间的数据交互。
- 腾讯云相关产品和产品介绍链接地址：对于腾讯云，目前没有直接相关产品和介绍链接地址。
- 概念：使用工作簿的名称作为字符串变量，通过
- 使用工作簿路径引用：
- 概念：使用工作簿的完整路径作为字符串变量，通过
Workbooks对象的Open方法来引用特定的工作簿。 - 分类：这种方式适用于未打开的工作簿，需要指定具体的路径来标识工作簿。
- 优势：可以动态地引用任意位置的工作簿，灵活性较高。
- 应用场景：适用于需要操作不同文件夹或路径下的工作簿。
- 腾讯云相关产品和产品介绍链接地址：对于腾讯云，目前没有直接相关产品和介绍链接地址。
- 概念：使用工作簿的完整路径作为字符串变量，通过
需要注意的是，使用字符串变量引用工作簿时，要确保工作簿的存在和可访问性，以避免出现错误。同时，在不同的开发环境中，具体的引用方式可能会有所不同，需要根据具体情况进行适配和修改。
相关·内容
我想要创建一个宏，它将从一个工作簿(其名称始终保持不变- "SameNameWorkbook")复制一些数据，并将该数据粘贴到另一个每天更改名称的打开工作簿中(因为它的名称是日期)。例如，今天我要粘贴数据的工作簿称为"11.06.2021“。我所做的是在活动工作簿中的J2单元格中创建了一个= did ()公式(不同于其他2并命名为"CurrentWorkbook")，并在VBA中为更改名称的工作簿创建了一个变量：
`Second_workbook = Range("J2").Value`
当我希望始终引用第二本工作簿时，我
浏览 3提问于2021-06-11得票数 1
回答已采纳
我正在尝试拆分我的工作簿，但是当我这样做时，新工作簿中的命名区域引用了原始工作簿。我不想这样，因为我已经将这些引用的源代码复制到了新的工作簿中。因此，我想删除命名范围中对旧工作簿的引用。我试图通过将引用替换为nothing来改变这一点，但是它不起作用。我做错了什么，或者有其他方法吗？我还尝试删除命名范围并将其替换为新的命名范围，但引用命名范围的一部分是一个带有=offset(...)的函数。这似乎在VBA中也不起作用。 Sub RenameNamedRanges()
Dim all_names, n
all_names = Array("1stNamedRange&#
浏览 23提问于2019-12-19得票数 0
回答已采纳
现在我有了一些代码，提示用户选择一个范围(1区域，1列，几行)。这是它提示用户这样做的代码：
MsgBox "Select a continuous range of cells where numeric values should be appended."
Set Rng = Application.InputBox("Select a range", "Obtain Range Object", Type:=8) 'Type Values, 8 - Range object
但是，如何从上面的选择中获得工作簿名称和工作表名称？
浏览 1提问于2018-06-25得票数 3
回答已采纳
3回答
多个对象引用
、、
这个问题是关于对象引用的。
下面是我的帮助班。
class helperv2
{
Workbook mainworkbook;
//fill column names method
public void FillColumnnames(DatabaseAdapter db,Workbook workbook)
{
//do some random stuff
//at the end of method
mainworkbook = workbook;
}
public Workbook fi
浏览 7提问于2016-04-14得票数 0
回答已采纳
2回答
Excel集合变量
、、、、
假设我们有两个在VBA功能方面相同的工作簿；但是，数据集将是不同的。VBA代码将一些数据存储在集合变量上，以便于计算。此变量通过同一工作簿中的不同模块调用。由于此变量也存在于另一个工作簿中，并且这两个工作簿不应共享相同的集合值，因此我们如何确保对集合的调用将仅从其自己的工作簿中提取变量？
在声明集合变量时，声明"Option Private Module“是否足够？例如：
Option Private Module
Public DataCol As New Collection
谢谢。
浏览 0提问于2018-10-10得票数 1
1回答
我正在编写一个vba代码来将两个excel工作簿拉到一个工作簿中。工作簿1来自前一个工作日，工作簿2是前一个工作日的第二大工作日。例如，在周一，我将把周五和周四的工作簿数据放到一个单独的工作簿中。工作簿被命名为“结果07.26.2019”，因此日期格式是mm.dd.yyyy。当我尝试用mm.dd.yyyy格式化我的约会时。它要么忽略我的格式，要么产生错误。我试着定义我的约会对象如下：
Dim dDate As Date
dDate = Date
dDate = Format(dDate, "mm.dd.yyyy")
默认格式为"mm/dd/yyyy"，是否有允
浏览 1提问于2019-07-29得票数 0
回答已采纳
2回答
我得到了一个主工作簿，它用特定的工作表和头创建了一个新的工作簿，它不会保存工作簿，因此它将是一个随机名称，比如Book1或Book2。这部分是成功的。接下来要做的是打开一个文件，并将打开的文件的数据复制到创建的未保存的工作簿("Book1“或任何名称)。
问题是我无法在源代码数据工作簿(打开的文件)和未保存的工作簿之间切换窗口。我尝试过windows(“工作簿名”).activate，但它只适用于特定的名称。我需要激活未保存的工作簿。总之，我已经打开了3本工作簿。
Sub CopyData()
Dim Newbook As Window
Dim wb As Wo
浏览 3提问于2015-08-13得票数 1
回答已采纳
用户Peh给了我很棒的代码来将数据从关闭的工作簿复制到打开的工作簿，但现在我想做相反的事情。我希望有一个打开的工作簿，其中包含要复制的公式和值，并将这些值作为值粘贴到关闭的工作簿中。我想从打开的工作簿的"AllData“选项卡中复制range B36:K36，以便将以K1开头的值粘贴到已关闭工作簿的Sheet1中，该工作簿名为"archive.xlsx”。
这是我当前的代码(来自互联网)：
Sub CopynPasteWrkBk()
Dim InputFile As Workbook
Dim OutputFile As Workbook
Dim Inpu
浏览 2提问于2017-04-15得票数 1
当我编写一个公式来比较不同工作簿中的数据时，公式看起来非常混乱，因为每次我在不同的工作簿中引用一个值时，工作簿的全名都会出现在公式中。是否有一种方法可以为工作簿名称指定别名，从而使公式更易读？
浏览 1提问于2013-10-22得票数 2
回答已采纳
这是工作，直接引用代号(Sheet3).
Sheet3.Shapes(PopUp).Visible = True
使用相同代码名值的变量集的...but不.
WS = ActiveSheet.CodeName
WS.Shapes(PopUp).Visible = True
为什么？我之所以这样问是因为我需要将更大的宏的功能扩展到整个工作簿，所以我希望这个变量能够让这个变量适用于任何用户碰巧在上面的工作表。
谢谢您的指导！
浏览 1提问于2018-06-12得票数 1
回答已采纳
在MS 2007宏中，我希望在开始更新之前将工作簿(其中包含宏)保存到另一个工作簿中。但是，当我执行SaveAs时，当前的工作簿变成了保存的工作簿，而不是我一直盯着的原始工作簿。
假设我以工作簿"A.xlsm“开头，然后在工作簿"A.xlsm”中发出命令
With ActiveWorkbook
.SaveAs FileName:=ThisWorkbook.Path + "\" & "B.xlsm"
Close 0
End With
活动工作簿中的任何更改都出现在工作簿"B.xlsm“中，而不
浏览 6提问于2016-08-02得票数 0
回答已采纳
我试图从一个工作簿复制一个单元格，并将其作为值粘贴到另一个工作簿
' Copy from Source book.sheet.cell, Paste to Destination book.sheet.cell
Workbooks("SOURCE.xlsx").Worksheets("SOURCE").Range("C2").Copy _
Workbooks("DESTINATION.xlsm").Worksheets("DESTINATION 1").Range("F4").PasteS
浏览 0提问于2019-08-19得票数 0
回答已采纳
如何引用我的主工作簿和通过此子过程打开的第二个工作簿？我尝试执行workbooks.("client_path").activate，因为我使用此宏的目标是打开一个单独的工作簿，该工作簿被分配给变量client_path，并使A:A列中的每(1到200)个值与我的主工作簿的K:K列中的所有值保持一致。如果在client_path工作簿上找到值(同样是A列:A)，但不是在我的主工作簿上(同样是K:K列)-我想将唯一值添加到我的主工作簿的M:M列。与逻辑相反，我希望在主工作簿上找到但在client_path工作簿上找不到的任何值都出现在主工作簿的N:N列中。
我正在开发的主要工作簿
浏览 2提问于2014-10-17得票数 1
回答已采纳
我在我的Personal.xlsb文件中的一个模块中有许多脚本。它是隐藏的，但是在这个脚本中，想法是每次在不同的工作簿中运行它。它打开一个单独的工作簿( source.xlsx )，从它复制一个范围，粘贴到原始工作簿中，然后关闭source.xlsx。
当涉及到"ThisWorkbook.ActiveSheet.Paste“部分时，它将其粘贴到Personal.xlsb工作簿中，而不是实际打开和可见的目标工作簿。如何确保它被粘贴在正确的工作簿中？工作簿的文件名总是不同的，所以我不能指定路径或类似的东西。
Sub CopyData()
Application.DisplayAle
浏览 1提问于2016-09-29得票数 0
回答已采纳
老实说，前几天我问了一个类似的问题，但我想我把问题弄得太复杂了，所以我不太清楚我在寻找什么。
为了总结我之前的问题，在使用xlsxwriter时，我正在寻找一种将公式的结果存储/赋值为数值的方法，以便以后可以在脚本中引用它，从而避免重新计算。我应该指出，在这个过程中，我正在生成两个单独的Excel文件，所以要避免可怕的#REF！第二个Excel工作簿上的错误
很抱歉使用粗制滥造的代码，但是下面这样的内容是我想要的，但是“结果”会被分配给一个类似于'12.56‘的数字，所以当我写到第二个Excel工作簿时，我就避免了重新计算，只需输入指定的“结果”值。
# on first EXCEL
浏览 6提问于2014-08-04得票数 1
回答已采纳
我有要在数组中打开的Excel文件的名称。我可以使用这些字符串对象作为工作簿索引吗？ 例如： nameText = "Revenue.xlsx"
Set myValues = Workbooks(nameText).Worksheets(1).Columns("J") 我相信我在使用Workbooks(nameText)时遇到了一个问题--我能做些什么来让它工作呢？
浏览 36提问于2020-01-28得票数 0
回答已采纳
1回答
当在代码中引用不同的工作簿时，我一直在使用"Set Workbooks.Open“。
示例：
`Dim wbname1 as Workbook
Dim wbname2 as Workbook
'code which refers to wbname1
Set wbname1 = Workbooks.Open("path\filename")
'code which refers to wbname2
Set wbname2 = Workbooks.Open("path\filename")`
这有时不方便，因为为了再次引用以前的工作
浏览 2提问于2016-03-04得票数 2
回答已采纳
1回答
下面是在同一个工作簿中工作的内容--如何在不同的工作簿中使用摘要表？
Sub SummurizeSheets()
Dim ws As Worksheet
Application.ScreenUpdating = False
Sheets("Summary").Activate
For Each ws In Worksheets
If ws.Name <> "Summary" Then
ws.Range("D2:D6, D8:D15").Copy
Worksheets("Summary
浏览 1提问于2013-10-21得票数 0
回答已采纳
2回答
尝试在UNAPP宏后激活活动工作簿，但(如果打开了许多工作簿)总是激活最后打开的工作簿，并且每次都在切换(上一个工作簿到Activeworkbook)，我需要始终激活从中调用代码的工作簿。 Sub App()
With Application
.ScreenUpdating = False
.DisplayAlerts = False
.EnableEvents = False
.Calculation = xlManual
.Visible = False
End With
End Sub
Sub unApp()
浏览 28提问于2019-05-29得票数 0
1回答
我使用以下代码以编程方式创建新的工作簿：
'Adding a new workbook
Workbooks.Add
'Saving the new workbook
ActiveWorkbook.SaveAs newFilePath
'Closing the new workbook
ActiveWorkbook.Close
我想知道如何设置列名，换句话说，如何在工作簿中写入，然后再关闭它。
浏览 1提问于2015-04-23得票数 1
回答已采纳
1回答
我有一个叫做“Products”的工作簿，里面有两张纸。工作表1(“全局”)由工作表2引用的许多范围组成。我有另一个“主”工作簿，其中包含一个(“Globals”)工作表，它的所有范围都与“Products”工作簿相同。
“主”工作簿是修改并保存范围的所有值的地方。然后从“Products”工作簿中删除(“Globals”)工作表，然后从“Master”工作簿中导入(“Globals”)工作表。
问题是工作表2中的所有单元格都丢失了它们引用的范围，即使我导入的是具有相同名称的工作表，并且它包含完全相同的范围名称。
有什么可以添加到我的代码中来解决这个问题吗？
Sub ImportGlobalS
浏览 0提问于2020-10-06得票数 1
我正在创建一个宏，它将处理和格式化扫描(SCANfile#.xlm)，并将其保存为.xlm文件--最终结果应该是一个经过处理的格式化工作簿，该工作簿将被保存为一个.xlm文件。我在工作簿中创建宏，为了讨论的目的，我将调用SCANMacro，目的是将它与当时可能打开的任何SCANfile#工作簿同时打开。
Sub Copy and Paste Data ()
'select cell on target workbook/worksheet
Range("X1").Select
'
'select the data from the saved wo
浏览 4提问于2017-02-23得票数 0
回答已采纳
当任何人打开工作簿时，我有一个密码验证步骤。我有多个用户将访问此工作簿，并在此基础上分配了一个名为user的变量，以确定其中谁正在使用它。
Public pwd, user As String
Public graccess As Integer
Private Sub workbook_open()
graccess = 0
Do
pwd = InputBox("Please provide your password", "Authentication")
If pwd = "access" Then
user = "GTS
浏览 2提问于2013-09-06得票数 2
假设我有一个名为"References“的工作表。此工作表的单元格B2的值为
"C:\Documents\Workbook1.xlsx"，
工作簿的路径。
在同一工作簿中的另一个工作表上，我想要一个公式来获取工作表"Sheet 1"的Workbook1.xlsx的单元格A1的值。是否可以让公式查找'References'!B2的值并将其用作参考。
也就是说，我希望公式是这样的
='['References'!B2]Sheet 1'!A1
我尝试过使用CELL()公式，但似乎无法让它以这种方式工作。
浏览 0提问于2012-04-17得票数 1
回答已采纳
我在VBA中遇到了一个问题，当我将数据从其他工作簿合并到主工作簿中时，使用的文件名和路径名是可变的，它在循环中动态变化。我搜索了一下，但我只找到了硬编码的路径，所以我在这里发布以下是我的代码。
Sub Append()
'Append data from other files
Path = "E:\NPM PahseIII\"
Dim c As Range
'find the first empty cell in ColA
Set c = ActiveSheet.Cells(Rows.Count, 1).End(x
浏览 0提问于2018-12-14得票数 0
2回答
我想从活动工作簿中的代码引用到另一个工作簿，我不想键入像那个工作簿那样的路径(“路径”)，这个引用应该是灵活的，是否有类似于已经打开的工作簿的数组？
浏览 2提问于2015-07-02得票数 0
回答已采纳
1回答
我正在引用另一个工作簿中的单元格，以复制该工作簿中的单元格内容。我想循环遍历该工作簿中的行，直到出现空行为止。示例：
Range("B13:C13").Select
ActiveCell.FormulaR1C1 = "='[Junk Work File.xlsx]Total'!R1C8"
是否有一种方法可以更新行/列(R1C8)，以便获取后续行的单元格内容？
浏览 0提问于2015-06-01得票数 0
回答已采纳
我想引用另一个工作簿，假设它的名称是“myworkbook.xlsm”，其中包含了Excel中的间接函数。
但是，“我的工作簿”文件名可能在它之前或之后有任何其他字符串/字符。
假设我正在查找“查找值”
=VLOOKUP(“”&“查找值”&“”、间接(“‘”&“”和“我的workbook"&""&".xlsm"&""&"("&A7&")"&"'!$A:$H"),8，FALSE”)
我尝试了上面的公式，当我
浏览 2提问于2014-05-22得票数 2
回答已采纳
3回答
我每天都要下载一本工作簿。
工作簿的名称总是以CMVOLT开头。
整个文件名为CMVOLT_22112019。
22112019表示日期和每天的更改。
我按以下方式打开此工作簿：
Sub openwb()
Dim sPath As String, sFile As String
Dim wb As Workbook
sPath = "C:\Users\Windows\Downloads\"
sFile = sPath & "CMVOLT_22112019.CSV"
Set wb = Workbooks.Open(sFile)
End Sub
因此
浏览 5提问于2019-11-23得票数 0
回答已采纳
我目前正在进行一个项目，以创建只能在特定单元格中具有特定值的多个清单(资产代码和序列号)。我的清单模板已经完成，它包含了一堆VBA编码，以防止人们(在本例中是我的工作中的工程师)输入不正确的数据。
我这样做的方法是使用一些内置的基于VBA的数据验证规则和检查。还有宏，运行txt文件输出和Outlook电子邮件等。包含资产代码和序列号的单元格由这些DataValidation规则控制，这些规则将数据与工作簿第二张表中的三个列表进行比较。
总共将有大约100个不同的工作簿，每个工作簿在Sheet1上都有自己独特的清单，而Sheet2在大约100个工作簿中是相同的.如前所述，Sheet2有三个列表：
浏览 5提问于2013-05-03得票数 1
这个场景就像我有一个包含至少4到5个excel工作簿的文件夹。工作簿有一个标准的名字，其余的名字会有所不同。我需要对excel工作簿进行计数，然后读取工作簿中的数据，每次在Uipath中执行.This后，它在不同的数据表中也是如此
浏览 0提问于2019-11-08得票数 2
我维护的excel工作簿中包含以下VBA代码：
Function GetDrivePath(DriveLetter As String) As String
Dim DrivePath As String
Dim DriveLen As Long
'DrivePath = Space(260)
DriveLen = Len(DrivePath)
If WNetGetConnection(DriveLetter, DrivePath, DriveLen) = error_success Then
GetDrivePath = DrivePath
Else
GetDri
浏览 4提问于2014-03-05得票数 0
回答已采纳
1回答
为了翻译它，我必须准确地复制一个工作簿，而宏不能工作，因为它的源是原始工作簿(根据调试器)。如何使这些宏在新的工作簿中工作？我可以更改新工作簿中的宏代码吗？
浏览 3提问于2016-07-20得票数 0
我有一个包含多个.xlsx工作簿的文件夹，所有这些工作簿都在一个页面上包含相同的3个表，这些表具有完全相同的布局，但每个表中的值不同。因为每个工作簿在同一页上包含3个表，所以我有一个VBA脚本，它遍历文件夹中的文件，专门从3个表中的每个表中提取必要的数据/单元格，并将其写入活动工作簿或“主”工作簿。我遇到的问题是，尽管它正确地以我需要的格式写入数据，例如，表1数据在行1，表2数据在行2，表3数据在行3，等等。对于每个工作簿-它读取的每个新工作簿都会覆盖以前的工作簿数据。因此，最后只剩下脚本读取的最后一个表中的数据。到目前为止，我的代码如下： Sub getDataFromWbs()
Dim
浏览 20提问于2020-07-15得票数 1
回答已采纳
我想循环遍历所有打开的Excel工作簿，以确定在哪个工作簿上执行操作。问题是，代码在活动工作簿之后退出for循环，并因此返回"Nothing“，而不管我打开了多少工作簿。
我需要每周运行这个例程，以便将工作时间从下载的Excel工作簿转移到备用工作簿。文件的名称每周都会更改，但总是以“时间表”开头。
从一月到四月，我每周都这样做，没有任何问题。我今天试着用它，突然出现了这个问题。我在不同操作系统(Windows 7，Windows 10)的几台不同的计算机上使用了这个例程。
我已经保存、关闭和重新打开了我想激活的工作簿，但没有效果。我不想每周更改代码来访问特定的工作簿，而是使用文件名中
浏览 0提问于2019-05-20得票数 1
回答已采纳
1回答
希望有人能帮上忙！
我正在用VB6编程，并试图为一个指示器编写一个activeX控件。该指示器应根据excel打开的工作簿单元格为true或false而更改颜色。指标应该是自动更新的，即指标需要实时链接到excel单元格。
然后，我可以在用户表单上放置几个指向不同单元格的指示符c/w链接。在用户表单和对象引用设置中打开工作簿并进行测试。
我想不出如何将指示器链接到excel单元格。
这是我正在尝试的一个更大项目的一部分。其他控制，如条形图，开关等要添加，如果我可以让第一个工作。
提前感谢
浏览 0提问于2014-04-11得票数 1
我正在尝试将单元格定义为变量，以便在调用工作簿时可以使用它。这个单元格每天都在变化，在运行这个宏之前，我创建了一个全新的工作簿，它的标题是这个单元格。
这就是我所拥有的，但显然它不会工作：
Dim wbk As Workbook
Set wbk = "X:\myname\TESTOCD\&"Sheets("MockupHelp").Range("d29")"""
在我的工作表MockUpHelp中，我引用的每天更改的单元格是D29。
浏览 0提问于2015-07-22得票数 0
这看起来应该很简单，但我真的被困在上面了。
这是从一个目录中的多个工作簿中获取值并在一个工作簿中编译它们的代码。我使用的是vlookup，因为该值并不总是位于完全相同的单元格中，而是始终具有相同的行标题。该代码打开目录中的每个工作簿并将其命名为wb。
我想参考wb在Vlookup公式，但有困难做它。当我尝试下面的代码时，它会给我一个“循环而不做”的错误(但当我运行相同的代码而没有公式，只是复制和粘贴范围，它是好的)。我还试着在wb中命名一个范围并引用它。
'Target File Extension
myExtension = "*.xls"
'Targe
浏览 3提问于2016-03-25得票数 1
回答已采纳
1回答
我有vba，工作很棒，打开一个文件的基础上，部分标准满足。但是当我打开多个文件时，下面的VBA打开的文件在完成后仍然是打开的，我在如何回调该工作簿以关闭它时遇到了问题，因为它打开了部分满足的参数。简而言之，打开一个文件(打开一个文件)，然后在另一个vba中复制数据，并将其粘贴到另一个工作簿中(在另一个VBA中完成)完成后，我希望将该工作簿重新启动并将其关闭。如果我执行activeworkbook.close，它将关闭我正在处理的不想要的工作簿。帮助我卡住了！
Sub OpenCopy()
Dim sPath As String
Dim sPartial As String
Dim sFName
浏览 0提问于2020-06-27得票数 0
1回答
我试图获得更好的编码实践和使用泛型功能。
我正在处理一个主文件中的几本工作簿。例如，如果我想得到最后一行，我将使用下面的代码行。
LastRow=Range("A" & Rows.Count).End(xlUp).Row
为了用函数检索值，我构建了这个函数：
-Function 1
Function GetLastRow() As Integer
GetLastRow = Range("A" & Rows.Count).End(xlUp).Row
End Function
现在，在我的Sub Main()中，我想对不同的工作簿或工作表使用Ge
浏览 0提问于2017-11-07得票数 1
回答已采纳
2回答
是否可以在Excel VBA中跨多个工作簿使用一个变量？而不使用外接程序方法？正如在中提到的。
例如，我将Windows用户名保存在var sysUser中，并希望在多个工作簿中使用此变量，我该如何操作？
感谢并致以最良好的问候
艾哈迈德
浏览 0提问于2013-07-22得票数 0
我是宏的基本用户，但现在陷入了以下困境。我打开了两个工作簿。我需要“另存为”，并使用工作簿% 1中某个单元格的文件名关闭工作簿%2。宏是从工作簿% 1运行的。很抱歉，这是我从internet所能得到的最大值。我猜是最后一行的变化。哦对了，我也不知道Dim是什么意思。
Dim FName As String
Dim FPath As String
FPath = "G:"
FName = Sheets("sheet 1").Range("A1").Text
ThisWorkbook.SaveAs Filename:=FPath & &
浏览 1提问于2012-09-28得票数 1
我使用Delphi2007的ExcelXP组件来连接MS Excel并填充工作表中的一些字段。这是它应该工作的方式，我可以修改我想要的工作表。
但是，我希望Excel在应用程序结束后保持打开状态，但前提是Excel中存在打开的工作表。我可以使用ExcelApplication.Workbooks.Count获取打开的工作簿的数量，因此在应用程序结束时检查是否打开了任何工作簿，以及在OnDestroy或类似的过程中关闭工作簿将是一项很容易的任务。
但是现在我遇到了这样一种情况:只要我的应用程序结束，Excel就会关闭，而不管是否有打开的工作簿。不是由于任何.Disconnect或.Quit调用，
浏览 0提问于2013-03-20得票数 1
回答已采纳
我有一个用VBA打开的工作簿，修改所述工作簿，然后关闭所述工作簿。到目前为止，我所拥有的是：
Sub OpenandModify()
application.screenupdating = false
workbooks.open Filename:="FilePath\WkbkName.xlsm"
*Modify Workbook
Workbooks("WkbkName.xlsm").close SaveChanges:=True
application.screenupdating = true
End Sub()
如果我在工作簿已打开的情况
浏览 20提问于2017-07-14得票数 0
1回答
我需要在一个工作簿中写一个宏，但在这个工作簿中，我需要告诉它到另一个工作簿复制一些数据并粘贴到包含宏的工作簿中，现在我遇到了引用另一个工作簿的问题，因为该工作簿的名称总是不同的，但是我正在复制的工作表的名称总是相同的。有没有一种简单的方法可以让Macro总是在不使用工作簿名称的情况下从正确的openbook获取数据？
非常感谢
浏览 2提问于2016-03-23得票数 0
我有一个工作簿，它有一个宏，它将一些数据复制到第二个文件中，然后尝试使用以下代码保护产生的工作表(和工作簿)：
OutputWb.Sheets("Sheet1").Protect Password:=pw, DrawingObjects:=True, Contents:=True, Scenarios:=True
OutputWb.Protect Password:=pw, Structure:=True, Windows:=False
问题是，当我打开OutputWb文件时，我可以取消对工作表和工作簿的保护，而不会要求我提供密码。
我到底做错了什么？为什么这不起作用？
浏览 2提问于2011-08-09得票数 1
回答已采纳
我有一些代码用于打开xlsm工作簿，从其中复制一些数据，并将其与代码一起粘贴到工作簿中。这两本工作簿都受到密码保护，代码也受到密码保护。我有一些代码要在保存、打开和关闭之前运行，这些代码锁定了工作簿。
所以问题是，在vba打开工作簿之后，代码就会停止，不会出现任何错误，如下所示。我认为这与shift键有关，这是我在网络上看到的关于open方法的问题，但我修改了代码以解决这个问题，问题仍然存在。然后，我尝试删除正在打开的工作簿中打开的on打开的代码，然后它就工作了。为什么会这样呢？我以前在打开代码的工作簿上运行过这样的代码，它运行得很好。
我正在使用Excel 2013。
Sub User_Up
浏览 5提问于2017-06-08得票数 0
回答已采纳
所以我要做的就是每年创建一个新的工作簿。如果工作簿的某个工作表中存在来自两个不同年份的数据，则会创建一个新工作簿。当它看到两个不同的年份时，它会创建一个新的工作簿，将.bat文件导入新的工作簿，然后将新的年份的信息从旧的工作簿粘贴到新的工作簿中。然后，它再添加三个工作表，并以与旧工作簿中相同的命名方式对它们进行命名。我遇到的问题是，当我运行新工作簿的宏时，它显示"Sheet2“为空，然后抛出一个错误。我知道所有4个工作表都在那里，因为当我调试代码时，我看到它们被添加了。但是当我进入VBA编辑器时，我在Microsoft Excel Objects文件夹下看到的是"Sheet1(
浏览 2提问于2018-01-05得票数 2
我有一个文件夹，其中每个员工都有一个excel工作簿(工作簿中只有一个工作表)。我想打开每个员工工作簿，读取$A$1中的单元格，然后写入另一个工作表。最终，我将有一个工作表，其中将包含所有的$A$1单元格，每个工作簿。我写了以下代码，但由于某些原因，我所指示的代码行不起作用。你能建议一下怎么做吗？谢谢
Private Sub CommandButton1_Click()
Const FOLDER As String = "c:\Junk\Employee Files\"
On Error GoTo ErrorHandler
Dim i As Integer
i = 0
D
浏览 0提问于2012-10-29得票数 2
我创建了一个Excel模板，让用户在默认情况下拥有一些可用的宏。
当我打开新的Excel工作簿时，一切顺利，宏显示在宏列表中，我可以正确地使用它。
当我从另一个应用程序生成工作簿(例如，将数据从macro导出到)时，生成的工作簿中没有宏，因此我认为篡改板是不被选中的。
我的模板是MSExcel2010 Macro-Enabled template (.xltm)。
我把它命名为Book.xltm。
我把它放在我配置文件中的XLStart文件夹中。
浏览 0提问于2013-03-12得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
