How can i use VBA to run an edit and replace function multiple times with different values for find and replace each time to create multiple documents by save as.

All you need to do is create a loop that after editing the document saves it under a different name eg

Sub EditRoutine

Dim Sheet As Worksheet
Dim SheetName As String

For Each Sheet In ActiveWorkbook.Worksheets

SheetName = Sheet.Name

<Run Edit/Replace Function>

Sheet.Save As "C:\My Documents\New" & SheetName

Next Sheet

End Sub