利用Excel VBA宏，批量得出斯皮尔曼相关系数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

      利用Excel VBA宏，批量得出斯皮尔曼相关系数。
      附件中代码可以分别求出319条数据序列（每条6个数据）与指定数据序列（1条6个数据的序列）的斯皮尔曼等级相关系数，即求出了319个斯皮尔曼等级相关系数.

本帖隐藏的内容

用excel求斯皮尔曼等级相关系数宏代码。宏执行位置：当前工作薄。

1. Sub hong3()
   
2. Dim a As Double, r As Long, b As Double, c As Long
   
3. For r = 4 To 322
   
4.    For c = 2 To 7
   
5.      a = Application.WorksheetFunction.Rank_Avg(Cells(r, c), Range(Cells(r, 2), Cells(r, 7)), 1)
   
6.      Cells(r, c + 10).Value = a
   
7.    Next c
   
8.    
   
9.    b = Application.WorksheetFunction.Correl(Range("L2:Q2"), Range(Cells(r, 12), Cells(r, 17)))
   
10.    Cells(r, 19).Value = b
    
11.    
    
12. Next r
    
13. 
    
14. End Sub

复制代码

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏2 回帖

关键词：斯皮尔曼相关系数 用excel EXCEL 斯皮尔曼 xcel Excel Excel VBA宏 斯皮尔曼相关系数 SPEARMAN系数 批量

量大的话计算速度怎么样?

不错，看看

谢谢分享。

顶一下~~

谢谢分享。