Search for a date in a row and scroll to date column when found

Hello,

I have limited VBA experience. I have a date calculated by a formula in cell C1 with format "D-mmm-yr" so today is "6-Apr-17". Row 4 consists of sequential dates starting in column H and going up with the same format. Columns A-G are frozen.

I need code that will look at the value of C1 (not the formula), find that value (not the formulas) in Row 4, and set that column as the left most column after the frozen panes. I have it as a worksheet activate, but would rather it be a worksheet change as the range of dates will change based on how the data is filtered. This is the code I have so far after researching on this forum.

Please Login or Register  to view this content.

I am getting Run-time error '91': Object variable or With block variable not set. After researching that error, I'm assuming I have a problem with not defining my 'TgtCol' line. I've tried several different definitions with no luck. Any help would be appreciated.

I don't think I follow. The date calculated in C1 can show up anywhere from H4 to ZZZ4, but always in row 4. I just want the code to find it and scroll to it.