Extending lines

Im looking for a macro function that will let me grab one or multiple lines, and have them extend to meet where they would intersect on another object or line. Similar to how the extend / trim function works in Autocad. 

In this image, the lines would need to extend inward to meet the arc.