Welcome to FreeSoftwareServers Confluence Wiki
https://stackoverflow.com/questions/7643652/finding-active-cells-column-header-name-using-vba-in-excel
Target.Offset(1 - Target.Row).Value