请教js宏统计二维表格数据

功能:统计业主满意度调查数据

已经录入满意度调查表数据

要求:按小区、分区、部门统计满意度调查问卷得分。

从VBA改成js代码,但是运行不起来

请老师帮忙看一下

看看问题在哪

麻烦老师了

表1-满意度调查表基础数据

表2-满意度调查结果统计

从VBA改过来的代码运行不起来

🔔

/*

函数功能 求评分区域内 项目名称(某项目)的 评分

Parameters List 参数列表

project_name_feild as range 项目名称所在列

score_range as range 评分数据区域(在《调查问卷汇总》表)

评分数据区域 与 项目名称列 的 起始行、结束行 必须分别在同一行 (在《调查问卷汇总》表)

sepcified_project_name as string 项目名称(在《全项目计分汇总》表)

*/

function projectscore(project_name_feild, sepcified_project_name, score_range) {

//用于指定项目的选项计数(问卷数*题目数)

var item_count = 0;

//用于计算指定项目的得分之和

var score_sum = 0;

//用于计算指定项目满意度得分

var project_score = 0;

//用于for循环的行、列

var score_range_row = 1;

var score_range_col = 1;

for (score_range_row = 1; score_range_row <= score_range.Rows.Count; score_range_row++) {

//如果项目名称的值 与 指定的项目名称 相同

if (project_name_feild(score_range_row) == sepcified_project_name) {

for (score_range_col = 1; score_range_col <= score_range.Columns.Count; score_range_col++) {

//开始计算该项目的得分之和

score_sum = score_sum + score_range(score_range_row, score_range_col);

//计算指定项目的选项计数

item_count++;

}

}

}

project_score = score_sum / item_count;

projectscore = project_score;

}

/*

函数功能: 求评分区域内 指定项目名称(某项目)的 指定部门名称(某部门) 评分

Parameters List 参数列表

project_name_feild as range 项目名称所在列

sepcified_project_name as string 指定项目名称(在《全项目计分汇总》表)

dep_and_score_range as range 部门名称和评分所在区域 dep = department(在《调查问卷汇总》表)

评分数据区域 与 项目名称列 的 起始行、结束行 必须分别在同一行(在《调查问卷汇总》表)

sepcified_dep_name as string 指定部门名称(在《全项目计分汇总》表)

*/

function depscore(project_name_feild, sepcified_project_name, dep_and_score_range, sepcified_dep_name) {

//用于指定项目的选项计数(问卷数 * 提数)

var item_count = 0;

//用于计算指定项目的得分之和

var score_sum = 0;

//用于计算指定项目指定部门满意度得分

var dep_score = 0;

//用于for循环的行、列

var score_range_row = 1;

var score_range_col = 1;

for (score_range_row = 1; score_range_row <= dep_and_score_range.Rows.Count; score_range_row++) {

//如果项目名称的值 与 指定的项目名称 相同

if (project_name_feild(score_range_row) == sepcified_project_name) {

for (score_range_col = 1; score_range_col <= dep_and_score_range.Columns.Count; score_range_col++) {

//如果部门名称 与 指定部门名称 相同

If(dep_and_score_range(1, score_range_col) == sepcified_dep_name)

{

//开始计算该项目的得分之和

score_sum = score_sum + dep_and_score_range(score_range_row, score_range_col);

//计算指定项目的选项计数

item_count++;

}

}

}

}

dep_score = score_sum / item_count;

depscore = dep_score;

}

陕西省
浏览 561
收藏
3
分享
3 +1
4
+1
全部评论 4
 
曲涛
我目前觉得 像 score_range.Rows.Count 这个东西js环境里面肯定是错的, 但是对的我不知道该怎么些 也不知道怎么找score_range里面里面都有什么 而且score_range.rows是不是应该写成score_range->rows 这个也不清楚 我没有学过js
· 陕西省
回复
 
WPS社区反馈员
WPS社区反馈员

WPS社区管理员

您好,请问下您电脑上安装的WPS是个人版还是单位统一安装的WPS呢
· 湖北省
回复
曲涛
你好,老师。 是16412 个人版
· 陕西省
回复