Regestry-Eintrag mit Excel
14.07.2022 15:10:42
Micha
ich bin weiter am VBA-Lernen und bin nun bei einer weiteren Sachen angekommen, die ich (noch) nicht gelöst bekomme. Das Schreiben etc. in die Registry funktioniert soweit eigentlich. Nur bekomme ich eine Nuss noch nicht geknackt:
Sub RegWrite_Comp()
Set wsh = CreateObject("WScript.Shell")
strKeyPath = "HKCU\SOFTWARE\Adobe\Acrobat Distiller\PrinterJobControl\"
strKeyString = "C:\windows\SPLWOW64.exe"
Dim i_Type As String
i_Type = "REG_EXPAND_SZ" '"REG_SZ"
With wsh
.RegWrite strKeyPath & strKeyString, "test", i_Type
End With
Set wsh = Nothing
End Sub
Wenn ich wie bei strKeyString angegeben einen Pfadangabe in die Bezeichnung schreiben möchte, wird durch das obige Makro ein bzw. mehrere neue Schlüssel, jedoch nicht nur eine Zeichenfolge angelegt.Das gewünschte Ergebnis soll sein:
- im Schlüssel/Pfad: "HKCU\SOFTWARE\Adobe\Acrobat Distiller\PrinterJobControl\"
- soll die Zeichenfolge mit Namen "C:\windows\SPLWOW64.exe" angelegt werden
- die Zeichenfolge soll den Wert "test" haben
Das nicht gewünschte Ergebnis ist jetzt/bisher bei mir:
- im Schlüssel/Pfad: "HKCU\SOFTWARE\Adobe\Acrobat Distiller\PrinterJobControl\"
- wird eine neue Schlüsselfolge "C:\windows\" angelegt, so dass der Pfad "HKEY_CURRENT_USER\SOFTWARE\Adobe\Acrobat Distiller\PrinterJobControl\C:\windows" lautet
- darin die Zeichenfolge mit Namen "SPLWOW64.exe" angelegt werden, die den Wert "test" erhält
Daher nun meine Frage: Wie schaffe ich es, dass die Zeichenfolge tatsächlich den Namen "C:\windows\SPLWOW64.exe" erhält?
Vielen Dank bereits vorab für Eure Hilfe und Hinweise!!