Excel催化剂开源第42波-与金融大数据TuShare对接实现零门槛零代码获取数据

Posted 2022-05-03 excelcuihuaji

在金融大数据功能中，使用了TuShare的数据接口，其所有接口都采用WebAPI的方式提供，本来还在纠结着应该搬那些数据接口给用户使用，后来发现，所有数据接口都有其通用性，结合Excel灵活友好的输入方式，将其输入参数统一在Excel界面进行维护，最终实现了所有接口均可由用户自己去维护参数的方式发出查询获得所有的结果，非常完美。

此篇对应的Excel催化剂功能实现：第98波-零代码零距离轻松接触并拥有金融大数据 - 简书 https://www.jianshu.com/p/3cd41a483448

如上述所说，若非想到这些共性的部分，再结合对Excel的深度认识，这样的功能实现，很难由单一的程序员思维可以完成，在VBA、VSTO开发群体中，由于其有相当的业务背景知识和对Excel工具的每一个功能在界面和代码层的熟练掌握，才能发挥到这种让人惊叹的效果出来。

调用TuShare接口时，也用到了json反序列化的知识，和http请求的知识，这些在前面的开源文章里也有所提及。

为了用户配置的参数表，可以最大程度的复用，也引用了参数模板的概念

  internal static void CreateTemplateSheet()
        
            Excel.Worksheet sht = Common.ExcelApp.Worksheets.Add();
            sht.Activate();
            //参数表
            sht.Range["A1:F1"].Value2 = new string[]  "api_name", "fields", "参数2", "参数3", "参数4", "参数5" ;
            ListObjectOfParas = sht.ListObjects.Add(
                SourceType: Excel.XlListObjectSourceType.xlSrcRange,
                Source: sht.Range["A1:F2"],
                XlListObjectHasHeaders: Excel.XlYesNoGuess.xlYes
                );
            //字段信息表
            sht.Range["H1:K1"].Value2 = new string[]  "原字段名称", "类型", "描述", "返回表字段名称" ;
            ListObjectOfOutputFields = sht.ListObjects.Add(
                SourceType: Excel.XlListObjectSourceType.xlSrcRange,
                Source: sht.Range["H1:K2"],
                XlListObjectHasHeaders: Excel.XlYesNoGuess.xlYes
                );

            sht.Range["M1"].Value2 = "TuShare平台接口文档";
            sht.Range["M1"].Interior.Color = ColorTranslator.ToOle(Color.Yellow);
            Excel.Range hyperRange = sht.Range["M2"];

            hyperRange.Hyperlinks.Add(Anchor: hyperRange, Address: "https://tushare.pro/document/2", TextToDisplay: "https://tushare.pro/document/2");
            hyperRange.EntireColumn.AutoFit();

        

关键一步，通过参数表，生成提交所用的post数据，json格式，通过对象反序列化所得。这里可认真体会下在Excel表格中做参数配置的极大优势，特别是ListObject对象的对结构化数据的最大支持。

private static string GetPostData(Excel.Range row, string[] columnNamesOfParas)
        
            PostData postData = new PostData();

            postData.token = Properties.Settings.Default.TuShareAPIKey;

            int apiColIndex = ListObjectOfParas.ListColumns["api_name"].Index;
            Dictionary<string, string> dic = new Dictionary<string, string>();

            foreach (Excel.Range cell in row.Cells)
            
                if (cell.Column == ListObjectOfParas.ListColumns["api_name"].Range.Column)
                
                    var cellValue = cell.Value2;
                    if (cellValue!=null)
                    
                        string apiName = cellValue.ToString();
                        postData.api_name = apiName.Trim();
                    
                    else
                    
                        throw new Exception("api_name列的值不能为空");
                    

                
                else if (columnNamesOfParas.Contains("fields") && cell.Column == ListObjectOfParas.ListColumns["fields"].Range.Column)
                
                    var cellValue = cell.Value2;
                    if (cellValue!=null)
                    
                        string fieldNames = cell.Value2.ToString();
                        postData.fields = fieldNames.Trim();
                    

                
                else
                
                    var paraRange = Common.ExcelApp.Intersect(cell.EntireColumn, ListObjectOfParas.HeaderRowRange);
                    string paraName = paraRange.Value2.ToString();
                    var cellValue = cell.Value2;
                    if (cellValue!=null)
                    
                        string paraValue = cell.Value2.ToString();
                        dic.Add(paraName.Trim(), paraValue.Trim());
                    

                
            
            postData.Params = dic;
            return JsonConvert.SerializeObject(postData);

        

