Using Exchange.Contents with a parameter

[peter789]

In Power Query I am connecting to my Outlook account to collect data from the Calendar.
All is fine using the syntax Exchange.Contents("abc@xyz.com"). To enable this to be shared with other users I would like to enter the email address in a cell in the spreadsheet and pass it to the query. I can create a query with the email address in it but when I substitute the code above with Exchange.Contents(emailaddress) I get the dreaded Formula.Firewall error. Does anyone have any solutions or suggestions please?

 

[peter789]

I think I have solved the problem.
Initially I was attempting to refer directly to the value in the parameter:

let
Source = Excel.CurrentWorkbook(){[Name="Parameters"]}[Content],
Value = Source{0}[Value]
in
Value
...
let
Source = Exchange.Contents(Parameters),
Calendar1 = Source{[Name="Calendar"]}[Data],
etc.

This resulted in the error.

I have since tried two methods using a function to obtain the email address either from a table or a named cell. They both work fine. One I borrowed from a reply to a post made on here yesterday. (Thanks Ron Coderre)!

(ParameterName as text) =>
let
ParamSource = Excel.CurrentWorkbook(){[Name=ParameterName]}[Content],
Result = ParamSource{0}[Column1]
in
Result

...
let
Emailaddress=fnGetNamedCellVal("ParameterAddress"),
Source = Exchange.Contents(Emailaddress) as table,
etc.


Peter