Link sheets

>>What i need to do to like link them, like if i change that (0.97 to 0.85) in sheet1 in C13 it will automatic change in sheet2 in C13 from 0.97 to 0.85 as well.
both need to refer to a static cell in order to do that, which mean you need to put the value of 0.85 to another cell, let both C13 in Sheet1 and Sheet2 refer to it.
28968462.xlsx

You can do this using a macro. Do you want to go in that direction?

I could go that direction it would be really good for me.

Try this macro in the Workbook Module

Option Explicit
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    If Target.Count = 1 Then
        If ActiveCell.Worksheet.Name = Target.Worksheet.Name Then
            If Sh.Name = "Sheet1" Or Sh.Name = "Sheet2" Then
                If Target.Address = Range("C13").Address Then
                    If Sh.Name = "Sheet1" Then
                        Sheets("Sheet2").Range("C13").Formula = Left(Sheets("Sheet2").Range("C13").Formula, InStr(Sheets("Sheet2").Range("C13").Formula, "*")) & Right(Target.Formula, Len(Target.Formula) - InStr(Target.Formula, "*"))
                    ElseIf Sh.Name = "Sheet2" Then
                        Sheets("Sheet1").Range("C13").Formula = Left(Sheets("Sheet1").Range("C13").Formula, InStr(Sheets("Sheet1").Range("C13").Formula, "*")) & Right(Target.Formula, Len(Target.Formula) - InStr(Target.Formula, "*"))
                    End If
                End If
            End If
        End If
    End If
End Sub

Select allOpen in new window

Change-constant-macro.xlsm

Woow, it really helped, what can I do if range is from C13 to I13, how I need to change the Macros?

Change the macro to

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    If Target.Count = 1 Then
        If ActiveCell.Worksheet.Name = Target.Worksheet.Name Then
            If Sh.Name = "Sheet1" Or Sh.Name = "Sheet2" Then
                If Not Intersect(Target, Range("C13:I13")) Is Nothing Then
                    If Sh.Name = "Sheet1" Then
                        Sheets("Sheet2").Range(Target.Address).Formula = Left(Sheets("Sheet2").Range(Target.Address).Formula, InStr(Sheets("Sheet2").Range(Target.Address).Formula, "*")) & Right(Target.Formula, Len(Target.Formula) - InStr(Target.Formula, "*"))
                    ElseIf Sh.Name = "Sheet2" Then
                        Sheets("Sheet1").Range(Target.Address).Formula = Left(Sheets("Sheet1").Range(Target.Address).Formula, InStr(Sheets("Sheet1").Range(Target.Address).Formula, "*")) & Right(Target.Formula, Len(Target.Formula) - InStr(Target.Formula, "*"))
                    End If
                End If
            End If
        End If
    End If
End Sub

Select allOpen in new window

This didn't work for me still changes just C13 cells.

Ohh wait it worked. thanks very mush for help :)

What would the Macro be if I could change the (0.97) in C13 and it would automatic change from C13 to I13 in sheet1 and sheet2?

Send a sample file.

Here is the sample file.
aaa.xlsx

Assuming the asker's intent.