you would need to compare the found column with the range column like
Code:
DiscountColumn = Sheet4.range("ExportHeadings").Find(What:=DiscountString, MatchCase:=False).Column - Sheet4.range("ExportHeadings").Column +1