[已解决]求保存Excel数据到二维数组，请大大们看看，小弟初次接触

kk_lee69 · 发表于 2011-7-9 17:28:05

kevinch 发表于 2011-5-24 17:42

老大  你得這個語法  可以成功  但是出來的數據組方向跟EXCEL 的方向不依樣

例如  EXCEL 上面是 A    B    C
                                 1 2    3

你的陣列出來的是

A 1
B 2
C 3

有辦法改成  跟EXCEL 一樣嗎???

小弟剛好遇到這個問題麻煩指教一下

kevinch · 发表于 2011-7-9 21:19:52

$a_Arr=$o_Excel.transpose($a_Arr)

这样试下，excel本身提供了数组横竖转换的函数

kk_lee69 · 发表于 2011-7-9 23:03:57

本帖最后由 kk_lee69 于 2011-7-9 23:12 编辑

OK 感謝幫忙

不過剛剛測試了一下好像不行ㄟ

SHINE · 发表于 2011-8-26 18:40:38

想找个程式：在excel找个字符串，并返回单元格的值

zhuxxpt · 发表于 2011-11-1 11:40:01

好主意，谢谢您提供

liupeng1990607 · 发表于 2013-3-6 16:48:52

回复 1# hetinghtht

如果竖着显示如何做到也就是换个方向显示到窗口！！！

liupeng1990607 · 发表于 2013-3-7 08:48:15

回复 17# kevinch

$xls=ObjGet(@DesktopDir&"\资料.xls")

With $xls.worksheets("sheet1")
        $arrt=.range("a1").currentregion.value
                .parent.close(false)


EndWith
_ArrayDisplay($arrt)

改变方向不行啊！！！！！！！！！！！！！！

liupeng1990607 · 发表于 2013-3-7 08:55:39

回复 18# kk_lee69

With $xls.worksheets("sheet1")
$arrt=.range("a1").currentregion.value
.parent.close(false)

EndWith
_ArrayDisplay($arrt)
[/code]关于横竖转换不知道你找到方法没有帮忙下我也遇到这个问题了

kevinch · 发表于 2013-3-7 09:47:15

回复 22# liupeng1990607

#include <array.au3>
$xls=ObjGet(@ScriptDir&"\test.xls")
With $xls.worksheets("sheet1")
        $arrt=.range("a1").currentregion.value
        $arrt=.application.transpose($arrt)
        .parent.close(false)
EndWith
_ArrayDisplay($arrt)

这样试下

liupeng1990607 · 发表于 2013-3-7 09:59:14

本帖最后由 liupeng1990607 于 2013-3-7 10:00 编辑

回复 24# kevinch

哇哇非常感谢那如果第一行我不读取改怎么操作谢谢

liupeng1990607 · 发表于 2013-3-7 10:31:06

回复 24# kevinch

如果不想取excel中第一行资料（标题）如何做

kevinch · 发表于 2013-3-7 19:20:04

$arrt=$xls.application.intersect(.range("a1").currentregion,.range("a1").currentregion.offset(1)).value

这个试下

		自动登录	找回密码
密码			加入

[AU3基础] [已解决]求保存Excel数据到二维数组，请大大们看看，小弟初次接触