现接下来的核心代码，就是向Web API提交数据了，使用了苏飞封装的httpHelper，几行代码完事。

 HttpHelper httpHelper = new HttpHelper();
            DataTable resultTable = null;

            foreach (Excel.ListRow row in ListObjectOfParas.ListRows)
            
                string postData = GetPostData(row.Range, columnNamesOfParas);
                HttpItem httpItem = new HttpItem()
                
                    URL = "http://api.tushare.pro",
                    Method = "POST",
                    Postdata = postData
                ;
                string resultJson = httpHelper.Gethtml(httpItem).Html;
                if (resultTable==null)
                
                    resultTable = GetResultTableStructure(resultJson);
                

结语

在程序员的世界中，难免容易带上一些自负的情绪，Excel催化剂坚持为技术社区做贡献，可能很大一个群体总以为这不是个东西，太皮毛的分享。

认真看下来的人，总是会有收获的，特别是Excel催化剂并且单一的一个技术产品，它乃是集合了业务和技术的理解，才能诞生出这么优秀的符合业务需要的大量刚需功能。没有对零售业、制造业、商贸行业的理解，和对Excel的极深入的精通，再带上对数据分析、数据处理ETL、商业智能BI、面向对象编程语言的掌握，最后附上对共性事物的抽象理解能力、并横向跨界发散思维的活跃，是没法带出这么多优秀成果的。

技术交流QQ群

QQ群名：Excel催化剂开源讨论群， QQ群号：788145319

关于Excel催化剂

Excel催化剂先是一微信公众号的名称，后来顺其名称，正式推出了Excel插件，插件将持续性地更新，更新的周期视本人的时间而定争取一周能够上线一个大功能模块。Excel催化剂插件承诺个人用户永久性免费使用！

Excel催化剂插件使用最新的布署技术，实现一次安装，日后所有更新自动更新完成，无需重复关注更新动态，手动下载安装包重新安装，只需一次安装即可随时保持最新版本！

Excel催化剂插件下载链接：https://pan.baidu.com/s/1Iz2_NZJ8v7C9eqhNjdnP3Q

取名催化剂，因Excel本身的强大，并非所有人能够立马享受到，大部分人还是在被Excel软件所虐的阶段，就是头脑里很清晰想达到的效果，而且高手们也已经实现出来，就是自己怎么弄都弄不出来，或者更糟的是还不知道Excel能够做什么而停留在不断地重复、机械、手工地在做着数据，耗费着无数的青春年华岁月。所以催生了是否可以作为一种媒介，让广大的Excel用户们可以瞬间点燃Excel的爆点，无需苦苦地挣扎地没日没夜的技巧学习、高级复杂函数的烧脑，最终走向了从入门到放弃的道路。

最后Excel功能强大，其实还需树立一个观点，不是所有事情都要交给Excel去完成，也不是所有事情Excel都是十分胜任的，外面的世界仍然是一个广阔的世界，Excel只是其中一枚耀眼的明星，还有其他更多同样精彩强大的技术、工具等。*Excel催化剂也将借力这些其他技术，让Excel能够发挥更强大的爆发！

关于Excel催化剂作者

姓名：李伟坚，从事数据分析工作多年（BI方向），一名同样在路上的学习者。
服务过行业：零售特别是鞋服类的零售行业，电商（淘宝、天猫、京东、唯品会）

技术路线从一名普通用户，通过Excel软件的学习，从此走向数据世界，非科班IT专业人士。
历经重重难关，终于在数据的道路上达到技术平原期，学习众多的知识不再太吃力，同时也形成了自己的一套数据解决方案（数据采集、数据加工清洗、数据多维建模、数据报表展示等）。

擅长技术领域：Excel等Office家族软件、VBA&VSTO的二次开发、Sqlserver数据库技术、Sqlserver的商业智能BI技术、Powerbi技术、云服务器布署技术等等。

2018年开始职业生涯作了重大调整，从原来的正职工作，转为自由职业者，暂无固定收入，暂对前面道路不太明朗，苦重新回到正职工作，对Excel催化剂的运营和开发必定受到很大的影响（正职工作时间内不可能维护也不可能随便把工作时间内的成果公布于外，工作外的时间也十分有限，因已而立之年，家庭责任重大）。

和广大拥护者一同期盼：Excel催化剂一直能运行下去，我所惠及的群体们能够给予支持（多留言鼓励下、转发下朋友圈推荐、小额打赏下和最重点的可以和所在公司及同行推荐推荐，让我的技术可以在贵司发挥价值，实现双赢（初步设想可以数据顾问的方式或一些小型项目开发的方式合作）。