Fortran Coder

标题: 新人问个读取xlsx的傻问题。。。 [打印本页]

作者: 飞白 时间: 2016-3-28 19:00
标题: 新人问个读取xlsx的傻问题。。。

[Fortran] 纯文本查看 复制代码



program index74

parameter(imon=12,iyr=59,ivar=74)

dimension hc068(ivar,imon,iyr)

open(10,file="D:\hc068.xlsx",err=200)

read(10,100)(((hc068(i,j,k),i=1,ivar),j=1,imon),k=1,iyr)

100        format(37I5)

200        continue

close(10)

END

走到read就break了
貌似提示数据格式不对，新人真心搞不懂啊啊啊啊啊，数组不是不分的么。。。？
刚入坑的新人，真的就想改个格式看眼数据

求高人解惑

QQ图片20160328185518.jpg (57 KB, 下载次数: 293)

完全不懂哪里格式不对了。。。

QQ图片20160328185430.png (5.28 KB, 下载次数: 318)

37行2400列的整型数据

作者: vvt 时间: 2016-3-28 19:18
本帖最后由 vvt 于 2016-3-28 19:22 编辑

你不能直接读写 xls 文件，它的格式非常复杂。是 excel 专有的格式。
请另存为 csv 或 txt 文件后再尝试读取。此外，你的代码风格特别陈旧。我建议你换一个新的教科书，以下代码比你的简单简练，容易阅读

[Fortran] 纯文本查看 复制代码

Program index74

  Implicit None

  Integer , parameter :: imon=12,iyr=59,ivar=74

  Real :: hc068(ivar,imon,iyr)

  Open(10 , File = "D:\hc068.xlsx" )

  Read(10,*) hc068

  close(10)

End Program index74

作者: nmap 时间: 2016-3-29 17:15
赞数组格式
学习了

作者: pasuka 时间: 2016-3-30 08:54
首先，xls和xlsx是两个不同的文件格式标准，前者MS独家闭源，后者ISO开源
xlsx本质上是个压缩包文件，具体格式标准参考下面的网址，零基础的话，请不要指望三个月内可以吃透
http://officeopenxml.com/index.php
其次，读取xlsx开源项目很多，sf、github上面一把一把，但是唯独没有fortran的，必须得混合编程
个人意见：不追求跨平台，不考虑版权问题，基于MS office的VBA二次开发是唯一可行的捷径

作者: 楚香饭 时间: 2016-3-30 18:57
楼主应该也不是必须读xlsx的，读csv就可以了。

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)