GpengY 2016-10-19 07:52 采纳率: 100%
浏览 1151
已结题

delphi 如何按excel表 公式 转化代码写出来

1、excel 表公式：=--MID($E3027,MIN(FIND({1,2,3,4,5,6,7,8,9,0},$E3027&1234567890)),2)
如：I4BX30L6I3、B25G3K0 、S30G3K 结果 ：30 、25 、30

2.excel 表公式：=--MID($E3037,MIN(FIND({"T","I","J","G","W","N"},$E3037&"TIGJWN"))+1,1)

如I4BX30L6I3 、B25G3K0 、 S30G3K 结果 ：4 、3 、3

  • 写回答

2条回答 默认 最新

  • zqbnqsdsmd 2016-10-20 03:03
    关注

    http://jingyan.baidu.com/article/215817f7ee75a01edb142375.html

    评论

报告相同问题？

  • delphi excel表 导入sql
    2016-08-10 01:55
    回答 1 已采纳 sql server 与excel 的表关系，导入导出Delphi将表中数据导入EXCEL中来的代码SQL LOADER 导入EXCEL数据到ORACLE表中-------------------
  • delphi 怎么能把这个按钮做出来？
    2018-09-10 08:38
    回答 2 已采纳 Button Style属性设为 bsSplitButton
  • Delphi ADOQUERY多条件同时查询，代码怎么写？ 开发语言
    2019-04-23 17:31
    回答 1 已采纳 字符串拼接 sql := ' select * from table where 1 = 1 '; if ... then sql := sql + ' and 销售时间 = xxxx '; i
  • delphi对于excel的一般操作
    2011-09-24 10:46
    aTian2009的博客 资料来自网络 单元格设置 1.设置单元格线框 Excel.ActiveSheet.Range[B10:C13].Borders[N].LineStyle := xlNone Excel.ActiveSheet.Range[B10:C13].Borders[N].Weigh
  • delphi工程如何反编译成可读的代码
    2018-04-21 01:08
    回答 3 已采纳 delphi程序很难反编译，因为它生成的是机器代码。 机器代码的运行结果和你的源代码等价，但是不是一一对应的。或者说的更直白一点，相同的机器码可能由无数种源代码编译得到，而可读性良好的那一种只是这无
  • delphi 单击按钮触发combobox的下拉？
    2018-09-12 03:06
    回答 1 已采纳 在button的OnClick事件中设置：combobox.DroppedDown := True;
  • delphi JSON解析，求代码？ json
    2018-08-13 15:14
    回答 3 已采纳 推荐用QJSON解析, 用法简单, 解析速度还快, 通过SVN下载: svn://www.qdac.cc/QDAC3 对json内容结构部熟悉, 可以看接口文档, 或者找个json解析器看看,
  • delphi 操作excel（全）
    2012-05-24 22:22
    kunlun122的博客 DELPHI中EXCEL组件的使用方法: (一) 使用动态创建的方法 首先创建 Excel 对象，使用ComObj:  var ExcelApp: Variant;  ExcelApp := CreateOleObject( 'Excel.Application' ); 1) 显示当前窗口：  ...
  • delphi 让代码一步一步的执行，怎么实现？ 开发语言
    2019-06-07 13:58
    回答 1 已采纳 在label1.Text:=xxx 下面加上 Application.ProcessMessages;
  • Delphi中 怎么将bytes 转换位steam
    2018-08-27 14:44
    回答 1 已采纳 Bytes就是byte数组 stream就是提供了一个对内存的存取类 integer在delphi里 一般表示32位有符号整形 也就是4个字节的数据 word是16位无符号整形 无论是
  • Delphi主从表查询问题！ sql
    2018-01-15 08:03
    回答 7 已采纳 先用细节表查询，把它的ID放在一张临时表中，再反过来与主表做关联，我的那套系统就是这么写的。等用户选中过滤后的主表，细节表才会打开
  • 用DELPHI操作EXCEL
    2009-07-09 16:02
    delphi1234的博客 在DELPHI中显示EXCEL文件，可用以下简单代码做到。但要实用，则需进一步完善。 var Form1: TForm1; EApp:variant;implementationuses ComObj, OleServer,Excel2000;{$R *.dfm}procedure TForm1.Button1Click...
  • delphi的按钮怎么设置按下状态，不弹起的。
    2017-10-12 01:48
    回答 2 已采纳 设置按钮的GroupIndex>0即可
  • DELPHI中EXCEL组件的使用方法
    2016-05-27 16:04
    小蚂蚁_CrkRes的博客 DELPHI中EXCEL组件的使用方法: 一) 使用动态创建的方法 首先创建 Excel 对象，使用ComObj: var ExcelApp: Variant; ExcelApp := CreateOleObject( 'Excel.Application' ); 1) 显示当前窗口： ExcelApp.Visible...
  • delphi 控制excel的格式
    2008-07-04 16:58
    jhldelphi的博客 设置EXCEL的单元格的格式为文本格式ColumnRange.Columns[1].numberformatlocal:=@; ExcelApplication1.ActiveSheet.Rows[1].numberformat:=@; ExcelApp.Cells[j,2].numberformatlocal:=@; excelworksheet1.Cells....
  • 没有解决我的问题, 去提问

悬赏问题

  • ¥15 HFSS 中的 H 场图与 MATLAB 中绘制的 B1 场 部分对应不上
  • ¥15 如何在scanpy上做差异基因和通路富集？
  • ¥20 关于#硬件工程#的问题，请各位专家解答！
  • ¥15 关于#matlab#的问题：期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707，使系统具有较小的超调量
  • ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
  • ¥30 截图中的mathematics程序转换成matlab
  • ¥15 动力学代码报错，维度不匹配
  • ¥15 Power query添加列问题
  • ¥50 Kubernetes&Fission&Eleasticsearch
  • ¥15 報錯：Person is not mapped，如何解決？