Que raro que te permita introducir caracteres como S/ así tal cual, a mi me funciona escapando dichos caracteres con doble comillas:

objHojaExcel.Range("h16:h52").Range("h16:h52").NumberFormat = """S/ ""#,##0.0000"

El símbolo de soles no pertenece al juego de caracteres permitido para NumberFormat, el carácter de moneda por defecto es $, es decir, puedes utilizar la configuración de formato del sistema o que el usuario haya fijado en su excel con:

objHojaExcel.Range("h16:h52").Range("h16:h52").NumberFormat = "$ #,##0.0000"

- Si el formato de moneda del excel o sistema tiene como símbolo el de Soles, pues se mostrará algo así: S/. 123.456.789,1234 aunque yo tengo configurado como separador de miles al espacio y al de decimales al punto: S/. 123 456 789.1234

Claro que si quieres poner un símbolo de moneda fijo lo tienes que poner entre comillas, pero como está en un String lo tienes que escapar con doble comillas.