Vba code of opening a save as dialog box and writing a string into it is not working in libreoffice

[Rajbir]

Dim vFile As Variant

 vFile = Application.GetSaveAsFilename(InitialFileName:=Sheets("SIMPLE").Cells(2, 2) & "_config.yaml",FileFilter:="YAML Config File (*.yaml), *.xlsb, All files (*.*), *.*",Title:="Save Config File As:")

If vFile <> False Then
    Call saveFile(vFile, yaml)
    MsgBox ("File Saved")
End If

End Sub

Sub saveFile(fileName As Variant, content As String)

Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")   
Dim oFile As Object       
Set oFile = fso.CreateTextFile(fileName)            
oFile.WriteLine content
oFile.Close            
Set fso = Nothing
Set oFile = Nothing

End Sub

[MarioJ1]

As far as I know, VBA code cannot be executed in Libreoffice