17 - 小工具系列 - 博一

最新推荐文章于 2024-09-22 13:00:00 发布

原创最新推荐文章于 2024-09-22 13:00:00 发布 · 604 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#国家重点研发计划

博一专栏收录该内容

5 篇文章

订阅专栏

针对国家重点研发计划报表繁琐的手动填写流程，博主分享了一款使用Matlab编写的自动化脚本，该脚本能从Excel文件中读取项目参与者信息，并自动填写到指定的报表系统中，大大提高了工作效率。

1 国家重点研发计划

你最近是否也被国家重点研发计划的弱♂智填报系统所折磨？是否发现几千万的项目几百号参与人员的信息全部要一个一个填进去？？？我透！太反人类了！

随手用matlab写了个自动填写jio本：

（首先，统计各个课题的人员信息，模板应该都是这个吧）
在这里插入图片描述
然后，

%重点研发计划-课题分解-项目人员-填写脚本

%--------------------------%
clear all;clc;
%读取目标excel
[rawDataNum, rawDataStr] = xlsread('F:\下载\data.xlsx');

temp = size(rawDataStr);
people = temp(1,1);
%设置快捷键/时间，设置读取单元格顺序

%循环↓
for i=1:people
%     %方式一：每个人,检测快捷键，读取下一个单元格内容并粘贴到 剪贴板
%       if strcmpi(get(gcf,'CurrentCharacter'),'f')    %算了，手累

      %方式二：每个人，没秒走一个单元格，每个人停顿一次
      for j=1:temp(1,2)+1
          sound(sin(2*pi*25*(1:4000)/100));%播放提示音1
          if (j == 16)
              celldata = string( rawDataNum(i,4))
              clipboard('copy',celldata)     
          else
              if (j == 9)
                  pause(3);%需要点“亚洲”“中国”“身份证”，多等会儿
              end
              celldata = string( rawDataStr(i,j))
              clipboard('copy',celldata)
              strrep(celldata,'/','-'); %防止excel里日期格式问题
          end         
          pause(2);
      end    
    load chirp % 提示音2
    sound(y,Fs) 
    pause(15);%搞快点，保存这个参与人，就等你这么多秒
end
%
%循环↑
%晨宇 2019.10.09