免费视频|新人指南|投诉删帖|广告合作|地信网APP下载

查看: 1317|回复: 3
收起左侧

[转]WalkScript中对excel文件的操作

  [复制链接]

185

主题

2898

铜板

13

好友

地信院士

Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15

积分
2398
发表于 2012-8-3 10:37 | 显示全部楼层 |阅读模式
在WalkISurvey中,菜单【工具】->【walkscriptor】,打开walkscript脚本编辑器,可以使用对excel文件(excel2003及以前的版本)操作的文件对象。
  1. double PI = 3.14159265;

  2. void main()
  3. {
  4. string xls = "F:\\example.xls";
  5. wkFile file;
  6. file.excelOpen(xls);
  7. if (file.handle()==0)
  8. {
  9. message("cannot read " + xls);
  10. return;
  11. }

  12. string val;
  13. //读取第一个表格的第2行第1列单元格的值
  14. file.excelGetCell(val, 1, 0);
  15. trace("%s\n", val);
  16. //读取第一个表格的第4行第1列单元格的值
  17. file.excelGetCell(val, 3, 0);
  18. trace("%s\n", val);
  19. //读取第一个表格的第5行第1列单元格的值
  20. file.excelGetCell(val, 4, 0);
  21. trace("%s\n", val);
  22. //读取第一个表格的第5行第2列单元格的值
  23. file.excelGetCell(val, 4, 1);
  24. trace("%s\n", val);
  25. for (int i = 0; i < 41; ++i)
  26. {
  27. file.excelGetCell(val, 8, i);
  28. trace("%s\t", val);
  29. }
  30. trace("\n");

  31. string newVal = "哈哈哈myNewstringVal";
  32. file.excelSetCell(newVal, 8, 0);
  33. file.excelSetCell(9999, 8, 6);

  34. file.excelSetCell(12.34567890,9,0);
  35. //Set format string "0.00"
  36. file.excelSetCellFormatString(9, 0, "0.00");

  37. //execlSetCellFont(int row, int col, string fontName="Arial", int fontOption=0, int fontHeight=200, int FontWeight=400, int FontEscapementType=0, int FontUnderlineType=0, int sheetIndex = 0);
  38. file.excelSetCell(456.0, 10, 1);
  39. //set cell font
  40. file.excelSetCellFont(10,1,"黑体", 0, 300, 400);

  41. file.excelSetCell("Text", 11, 2);
  42. //set cell rotation
  43. file.excelSetCellInfo(11, 2, 2, 45);

  44. file.excelSetCell(987.654321, 12, 3);
  45. //set cell alignment: EXCEL_HALIGN_SEL_CENTRED
  46. file.excelSetCellInfo(12, 3, 1, 0x06);

  47. file.excelSetCell("沃,3G", 13, 4);
  48. //set cell font: option - EXCEL_FONT_SHADOWED; fontheight - 500; fontweight - EXCEL_FW_THIN;
  49. // fontescapement - EXCEL_ESCAPEMENT_SUBSCRIPT; fontunderlinetype - EXCEL_UNDERLINE_DOUBLE_ACCOUNTING
  50. // fontColorIndex - EGA_BLUE = 4
  51. file.excelSetCellFont(13,4,"宋体", 0x20, 500, 100, 2, 0x22, 4);
  52. //set cell rotation
  53. file.excelSetCellInfo(13,4,2, 120);

  54. file.excelSetCell(time(), 14,5);
  55. file.excelSetCellFont(14,5,"Arial", 1, 200, 900,0,0,2);
  56. file.excelSetCellFormatString(14,5,"M/D/YY");

  57. file.excelSetCell(100*(PI%0.001), 15, 6);
  58. file.excelSetCellFormatString(15,6,"%0");

  59. xls = "F:\\a1.xls";
  60. file.excelSaveAs(xls);
  61. file.excelClose();

  62. wkView view;
  63. view.shell(xls);
  64. }
复制代码

评分

参与人数 1威望 +5 收起 理由
walkinfo + 5 地信网的成长离不开您的支持!

查看全部评分

185

主题

2898

铜板

13

好友

地信院士

Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15

积分
2398
 楼主| 发表于 2012-8-3 10:38 | 显示全部楼层
这个是转载的 感觉不错 分享一下!
回复 支持 反对

使用道具 举报

27

主题

1856

铜板

2

好友

版主

Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15

积分
1022
发表于 2012-8-3 15:25 | 显示全部楼层
多谢提供!!!!
回复 支持 反对

使用道具 举报

6

主题

1万

铜板

20

好友

地信院士

Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15

积分
2988
发表于 2021-5-16 10:38 | 显示全部楼层
感谢楼主分享
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

在线客服
快速回复 返回顶部 返回列表