Identification from Excel to Get JWT token

Content

Hello,

I am using custom excel spreadsheets to call REST API using basic identification with username and password included in VBA code...

I would like to remove credentials data from the code and use JWT token to first, ask user to enter his credentials and then use APIs..

 

Here is the code I have, it displays the Oracle identification windows, but I don't know how to retrieve token data (to be used later with Bearer identification) once credentials are entered:

----------------------------------------------------------------------------------------------------------------------

Dim oBrowser As InternetExplorerMedium 'InternetExplorer
'create IE object
Set oBrowser = New InternetExplorerMedium 'InternetExplorer

'open identification windows
strUrl = "https://&quot