Helper function for RStudio Addin. This function is complicated because of one thing: You can highlight also just parts of lines.
style_active_region()