有的时候,我们要在Excel中添加斜线表头,可Excel并没有提供制作斜线表头的功能,每次都要手工画一条斜线,非常麻烦。有没有解决方法呢?其实,我们可以利用VBA代码可以编写一个功能,一键插入Excel斜线表头。
用控件工具箱中的命令按钮控件,在工作表中绘制一个命令按钮,将Caption属性改为一键插入斜线表头,双击该按钮,在Click事件中编写代码,其中关键代码如下。
关键代码:
"获取行标题和列标题
Dim icol, irow As String
icol=InputBox("请输入斜线单元格的行标题", 行标题)
irow=InputBox("请输入斜线单元格的列标题", 列标题)
Selection.Valu...[ 查看全文 ]