Hỏi cách khai báo dùng một hằng số

[ST-Lu!]

Kính thưa các Huynh

Ví dụ em thường xuyên phải chia cho một số: ví dụ: 0.975
Em khai báo nó ở trong Module --> ý định dùng trong workbook

 Public rate As Constants
 Dim rate As Double
 rate = 0.975

nhưng khi em thực hiện trong worksheet nó báo lỗi ở số 0.975 (báo lỗi trong Module)

    Dim Co As String
 If Not Intersect(Range("F:F"), Target) Is Nothing Then
        Co = UCase$(Target.Offset(0, -1))
        If InStr(1, Co, "TOYOTA") + InStr(1, Co, "CANON") + InStr(1, Co, "HONDA") = 0 Then
            With Target
                .Offset(, 2).Resize(, 5).ClearContents
                .Offset(0, 2) = .Offset(0, 1) / rate
             End With
        Else:
            With Target
            .Offset(0, 2) = .Offset(0, 1) / rate
            End With
        End If
    End If

Xin các Huynh chỉ giúp em cách khai báo để dùng hằng số 0.975 trên

Em cám ơn

 

[ST-Lu!]

Trong Module khai như sau

Public Const rate = 0.975

Thanks các Huynh
Em đã lò mò ra rồi