Thanks for your reference,
The VBA code for the input window of a button in Excel is as follows, and PAD just uses UI elements to capture the input window.
dataDir = Application.GetOpenFilename("Excel file(*.xlsm & *.xlsx & *.xls & *.xla & *.xlt),*.xlsm;*.xlsx;*.xls;*.xla;*.xlt", , "Select data file", MultiSelect:=False)