代码来确定三个值之间的百分比差异
我想要查找单个列中三个值之间的百分比差异，并将差异百分比转移到新列中
Lets say I have the following values to compare: **Value1** = 5 **Value2** = 8 **Value3** = 2 我需要从Value1和Value3中减去Value2，我也需要从Value3中减去Value1。
我想要一个简单的方法来find一个三重的最大值，减去其余两个值来find百分比差异，然后find第二个最高值，减去最低值来find它的百分比差异。
也许我正在接近这一切错误。 任何帮助是极大的赞赏。
****CODE***** import openpyxl from openpyxl.worksheet.datavalidation import DataValidation wb = openpyxl.load_workbook('05.16.17 CaMKII Sean RD.xlsx', read_only= False, data_only = True) sheet = wb['Sheet1'] ### Protein Max Value for Triplicate for i in range(2,3): sheet['D{}'.format(i)] = '=max(C2:C4)'.format(i) for i in range(2,3): sheet['E{}'.format(i)] = '=((D2-C2)/(D2+C2) * 100)'.format(i) for i in range(3,4): sheet['E{}'.format(i)] = '=((D2-C3)/(D2+C3) * 100)'.format(i) for i in range(4,5): sheet['E{}'.format(i)] = '=((C3-C2)/(C2+C3) * 100)'.format(i) wb.save('camdatapolishedoutput.xlsx')
我不明白你的代码，但似乎你正在寻找FormatPercent公式。 而且你也必须改变你的代码的很多部分。 下面我已经纠正了很多，但只要我不知道你真的想做什么，剩下的就是你的了。
Dim wb as Workbook, sheet as Worksheet Dim wsArrD2 As Range, wsArrC2 As Range, wsArrC3 As Range, wsArrC4 As Range Dim yourdesktopaddress as String yourdesktopaddress = CreateObject("WScript.Shell").specialfolders("Desktop") Set wb = Application.Workbooks.Open(yourdesktopaddress & "\05.16.17 CaMKII Sean RD.xlsx") ''This code finds your Desktop address and opens the specific file. Set sheet = wb.Sheets("Sheet1") 'I assume you were looking for information from that file's Sheet1 sheet. Set wsArrD2 = sheet.Range("D2") Set wsArrC2 = sheet.Range("C2") Set wsArrC3 = sheet.Range("C3") Set wsArrC4 = sheet.Range("C4") Dim maxC as Long, PercentVar1 as String Dim PercentVar2 as String, PercentVar4 as String 'You should define your '%' variables as String otherwise you will get an Run Time 13 Error' maxC = Evaluate("=MAX(C2:C4)") PercentVar1 = FormatPercent((wsArrD2 - wsArrC2) / (wsArrD2 + wsArrC2), 2) PercentVar2 = FormatPercent((wsArrD2 - wsArrC3) / (wsArrD2 + wsArrC3), 2) PercentVar3 = FormatPercent((wsArrC3 - wsArrC2) / (wsArrC3 + wsArrC2), 2)
在这个公式中，你不需要乘以100，因为： FormatPercent返回格式为百分比（即乘以100）和一个尾随的％字符的expression式。
有关更多信息，请访问msdm.microsoft上的FormatPercent函数（Visual Basic）