Redmine EXCEL VBA 表格式添加宏（Macro）

使用说明：

EXCEL VBA Macro 宏命令，用于自动添加Redmine表格格式，省去手动添加的麻烦。 此版本为按钮封装版，只需将需要添加Redmine表格格式的表格贴进去，然后点击按钮即可添加Redmine表格格式。注：由于上一版本表格忘记保存为xlsm（在其他页面，与此页面没有关联），因此代码丢失，现已重写并保存为xlsm。给诸位带来不便，深表歉意。

Sub rebuild()
Dim i As Integer
Dim j As Integer
Dim h As Integer

i = Sheets(1).UsedRange.Rows.Count
j = Sheets(1).UsedRange.Columns.Count

For h = j To 1 Step -1
    Columns(h).Insert
    Range(Cells(1, h), Cells(i, h)).Select
    Selection.FormulaR1C1 = "=""|_."""
Next
    j = 2 * j + 1
    Range(Cells(1, j), Cells(i, j)).Select
    Selection.FormulaR1C1 = "|"
End Sub

下载链接： https://download.csdn.net/download/tzx200911911/10749664