首页 > 解决方案 > VBA for Excel:将底部边框添加到由串联定义的单元格范围时编译错误

问题描述

我想为我正在处理的宏添加一些格式,该宏从单元格 B3:Ex 中绘制边框,其中 x 在宏的其他位置定义:

'Format cells so looks pretty:
  Columns("A:B").ColumnWidth = 3.86
  Range("B1").Font.Size = 18
  Range("B1:E1").Borders(xlEdgeBottom).Weight = xlThick
    Range("B3:B" & x + 1).Borders(xlEdgeLeft).Weight = xlThick
  Range("E3:E" & x + 1).Borders(xlEdgeRight).Weight = xlThick
      Range("B3:E3" & x + 1).Borders(xlEdgeTop).Weight = xlThick

这适用于添加顶部和侧边边框,但是当我尝试使用代码做底部时:

Range("B" & x + 1 ":E" & x + 1).Borders(xlEdgeBottom).Weight = xlThick

我收到错误消息:

错误信息截图

我认为这是一个语法错误,但我对 VBA 很陌生,所以无法准确计算出我需要更改的内容。任何人都可以建议吗?

标签: excelvbacompiler-errorsconcatenation

解决方案


推荐阅读