将一个EXCEL 的交叉表 转化成DBF文件

傲世火凤凰

求救
将一个EXCEL 的交叉表
转化成DBF文件
具体EXCEL表格式是
  时间段           A      B       C    ......
10：00-12：00   10%    20%      30%
12：00-13：00   25%    15%      20%
  .
  .
  .
  .
现在要转换成这个表格
时间段            内容   百分比
10：00-12：00     A      10%

lancelot0229

先把excel表转成dbf格式，新建一个下面结构的表，做个循环从上表中取值插入新表即可

傲世火凤凰

能不能给出代码
谢谢您了

170385215

先建一个DBF表，设为JC，这个DBF表与你的EXcel表结构一样，然后将EXCEL内导入到你的这个表，再处理就可以了

USE JC
APPEND FFOM EXCEL表名.xls type xl5
lcString1='Select 时间段'
lcString2=''
lnFieldSum=Fcount('Jc')
For I=2 To lnFieldSum
        lcString2=lcString2+lcString1+",'"+Field(I)+"' As 内容,"+Field(I)+' As 百分比 From Jc'+Iif(I=lnFieldSum,'',' Union all ')
EndFor
&lcString2

傲世火凤凰

o 我的哪个EXCEL是不固定的可能烈数有很多
不过我自己已经通过其他办法达到目的了
很谢谢您