The easiest way is to use petrel , load the grid and change the values in properties using filter
The hardest way is to load all data and split it by fipnum value and change this values manualy
for this purpose you would need to create VBA script like this
Sub reader_v2()
Dim la() As String
Dim cnt As Long
Dim tempbuf() As String
Dim frows As Long
Application.ScreenUpdating = False
Const ForReading = 1, ForWriting = 2, ForAppending = 3
Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
Dim fs, f, ts, s
Set fs = CreateObject("Scripting.FileSystemObject")
'path_to_prop = "E:\Geo Models\North Truva\NtgModel\Kt1\ntg.inc"
Set f = fs.GetFile(path_to_prop)
Set ts = f.OpenAsTextStream(ForReading, TristateUseDefault)
count_i = 1
count_j = 1
count_k = 1
stat_lag = 10
start_flag = 0
cnt = 0
Dim tempstr1 As String
Dim tempstr2 As String
Dim allstr As Long

frows = 0
frows1 = 0
allstr = i * j * k
iii = 1
jjj = 1
kkk = 1
Dim numval As Long
Dim vval As Double
Do While ts.AtEndOfStream <> True
prop_string = ts.readline
fflag = Trim(Mid(prop_string, 1, 1))
If start_flag = 1 And fflag <> "-" Then
tempstr1 = ""
tempstr2 = ""
lenth_string = Len(prop_string)
For jj = 1 To lenth_string
tempstr1 = Trim(Mid(prop_string, jj, 1))
If tempstr1 <> "" And tempstr2 <> "" Then tempstr2 = tempstr2 & tempstr1
If tempstr1 <> "" And tempstr2 = "" Then tempstr2 = tempstr1
If tempstr1 = "" And tempstr2 <> "" Then
'If tempstr2 = "/" Then Stop
lenth_string1 = Len(tempstr2)
numval = 0
vval = 0
For rr = 1 To lenth_string1
If Trim(Mid(tempstr2, rr, 1)) = "*" Then
numval = Mid(tempstr2, 1, rr - 1)
vval = Mid(tempstr2, rr + 1, 100)
'Stop
Exit For
End If
Next rr

If numval = 0 Then
numval = 1
vval = tempstr2
' Stop
End If
' Stop

For ttt = 1 To numval
prop_array(iii, jjj, kkk, 1) = vval
iii = iii + 1
If iii > i Then
iii = 1
jjj = jjj + 1
If jjj > j Then
jjj = 1
kkk = kkk + 1
End If
End If
' Stop
Next ttt
frows1 = frows1 + numval
tempstr2 = ""
End If
Next jj
End If
If tempstr2 <> "" Then
If tempstr2 <> "/" Then
lenth_string1 = Len(tempstr2)
numval = 0
vval = 0
For rr = 1 To lenth_string1
If Trim(Mid(tempstr2, rr, 1)) = "*" Then
numval = Mid(tempstr2, 1, rr - 1)
vval = Mid(tempstr2, rr + 1, 100)
Stop
Exit For
End If
Next rr

If numval = 0 Then
numval = 1
vval = tempstr2
' Stop
End If
' Stop

For ttt = 1 To numval
prop_array(iii, jjj, kkk, 1) = vval
iii = iii + 1
If iii > i Then
iii = 1
jjj = jjj + 1
If jjj > j Then
jjj = 1
kkk = kkk + 1
End If
End If
' Stop
Next ttt
frows1 = frows1 + numval
tempstr2 = ""
End If
End If

frows = frows + 1

'Stop
If prop_string Like Range("PNAME") & "*" Then start_flag = 1
If stat_lag > 0 Then
If file_row Mod frows = 0 Then
DoEvents
Application.StatusBar = "Array Red Status # " & Round(frows1 / (allstr), 4) * 100 & "%"
End If
End If


Loop
'rrr = tempbuf(cnt)

End Sub
This is routine to read eclipse include properties files