Imports EnvDTE Imports System.Diagnostics Public Module OpenPartnerFile ' if this file is a .cpp then open up the .h ' or vice versa Sub OpenPartnerFile() Dim FileName As String Dim PartnerFileName As String FileName = DTE.ActiveDocument.FullName If (FileName.EndsWith(".h")) Then PartnerFileName = FileName.Substring(0, FileName.Length() - 2) + ".cpp" End If If (FileName.EndsWith(".cpp")) Then Pa..