How to use VBS to manage Calc files?

I am learning VBS scripts and someone gave me a code below, that works with Microsoft Excel. How to convert it to works with LibreOffice Calc?

Dim ObjExcel 
Call ExcelSetup("Sheet1")

Sub ExcelSetup(sheetName)
  Set objExcel = CreateObject("Excel.Application") 
  Set objwb = objExcel.Workbooks.Add 
  Set objwb = objExcel.ActiveWorkbook.Worksheets(sheetName) 

  Objwb.Name = "Sheet name for user"
  objwb.Activate 
  objExcel.Visible = True 
  objwb.Cells(1, 2).Value = "Hello world!" 
End Sub 

MsgBox "The End"

I suggest you, to forget MS VBA, and learn LO Basic scripting. The syntax is really same, not for all functions, but almost all the same. You can start looking in: LibreOffice Basic Programmer’s Guide - Ask LibreOffice Don’t expect, that copy-pasting works without doubt, you will still need to adjust MS VBA to LO Basic.

P.S. I saw, that you got answer on Stackexchange. Try looking for older question, but relevant to you: Import MS-Word Macros - #2 by stfhell

Just a note: VBS != VBA.