Excel 求助

hweeyatt

新手求助，我有很多個excel /txt file 需要在第一行加上一行字

然後再放進我其他的軟件分析，

有沒有辦法可以一次使50個 excel/txt file added the first line of condition?

For example:
Turning :
Loading,1.024,0.3725408,0.01414836,0, , ,0.3725408,0.05317445,0, , , , , , , , ,0.003700595,0, , , , ,0,0, , , , ,
Loading,2.304,1.039208,0.04485469,0, , ,1.039208,0.08378078,0, , , , , , , , ,0.02530482,0, , , , ,0,0, , , , ,
Loading,3.584,2.147026,0.08137956,0, , ,2.147026,0.1201395,0, , , , , , , , ,0.08322852,0, , , , ,0,0, , , , ,
Loading,4.864,3.700381,0.1212794,0, , ,3.700381,0.1598063,0, , , , , , , , ,0.1992025,0, , , , ,0,0, , , , ,
Loading,6.016,5.695565,0.1631502,0, , ,5.695565,0.2013778,0, , , , , , , , ,0.3945042,0, , , , ,0,0, , , , ,
Loading,7.296,8.13647,0.2064113,0, , ,8.13647,0.2442728,0, , , , , , , , ,0.6911669,0, , , , ,0,0, , , , ,
Loading,8.704,11.01749,0.2505359,0, , ,11.01749,0.2879652,0, , , , , , , , ,1.109608,0, , , , ,0,0, , , , ,
Loading,10.368,14.34637,0.2944796,0, , ,14.34637,0.3314096,0, , , , , , , , ,1.660567,0, , , , ,0,0, , , , ,

into
TD;50mN_v3.000;0;0.03908197;0;0.2103292;0.0575648;0:0:0;21/05/18:11:31:02;True;0.00015;; ;2;0;0;82.53362oly2/80%;1;,t (sec),P (raw),ht (raw),S,Lateral Force (mN),Lateral Distance (um),P (mN),ht (um),ADC 1/0,hc,a,dP/dh,E*(GPa),H (GPa),Position(um),Friction,E (GPa),Up (nJ),Ue (nJ),E1,E2,n1,n2,AE/C,AE/S,h corr,HV,HM,-,-
IC,0,0.1503822,-6.101884E-05,0, , ,0.1503822,0.03902095,0, , , , , , ,, ,0,0, , , , ,0,0, , , , ,
Loading,1.024,0.3725408,0.01414836,0, , ,0.3725408,0.05317445,0, , , , , , , , ,0.003700595,0, , , , ,0,0, , , , ,
Loading,2.304,1.039208,0.04485469,0, , ,1.039208,0.08378078,0, , , , , , , , ,0.02530482,0, , , , ,0,0, , , , ,
Loading,3.584,2.147026,0.08137956,0, , ,2.147026,0.1201395,0, , , , , , , , ,0.08322852,0, , , , ,0,0, , , , ,
Loading,4.864,3.700381,0.1212794,0, , ,3.700381,0.1598063,0, , , , , , , , ,0.1992025,0, , , , ,0,0, , , , ,
Loading,6.016,5.695565,0.1631502,0, , ,5.695565,0.2013778,0, , , , , , , , ,0.3945042,0, , , , ,0,0, , , , ,
Loading,7.296,8.13647,0.2064113,0, , ,8.13647,0.2442728,0, , , , , , , , ,0.6911669,0, , , , ,0,0, , , , ,
Loading,8.704,11.01749,0.2505359,0, , ,11.01749,0.2879652,0, , , , , , , , ,1.109608,0, , , , ,0,0, , , , ,
Loading,10.368,14.34637,0.2944796,0, , ,14.34637,0.3314096,0, , , , , , , , ,1.660567,0, , , , ,0,0, , , , ,

tulipye

VBA 吧

tvc889

同意，VBA才是上策。

huanged

如果excel是csv格式的话，随便找个脚步语言就可以加进去
拿windows command shell举栗子

for /r %i in (*) do (
echo "new line" > tmp.cvs
type %i >> tmp.cvs
rename %i %i.old
rename tmp.cvs %i
)

Keatai

能发个excel吗？好像看不清楚

hweeyatt

Any chance I could save the file into something like .000 then .001 then .002 rather .csv ?

newSYDer

vba就是几行代码完成

Keatai

