(Excel) Load Certificate from Smart Card by Common Name

See more Certificates Examples

This example requires Chilkat v9.5.0.87 or greater. It uses a Windows-only function named LoadFromSmartcard.

This example loads a certificate specified by its subject common name (CN part of the Subject). The LoadFromSmartcard method will examine the connected smart cards and USB tokens and will find and load the certificate having the specified CN.

Download Excel Class Modules Chilkat Excel Class Modules

' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

Dim cert As Chilkat.Cert
Set cert = Chilkat.NewCert

' To load the certificate specified by CN, pass the string "CN=<subjectCN>".  For example:

success = cert.LoadFromSmartcard("CN=Ch application signature (8c9be8e0-5544-4cd0-9062-290fbff353a7)")
If (success = False) Then
    Debug.Print cert.LastErrorText
    Debug.Print "Certificate not loaded."
    Exit Sub
End If

Debug.Print "Found: "; cert.SubjectDN; " serial="; cert.SerialNumber

' Here's another example:
Dim cert2 As Chilkat.Cert
Set cert2 = Chilkat.NewCert
success = cert2.LoadFromSmartcard("CN=yubikey rsa 1024 authentication")
If (success = False) Then
    Debug.Print cert2.LastErrorText
    Debug.Print "Certificate not loaded."
    Exit Sub
End If

Debug.Print "Found: "; cert2.SubjectDN; " serial="; cert2.SerialNumber