首页 文章

Excel宏VBA插入

提问于
浏览
0

我正在尝试使用VBA编写宏来在选择上方添加一个新行 . 为此,我使用以下内容:

Sheets(1).Select Rows("4:4").EntireRow.Insert

但每当我插入这个新行时,Excel会自动复制高级行格式 . 有没有办法插入这条新线复制 only 表格边框?谢谢 .

1 回答

  • 0

    我错了,但我认为你不能这样做 . 我的建议是在_2729334之后做这样的事情:

    Sheets(1).Select
    Rows("4:4").EntireRow.Insert
    Rows("4:4").EntireRow.ClearFormats ' <--- ADD THIS
    ' Call a Sub, e.g. "FormatMyBorders", to format your borders,
    ' passing the row as a parameter.
    FormatMyBorders(Rows("4:4").EntireRow) ' <--- AND THIS
    

    您可以使用其他“技巧” . 例如,使用您想要插入新行的位置的所需格式从另一个位置复制/粘贴临时行,然后插入新行(将继承临时行的格式),然后删除临时行 . 它可能比我上面说的要繁琐得多,但是从长远来看,根据需要设置一个Sub来格式化行边框可能对你有用 .

相关问题