dte.ActiveDocument.Selection.Insert(String.Format(l_cHeader.ToString(), document.Name))me lève une exception System.Runtime.InteropServices.COMException (0x80041001)
Dim dte As EnvDTE80.DTE2
dte = System.Runtime.InteropServices.Marshal.
GetActiveObject("VisualStudio.DTE.14.0")
Dim document As Document
document = dte.ActiveDocument
document.Selection.StartOfDocument()
document.Selection.LineDown(True, 2)
Dim l_cHeader As New StringBuilder
l_cHeader.Append("///////////////////////////////////////////////////////////////////////////////")
l_cHeader.AppendLine()
l_cHeader.AppendLine()
l_cHeader.Append("// Nom fichier : {0}")
document.Selection.StartOfDocument()
document.Selection.LineUp()
document.Selection.Insert(String.Format(l_cHeader.ToString(), document.Name))
document.Selection.NewLine()
2 mai 2017 à 16:42