Excel 在所选单元格上应用Outisde边框
我想知道如何应用外部边界(范围A1:M4),而不在代码中加入“工作表”或“工作表”。 比如说Excel 在所选单元格上应用Outisde边框,excel,vba,Excel,Vba,我想知道如何应用外部边界(范围A1:M4),而不在代码中加入“工作表”或“工作表”。 比如说 With Worksheets("Sheet1").Range("B8:I10").BorderAround [INDENT].LineStyle = xlContinuous[/INDENT] [INDENT].Weight = xlThick[/INDENT] End With 或 这是因为工作表尚未设置(我的用户界面格式将如何设置),并且我正在使用VBA模块。您可以尝试在变量中分配新创建
With Worksheets("Sheet1").Range("B8:I10").BorderAround
[INDENT].LineStyle = xlContinuous[/INDENT]
[INDENT].Weight = xlThick[/INDENT]
End With
或
这是因为工作表尚未设置(我的用户界面格式将如何设置),并且我正在使用VBA模块。您可以尝试在变量中分配新创建的工作表。这将返回工作表名称
Option Explicit
Dim MainWorkBook As Workbook
Dim MainWorksheet As Worksheet
Sub ReturnWorkSheetName()
Set MainWorkBook = ActiveWorkbook
Set MainWorksheet = MainWorkBook.ActiveSheet
MsgBox MainWorksheet.Name
End Sub
您可以尝试在变量中分配新创建的工作表。这将返回工作表名称
Option Explicit
Dim MainWorkBook As Workbook
Dim MainWorksheet As Worksheet
Sub ReturnWorkSheetName()
Set MainWorkBook = ActiveWorkbook
Set MainWorksheet = MainWorkBook.ActiveSheet
MsgBox MainWorksheet.Name
End Sub