Hi
I am having some troubles with my VBA. its works fine, it does what I want. When I run it it creates seperate files out of all the sheets I want, But here is the problem, when creating seperate files the files contains links to formulas etc and that meeses things up, I want it to be created with values, no links, formulas etc. is it possible?
below is my working code.
thank you if anyone can help on how to fix this.

Sub SplitEachWorksheet()
Dim FPath As String
Dim TexttoFind As String
TexttoFind = "Sum"
TexttoFind = "3"
TexttoFind = "4"
TexttoFind = "5"
TexttoFind = "6"
TexttoFind = "7"
TexttoFind = "8"
TexttoFind = "9"
FPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False

For Each ws In ThisWorkbook.Sheets
If InStr(1, ws.Name, TexttoFind, vbBinaryCompare) <> 0 Then
ws.Copy
Application.ActiveWorkbook.SaveAs Filename:=FPath & "\" & ws.Name & ".xlsx"
Application.ActiveWorkbook.Close False
End If
Next

Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub