停用Excel 365 VBA中的某个范围
当Excel 365中的某个范围被激活时,单元格将变为灰色。当子程序完成并退出时,它们保持灰色。我假设在退出子例程之前要停用该范围,以使单元格变为白色。Microsoft帮助页中没有很好地处理此主题。有什么建议吗?sub为用户提供了正确的外观,但无法解决问题停用Excel 365 VBA中的某个范围,vba,range,excel-365,Vba,Range,Excel 365,当Excel 365中的某个范围被激活时,单元格将变为灰色。当子程序完成并退出时,它们保持灰色。我假设在退出子例程之前要停用该范围,以使单元格变为白色。Microsoft帮助页中没有很好地处理此主题。有什么建议吗?sub为用户提供了正确的外观,但无法解决问题 Sub TestActivate() Dim myWkBk As Workbookr code here` Dim myWkSh As Worksheet Dim myRange As Range Set myWkBk = ThisWor
Sub TestActivate()
Dim myWkBk As Workbookr code here`
Dim myWkSh As Worksheet
Dim myRange As Range
Set myWkBk = ThisWorkbook
Set myWkSh = myWkBk.Worksheets("Sheet1")
Set myRange = Range("A1:L50")
myRange.Activate
Cells(1, 1).Value = 1
Cells(2, 1).Value = 2
Range("A1:L50").Interior.ColorIndex = -4142
End Sub
最好的方法是首先不要激活范围:
Sub TestActivate()
Dim myWkBk As Workbook
Dim myRange As Range
Set myWkBk = ThisWorkbook
Set myWkSh = myWkBk.Worksheets("Sheet1")
Set myRange = Range("A1:L50")
With myRange
.Cells(1, 1).Value = 1
.Cells(2, 1).Value = 2
End With 'myRange
End Sub
嗯