Using Cell Reference in VBA Find/Replace

[cheapskate2]

Hi all,

First post to the forum. Basic Excel skills and no VBA experience. I'm wanting to use a cell value as part of a string in a Find/Replace script. Here's what I have so far...

Worksheets("Sheet1").Cells.Replace _
What:="archive[*]", Replacement:="archive[xxx]", _
SearchOrder:=xlByColumns, MatchCase:=False

What I need to do is use the contents of cell I2 to populate the xxx (I only used xxx as a placeholder for this post). In other words, if I enter a 3 into I2, I want to find any occurrence of 'archive[*] in Sheet1 and replace it with 'archive[3]'. I've tried countless ways to do this, using results from Google searches. Apparently I'm not using the correct terms to get the results I need.

BTW, I just signed up for an online VBA course, as my job now requires me to know both. Unfortunately, I really need to get this spreadsheet done before this class starts.

Thanks in advance for any help. This forum has been a great tool for me so far.

-Cheapskate2