excel中我要新建一个控件，（控件按之前显示隐藏列）按一下隐藏F,H,I列，控件显示“显示列”再点击显示列

Private Sub CommandButton1_Click()
With CommandButton1
   If .Caption = "隐藏列" Then
          Columns("F").Hidden = True
          Columns("H").Hidden = True
          Columns("I").Hidden = True
 
         .Caption = "显示列"
      Exit Sub
   End If
   If .Caption = "显示列" Then
        Columns("F").Hidden = FALSE
        Columns("H").Hidden = FALSE
        Columns("I").Hidden = FALSE
          .Caption = "隐藏列"
      Exit Sub
   End If
End With
End Sub