Add fMakeExcelLink function for generating Excel hyperlink formulas
This commit is contained in:
15
power-query/fAddLogEntry.m
Normal file
15
power-query/fAddLogEntry.m
Normal file
@@ -0,0 +1,15 @@
|
||||
let
|
||||
fAddLogEntry = ( T_MESSAGE as text,
|
||||
optional I_LEVEL as number,
|
||||
optional LST_EXISTING as nullable list) as list =>
|
||||
let
|
||||
ExistingData = if P_LINK = null then "" else P_LINK,
|
||||
LinkText = if P_LINK_TEXT = null then
|
||||
try fP("LINK_SYMBOL") otherwise P_LINK
|
||||
else
|
||||
P_LINK_TEXT,
|
||||
Result = "=ГИПЕРССЫЛКА(""" & Link & """;""" & LinkText & """)"
|
||||
in
|
||||
Result
|
||||
in
|
||||
fAddLogEntry
|
||||
14
power-query/fMakeExcelLink.m
Normal file
14
power-query/fMakeExcelLink.m
Normal file
@@ -0,0 +1,14 @@
|
||||
let
|
||||
fMakeExcelLink = ( P_LINK as nullable text,
|
||||
optional P_LINK_TEXT as nullable text) as text =>
|
||||
let
|
||||
Link = if P_LINK = null then "" else P_LINK,
|
||||
LinkText = if P_LINK_TEXT = null then
|
||||
try fP("LINK_SYMBOL") otherwise P_LINK
|
||||
else
|
||||
P_LINK_TEXT,
|
||||
Result = "=ГИПЕРССЫЛКА(""" & Link & """;""" & LinkText & """)"
|
||||
in
|
||||
Result
|
||||
in
|
||||
fMakeExcelLink
|
||||
Reference in New Issue
Block a user