【发布时间】:2017-06-04 23:45:29
【问题描述】:
当前代码是
lngLastRowDPWK = ActiveSheet.Cells(Activesheet.Rows.Count,"DX".End(xlUP).Row+3
Range("DP" & lngLastRowDPWK:"DV" & lngLastRowDPWK +2).select
我希望它突出显示 DP-DV 列中的几行,但行号是一个变量。 任何帮助表示赞赏。谢谢
【问题讨论】:
当前代码是
lngLastRowDPWK = ActiveSheet.Cells(Activesheet.Rows.Count,"DX".End(xlUP).Row+3
Range("DP" & lngLastRowDPWK:"DV" & lngLastRowDPWK +2).select
我希望它突出显示 DP-DV 列中的几行,但行号是一个变量。 任何帮助表示赞赏。谢谢
【问题讨论】:
Sub test()
'You were missing a ")"
lngLastRowDPWK = ActiveSheet.Cells(ActiveSheet.Rows.Count, "DX").End(xlUp).Row + 3
'You weren't creating the string correctly
Range("DP" & lngLastRowDPWK & ":DV" & lngLastRowDPWK + 2).Select
End Sub
【讨论】:
.Select/`.Activate