# How can I make a url button with (original) style?

I want the hyperlink to inherit the style of whatever text it was originally before converting it manually (or inherit style of embedding environment when done programmatically). Manually done:

cellExpression = Cell[TextData[{"Test", StyleBox["Bold",
FontColor -> RGBColor[0, 1, 0]]}], "Section"];
CellPrint@cellExpression


cellExpression = Cell[TextData[ButtonBox["TestBold", BaseStyle -> "Hyperlink",
ButtonData -> "www.stackexchange.com", None}]], "Section"];
CellPrint@cellExpression


One way is to reformat 2 , since the added hyperlink would remove my Bold, FontColorand such StyleBoxes, and it's tedious to reformat too many words in a wordlist one by one.

I want to add a hyperlink to 1 and keep the previous bold/color... styles, so that styles are inherited and maintained when exported to webpage used in my blog's page.

-
Do you really want a standalone button or the inline behaviour? –  Yves Klett Oct 6 at 9:59
@YvesKlett hi, no, I just want a hyperlink which keep the previous bold/color... such styles, and can be maintained when exported to webpage, used in my blog's page. –  HyperGroups Oct 6 at 10:42
In that case my answer is a bit OT... let me know if you deem it useful, otherwise I´ll delete it. –  Yves Klett Oct 6 at 11:27
@YvesKlett you r welcome, I think it's interesting, if no someone else/moderator feels it's OT, just keep it. –  HyperGroups Oct 6 at 11:39
Have you tried editing the style "Hyperlink" in the notebook's stylesheet? –  Michael E2 Oct 6 at 12:35
show 1 more comment