DevOps, CI/CD and Automation

I'm getting an error for a VB I created to "refresh all" in smart view.

Here is the error:
Error in Grid XML: each dimension must be used once and only once.

Macro used: HFM Refresh macro

Dim X As Variant
Dim oBar As CommandBar
Dim ws As Worksheet

Set oBar = Application.CommandBars("Worksheet Menu Bar")

oBar.Controls("Hyperion").Controls("Refresh").Execute
End Sub