public static class InsertionMacroVBAinFile
    {
        public static void InsertMacroInExcel(Microsoft.Office.Interop.Excel.Application app, Microsoft.Vbe.Interop.VBComponent xlMod)
        {

            string macroCode =
                //"Sub main()\r\n" +
                //"   MsgBox \"Hello world\"\r\n" +
                //"End Sub";

                "Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)\r\n" +
                "   If Target.Column = 2 Then\r\n" +
                "       fname = ThisWorkbook.Path & Application.PathSeparator\r\n" +
                "       Link = fname & ActiveCell & \" .png\" \r\n" +
                "       On Error GoTo NoCanDo\r\n" +
                "       ActiveWorkbook.FollowHyperlink Address:= Link, NewWindow:= True\r\n" +
                "       Running = False\r\n" +
                "   End If\r\n" +
                "   Exit Sub\r\n" +
                "NoCanDo:\r\n" +
                "           MsgBox \"Cannot find or open \" & Link\r\n" +
                "   Running = False\r\n" +
                "End Sub";

            xlMod.CodeModule.AddFromString(macroCode);
            
        }