Question : Can I perform a clean install with a recovery disc?

Hi,

I have a VAIO VGN-S460 computer and it's System Recovery DVD disc. My question is can I do a clean install by using this recovery cd? I want to wipe out everything in the c: drive and believe I can't do this while the os is in the c drive.

I do not have the original XP cd, thus wanted to know if its possible, or if not is there another way I can perform a clean install?

Thanks

Answer : Can I perform a clean install with a recovery disc?

Aaron Blood wrote an excellent general purpose find routine ("Kickbutt Find") at http://www.xl-logic.com/modules.php?name=Downloads&d_op=getit&lid=228 You may have to register for this site to get to that link.

I added a macro to call that find routine to search all sheets for text that you specify in formulas. It will then select all such cells. As you go from worksheet to worksheet, you can then review those selections.

If you were looking for formulas that reference a named range like frrr_isis, just enter that text in response to the input box.

Brad

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:



Sub SearchAllSheets()
Dim ws As Worksheet
Dim rg As Range
Dim FindText As String
FindText = Application.InputBox("Please enter the address or named range you want to find")
For Each ws In ActiveWorkbook.Worksheets
    Set rg = Nothing
    Set rg = Find_Range(FindText, ws.Cells, xlFormulas, xlPart, False)
    If Not rg Is Nothing Then
        ws.Activate
        rg.Select
    End If
Next
End Sub

'Find_Range written by Aaron Blood
Function Find_Range(Find_Item As Variant, _
    Search_Range As Range, _
    Optional LookIn As XlFindLookIn = xlValues, _
    Optional LookAt As XlLookAt = xlPart, _
    Optional MatchCase As Boolean = False) As Range
     
    Dim c As Range, FirstAddress As String
     
    With Search_Range
        Set c = .Find( _
            What:=Find_Item, _
            LookIn:=LookIn, _
            LookAt:=LookAt, _
            SearchOrder:=xlByRows, _
            SearchDirection:=xlNext, _
            MatchCase:=MatchCase, _
            SearchFormat:=False) 'Delete this term for XL2000 and earlier
        If Not c Is Nothing Then
            Set Find_Range = c
            FirstAddress = c.Address
            Do
                Set Find_Range = Union(Find_Range, c)
                Set c = .FindNext(c)
            Loop While Not c Is Nothing And c.Address <> FirstAddress
        End If
    End With
     
End Function