How to invoke vba for private worksheets using uipath

Hi, below are my codes. How can I use Invoke VBA activity for below codes?

In the module,
Sub Hi()
Dim i As Long
Dim j As Long
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For i = 2 To 7820
For j = 8 To 48 Step 8
Run "Sheet1.Worksheet_change", Cells(i, j)
Next j
Next i
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub

In the worksheet,
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = "False" Then Target.Offset(0, -1).Font.Color = 255 Else Target.Offset(0, -1).Interior.Color = xlNone
End Sub

Thank you xoxo

How is this related to UiPath ?

I am using UiPath and the invoke VBA activity. Thus, I am asking if can use invoke VBA for above codes, if so how?

Open Excel-> open Script tab Alt+F11 the you can choose module and write this code(either save it in text file read it form text file and write in window/ save it in variable and write it). then you can execute.

I am still not clear…

Hi DivyaShreem, Can u give a detial of it. Coz i dont want to show case the vb script in .txt file. So how can i do it???

Then invoke >VbScript code