Find specific cell, then dim its value as string

Need to:

1. Find column with header title "quantity" (i.e. text in first row for that column is "quantity")
2. Dim the contents of the third row of that column as a string