我正尝试使用以下方法在活动单元格行上应用范围A到范围M的边框。
Range("A:" & ActiveCell.Row & "M" & ActiveCell.Row).Borders(xlInsideHorizontal).LineStyle = xlContinuous
出于某些原因,这不起作用,请求有人能告诉我我要去哪儿吗?
由于
答案 0 :(得分:1)
你有两个问题。
首先,你的结肠位于错误的位置。例如:
Range("A:" & ActiveCell.Row & "M" & ActiveCell.Row).Borders(xlInsideHorizontal).LineStyle = xlContinuous
应该是:
Range("A" & ActiveCell.Row & ":M" & ActiveCell.Row).Borders(xlInsideHorizontal).LineStyle = xlContinuous
其次,xlInsideHorizontal将边框放在范围内,但是您选择的是没有内边框的范围。
想象一下你的活动行是10.你的代码在说:
Range("A10:M10").Borders(xlInsideHorizontal).LineStyle = xlContinuous
范围A10到M10没有内部单元格来应用内部边框。