VBA Outlook Sender name and Folder chosing

Question

I am trying to get some data points from my outlook via email through VBA. This is the code:

Sub GetDataFromOutlook()


Dim OutlookApp As Outlook.Application