excel 中如何在很多行、很多列的数据中取出一对儿值——它俩的比值最接近期望值？

显示全部楼层 · 2011-1-29 21:52:12

表很大、每列一个数量级，列之内为递增......
搜索前需指定：1、期望的比值 2、俩数之一必须取自某列
例如8列*70行=560个数据的表格，问题实际就是：如何扫描（70取1×560取1）的各种组合......
找到的俩数可以显示在另外的单元格，如果能以高亮或边框突显于原表，那就一个字——牛！
呵呵，多谢关心，可我不知道怎么才能再说细了......
就是自动取出俩数，这俩数的比值最接近‘心里想好’的那个数......
非常感激 xiaoyuemt 的回答，看得出来是个程序，而且是专为我编的。只是不懂——excel 里能编程序吗？求再指点一下用法......
正在了解VBA，约需24小时......
我靠！这么快就回复了，我一定要认识你！不过不急，再待两天，俺自称程序员20年了，再待两天......

千问 · 2011-1-29 21:52:12

Sub xabc()'限定一个数所在列，查找比值最接近指定值，所需要的结果可能有很多组，找到的只是其中的一组。'数据从A1开始Dim rmax, cmax, fi, fj, fa, fb, fc As Integerrmax = 70cmax = 8'70行，8列Range("A:Z").ClearFormatsfc = 2'指定某列fe = InputBox("其中一个数指定在第" & fc & "列，请输入期望的比值：")'指定期望比值fmin = Abs(1 - fe)fj = fcfi = 1fb = fcfa = 1'初始化，cells(fi,fj)分子,cells(fa,f

千问 · 2011-1-29 21:52:12

描述的再细点，最好有插图！

千问 · 2011-1-29 21:52:12

描述的再细点，最好有插图！