Hallo zusammen,
ich komme bei der Umsetzung von einer RSA-Signierung über den "RSACryptoServiceProvider" in Excel VBA leider nicht weiter.

Orientiert habe ich mich bei der Umsetzung an diesem Beispiel aus .NET
https://msdn.microsoft.com/de-de/lib...v=vs.110).aspx

Der nachfolgende Code stoppt bei der Signierung mit "Ungültiger Prozessaufruf..."

Ich hoffe mir kann bei dem genannten Problem jemand weiterhelfen!

Sub Sign()

    Set csp = CreateObject("System.Security.Cryptography.RSACryptoServiceProvider")

    ' Erzeugen der RSA Schlüssel
    privKey = csp.ExportParameters(True)
    pubKey = csp.ExportParameters(False)

    ' Erzeuge Teststring für Signierung
    Dim dataString As String
    dataString = "Data"

    ' Konvertierung des Strings in Byte
    Dim dataByte() As Byte
    dataByte = StrConv(dataString, vbFromUnicode)

        
    ' Erzeuge Hash der Daten mit SHA1CryptoServiceProvider und Signiere
    Set RSAalg = CreateObject("System.Security.Cryptography.RSACryptoServiceProvider")
    Set SHA = CreateObject("System.Security.Cryptography.SHA1CryptoServiceProvider")

    ' Lade erzeugten PublicKey
    RSAalg.ImportParameters (pubKey)

    ' Erzeuge signed Data
    Dim signedData() As Byte
    signedData = RSAalg.SignData(dataByte(), SHA)

End Sub

Vielen Dank schon jetzt für die Hilfe!!   :)