2
$\begingroup$

I have two lists. One is hyperlinks, the other is the title for each link

I see that there was a bug in exporting this in 11.2

which I hope has been fixed. All I want to do is export to Excel my list of names with the hyperlinks embedded in them, a kind of merge operation

Here is a sample

Transpose[{shortlist, shortnames}]

Which outputs this

(*{{"https://www.imdb.com/title/tt3053860/?ref_=nv_sr_srsg_0","The Chef's Wife (2014)"},{"https://www.imdb.com/title/tt1073241/?ref_=nv_sr_srsg_2","Nothing But the Truth (2008)"},{"https://www.imdb.com/title/tt1226774/?ref_=nv_sr_srsg_0","In the Loop (2009)"},{"https://www.imdb.com/title/tt8925546/?ref_=nv_sr_srsg_0","Getting to Know You (2020)"}}*)
$\endgroup$

2 Answers 2

0
$\begingroup$

I am running v12.2.0, Win7-x64 and 2013 Excel.

data = {{"https://www.imdb.com/title/tt3053860/?ref_=nv_sr_srsg_0", 
   "The Chef's Wife (2014)"}, \
{"https://www.imdb.com/title/tt1073241/?ref_=nv_sr_srsg_2", 
   "Nothing But the Truth (2008)"}, \
{"https://www.imdb.com/title/tt1226774/?ref_=nv_sr_srsg_0", 
   "In the Loop (2009)"}, \
{"https://www.imdb.com/title/tt8925546/?ref_=nv_sr_srsg_0", 
   "Getting to Know You (2020)"}}

dataexp = {Hyperlink @@ {Last@#, First@#}, Last@#} & /@ data

Export["C:/test.xlsx", dataexp]

enter image description here

$\endgroup$
1
  • $\begingroup$ If it is not inconvenient, please leave a helpful comment as you downvote. $\endgroup$
    – Syed
    Feb 14, 2023 at 16:39
2
$\begingroup$
With[
    {
        links = {
                    {"https://www.imdb.com/title/tt3053860/?ref_=nv_sr_srsg_0","The Chef's Wife (2014)"},
                    {"https://www.imdb.com/title/tt1073241/?ref_=nv_sr_srsg_2","Nothing But the Truth (2008)"},
                    {"https://www.imdb.com/title/tt1226774/?ref_=nv_sr_srsg_0","In the Loop (2009)"},
                    {"https://www.imdb.com/title/tt8925546/?ref_=nv_sr_srsg_0","Getting to Know You (2020)"}
                }
    },
    Export[
        "test.XLSX",
        Apply[Hyperlink,Reverse[#]] & /@ links 
    ]
]

enter image description here

$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.