Lesen und Schreiben von / in die Registrierung in VBA

Ich habe diese Zeile in C # gesehen und versuche, sie an VBA anzupassen:

Microsoft.Win32.Registry.SetValue(@"HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\USBSTOR", "Start", 4,Microsoft.Win32.RegistryValueKind.DWord);

Ich bin hier mit einigem Fehler ziemlich verloren:

Runtime: 5 - ungültiger Prozeduraufruf)

Wenn ich die Standard-i_Type-Zeichenfolge "REG_SZ" anstelle von "Start" verwende, wird ein Fehler im Zusammenhang mit dem Registrierungsschlüssel angezeigt:

Runtime - -2147024891 [80070005] ungültiges Stammverzeichnis

Mein Code:

Dim i_RegKey As String, i_Value As String, i_Type As String
Dim myWS As Object
i_Type = "REG_SZ"  ' Optional
'access Windows scripting
Set myWS = CreateObject("WScript.Shell")
'write registry key
i_RegKey = "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\USBSTOR\Start"
i_Value = "4"
i_Type = "REG_DWORD"
myWS.RegWrite i_RegKey, i_Value, i_Type