lz能私信给我看看excel么？最近正在学习，所以想试试看能不能帮得到忙。

hweeyatt

newSYDer 发表于 2018-7-10 16:29
vba就是几行代码完成

Can I change/rename the file format ?

say from .000.csv into .000

What happen is now I got like 50 files , the file arrangement is like .000 , .001, .002 ,.003

Inside the file is like:
"Loading,1.024,0.3725408,0.01414836,0, , ,0.3725408,0.05317445,0, , , , , , , , ,0.003700595,0, , , , ,0,0, , , , , "
"Loading,2.304,1.039208,0.04485469,0, , ,1.039208,0.08378078,0, , , , , , , , ,0.02530482,0, , , , ,0,0, , , , , "
"Loading,3.584,2.147026,0.08137956,0, , ,2.147026,0.1201395,0, , , , , , , , ,0.08322852,0, , , , ,0,0, , , , , "


I need :
1)  add a row on top
2) save the file accordingly/ change the file format back to .000 ,.001 ,.002 rather .000.csv  ,.001.csv,.002.csv


I'm thinking Powershell code but i'm a newbie

hweeyatt

huanged 发表于 2018-7-9 12:00
如果excel是csv格式的话，随便找个脚步语言就可以加进去
拿windows command shell举栗子

"for /r %i in (*) do (
echo "new line" > tmp.cvs
type %i >> tmp.cvs
rename %i %i.old
rename tmp.cvs %i
)
"

Hi ,

I'm a newbie here.Can i do multiple file at the same time ?

and can I save the file name accordingly for instance:
file.000.cvs -> file.000
file.001.cvs -> file.001
file.002.cvs -> file.002

Thanks for helping

huanged

hweeyatt 发表于 2018-7-11 15:52
"for /r %i in (*) do (
echo "new line" > tmp.cvs
type %i >> tmp.cvs

for /r %i in (*.cvs) do (
  rename %i %~ni
)

newSYDer

hweeyatt 发表于 2018-7-11 15:43
Can I change/rename the file format ?

say from .000.csv into .000

vba另存为其他名字是可以的，但为什么要去掉文件后缀？直接用csv，xlsx，或者txt其他的软件读取不了吗？

hweeyatt

newSYDer 发表于 2018-7-11 15:37
vba另存为其他名字是可以的，但为什么要去掉文件后缀？直接用csv，xlsx，或者txt其他的软件读取不了吗？
...

cannot . it have to be 000 or 001 sort of number ....

newSYDer

hweeyatt 发表于 2018-7-12 11:58
cannot . it have to be 000 or 001 sort of number ....

vba小程序可以做到你想要的

hweeyatt

newSYDer 发表于 2018-7-12 10:33
vba小程序可以做到你想要的

can it be multiple file at the same time? or do I need to open each file and run it one by one?

Sorry cant type chinese at work

newSYDer

写一个独立的vba就可以了。
vba要做的就是：1.读取你放源文件的folder；2.打开每一个源文件；3.加一行header并保存；4.rename文件名去掉extension。
如果你要保留源文件工序多几步。全部程序完成，不需要人手打开每一个文件。

newSYDer

hweeyatt 发表于 2018-7-12 14:18
can it be multiple file at the same time? or do I need to open each file and run it one by one?

S ...

写一个独立的vba就可以了。
vba要做的就是：1.读取你放源文件的folder；2.打开每一个源文件；3.加一行header并保存；4.rename文件名去掉extension。
如果你要保留源文件工序多几步。全部程序完成，不需要人手打开每一个文件。

hweeyatt

newSYDer 发表于 2018-7-12 12:42
写一个独立的vba就可以了。
vba要做的就是：1.读取你放源文件的folder；2.打开每一个源文件；3.加一行hea ...

Many thanks ,

Going to learn VBA now ...so a Power shell wont work ?

newSYDer

hweeyatt 发表于 2018-7-12 16:05
Many thanks ,

Going to learn VBA now ...so a Power shell wont work ?

powershell不太了解，如果是要做数据处理的话，我更喜欢vba一些，跟微软的windows/office结合的很好，可以开发出很强大的应用。

oceangoing

用VBA吧

hweeyatt

oceangoing 发表于 2018-7-14 22:21
用VBA吧

absolutely newbie in VBA....
dont even know where to begin

wujjanet

Powershell更好，把前面的编码转一下就好了