imacat/pokemongoiv
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fixed to deal with the localized formula names.

Browse Source
This commit is contained in:
依瑪貓 2017-06-09 17:42:36 +08:00
parent 14a278bad9
commit 0d1c2ea2b2
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
PokemonGoIV/2Report.vb
View File

@ -180,6 +180,8 @@ Sub subCreateReport ( _
sFormula = "=(" & sColIVAttack & "+" & sColIVDefense _ sFormula = "=(" & sColIVAttack & "+" & sColIVDefense _
& "+" & sColIVStamina & ")/45" & "+" & sColIVStamina & ")/45"
oCell.setFormula (sFormula) oCell.setFormula (sFormula)
sFormula = oCell.getPropertyValue ("FormulaLocal")
oCell.setPropertyValue ("FormulaLocal", sFormula)
nCol = nLeadCols nCol = nLeadCols
If aBaseStats.bIsLastForm Then If aBaseStats.bIsLastForm Then
@ -187,6 +189,8 @@ Sub subCreateReport ( _
sFormula = fnGetCPFormula (aBaseStats, _ sFormula = fnGetCPFormula (aBaseStats, _
sColIVAttack, sColIVDefense, sColIVStamina, sMaxCPM) sColIVAttack, sColIVDefense, sColIVStamina, sMaxCPM)
oCell.setFormula (sFormula) oCell.setFormula (sFormula)
sFormula = oCell.getPropertyValue ("FormulaLocal")
oCell.setPropertyValue ("FormulaLocal", sFormula)
nCol = nCol + 1 nCol = nCol + 1
End If End If
For nJ = 0 To nEvolved - 1 For nJ = 0 To nEvolved - 1
@ -194,12 +198,16 @@ Sub subCreateReport ( _
sFormula = fnGetCPFormula (maEvBaseStats (nJ), _ sFormula = fnGetCPFormula (maEvBaseStats (nJ), _
sColIVAttack, sColIVDefense, sColIVStamina, sCPM) sColIVAttack, sColIVDefense, sColIVStamina, sCPM)
oCell.setFormula (sFormula) oCell.setFormula (sFormula)
sFormula = oCell.getPropertyValue ("FormulaLocal")
oCell.setPropertyValue ("FormulaLocal", sFormula)
nCol = nCol + 1 nCol = nCol + 1
If maEvBaseStats (nJ).bIsLastForm Then If maEvBaseStats (nJ).bIsLastForm Then
oCell = oSheet.getCellByPosition (nCol, nI + 1) oCell = oSheet.getCellByPosition (nCol, nI + 1)
sFormula = fnGetCPFormula (maEvBaseStats (nJ), _ sFormula = fnGetCPFormula (maEvBaseStats (nJ), _
sColIVAttack, sColIVDefense, sColIVStamina, sMaxCPM) sColIVAttack, sColIVDefense, sColIVStamina, sMaxCPM)
oCell.setFormula (sFormula) oCell.setFormula (sFormula)
sFormula = oCell.getPropertyValue ("FormulaLocal")
oCell.setPropertyValue ("FormulaLocal", sFormula)
nCol = nCol + 1 nCol = nCol + 1
End If End If
Next nJ Next nJ