Don't you need a variable2, too?

Private Sub CommandButton1_Click()
Dim variable1 As String
dim Variable2 as string
variable1 = FillInDate.DateBox.Text
variable2 = fillindate.datebox2.text '????
Cells.Replace What:=variable1, Replacement:=variable2, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
end sub




ISA wrote:

I've done this in Word, but can't seem to get it to work in Excel. I have a
Userform wherein the user types some text (variable1). When the user clicks
on the "continue" button I want the code behind that button to Search and
Replace the predefined text in the worksheet and replace it with the
variable1 text that the user typed. If I record the keystrokes for search and
replace, the macros works, but it does not work after putting that code in
the button code because I don't know how/where to put the "variable1". In
Word, it looked like this:


Private Sub CommandButton1_Click()
Dim variable1 As String
variable1 = FillInDate.DateBox.Text
Cells.Find(What:="C4", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:=False) _
.Activate
Cells.Replace What:="C4", Replacement:="C5", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
<<<
Any help out there?

--

Dave Peterson