简述mybatis的体系结构
更新时间:2023-07-06 11:07
最满意答案
thisworkbook指当前VBA代码所处的Workbook, Activeworkbook指当前活跃的Workbook 相同点:如果VBA代码只对本身工作簿进行操作,则一直是相同的 不同点:若VBA代码新建或打开了其它工作簿,则往往新建的或刚打开的是Activeworkbook,可以通过 “工作簿名。active”方法激活指定对象
其他回答
thisworkbook是执行该宏时的工作簿。 activeworkbook是当前操作的活动工作簿,宏运行过程中可能需要切换到其他文件或打开文件如,在文件1中通过vba打开文件2,那么文件1是this而文件2是active
相关问答
更多-
theworkbook 和activeworkbook 的区别 谢了[2023-07-20]
没有TheWorkbook,我想你说的应该是ThisWorkbook。 ThisWorkbook指的是宏代码所在的那个工作簿(也就是包括宏代码的工作簿)。而ActiveWorkbook指的是当前活动工作簿。 ActiveWorkbook可以与ThisWorkbook相同(即当前活动工作簿也就是你运行代码的工作簿)。 -
在VBA中表示当前工作簿,有Activeworkbook和Thisworkbook区别?[2023-09-04]
thisworkbook指当前VBA代码所处的Workbook, Activeworkbook指当前活跃的Workbook 相同点:如果VBA代码只对本身工作簿进行操作,则一直是相同的 不同点:若VBA代码新建或打开了其它工作簿,则往往新建的或刚打开的是Activeworkbook,可以通过 “工作簿名。active”方法激活指定对象 -
在大多数情况下使用ActiveWorkbook更好的是使用WorkBooks("Book1")这更具体和更健壮,我相信执行速度比激活工作簿,然后在引用范围时指向它。 如果在使用Range("A1")这样的代码行时未指定VBA,则VBA将默认为最后一个活动工作簿。因此,如果仅使用一个工作簿,则不需要,因为上一个活动工作簿始终应该是工作簿您希望执行代码。我通常只在单个工作簿中工作时指定工作表和范围,因为如果在没有特定工作簿的情况下默认情况下已经完成工作簿,请告诉excel选择活动工作簿有点多余工作簿指定。 只要 ...
-
试试这个,看看它是否有效。 它将在ThisWorkbook复制Sheet2并将其粘贴到ActiveWorkbook Sheet1之后 Option Explicit Public Sub copy_sheet() Dim source_worksheet As Worksheet Set source_worksheet = ThisWorkbook.Worksheets("Sheet2") Dim target_worksheet As Worksheet Set t ...
-
而不是activeworkbook使用activeworkbook返回代码所在的工作簿。 为了使它活跃thisworkbook.activate应该工作 Instead of activeworkbook use thisworkbook which returns the workbook in which the code resides. To make it active thisworkbook.activate should work
-
见下文。 这将使用当前活动工作簿并查看具有最新修改日期的Excel文件的C:\Your\Path 。 然后它将打开文件并从第一张工作表中复制内容并将其粘贴到原始工作簿中(在第一张工作表上): Dim fso, fol, fil Dim wkbSource As Workbook, wkbData As Workbook Dim fileData As Date Dim fileName As String, strExtension As String Set wkbSource = ActiveWor ...
-
它不起作用,因为您没有限定该语句的Cells组件。 你需要以下 - 注意. 在Cells之前: With ThisWorkbook.Sheets("Sheet1") .Range(.Cells(1,1), .Cells(2, 2)).Value = 1 End With 编辑:进一步澄清评论。 通过离开. 关闭工作表/范围/单元格,您告诉Excel您需要活动父项。 Ie Cells(1, 1) ActiveSheet.Cells(1,1)与ActiveSheet.Cells(1,1)和Range( ...
-
工作簿对象具有可以使用的“HasPassword”属性: Public Sub TestIt() If ActiveWorkbook.HasPassword Then MsgBox "Password Protected" Else MsgBox "Not Password Protected" End If End Sub A workbook object has a 'HasPassword' property you can use: P ...
-
而不是使用以下方法创建新工作簿: Set WBK = Workbooks.Add 考虑使用类似的东西: Sub lkjhgf() ThisWorkbook.SaveCopyAs ("C:\Users\Garys\Desktop\new.xlsm") End Sub 新创建的工作簿将包含原始工作簿的所有ThisWorkbook代码。 (当然,您可能需要进行更多清理才能删除不需要复制的内容。) 编辑#1: 请参阅Vogelaar的答案: 使用VBA将子例程加载到“ThisWorkbook”中 Rat ...
-
背景: 基于此声明代码停止,如果我调试并按F8它工作正常,但它不会自己运行。 我认为问题依赖于处理器的速度与代码不同步(自己的经验)。 解: 由于它是Excel并且问题似乎仅依赖于实例本身的打开,因此您可以使用Application wait或任何其他函数来解决此问题 。 进一步思考: 在这种情况下,我会想到生命周期。 这个网页有一个excel实例的整洁生命周期图(附件,因为我将尝试解释这个场景) 您可能会看到“应用程序”是Excel应用程序的第一个循环,然后是“打开”,然后是“工作簿”对象之后,可能会发生 ...