请教各位高手！

gdfsswwxf

有一个表，类似：（以下的内容在同一列里）

星期一

123

我你他

uuoipoi

星期二

23434

阿姐大阿瑟绿岛卡

dfasdf

星期三

adfjakj

adflj

2344543

......

星期日

askfjlkaj

打算开

哦批发



现需自动把每天的内容各自独立成一个表，例：星期一到星期二的内容汇入到01表；星期二到星期三的内容汇入到02表....。因每周都有大量类似的表需要分开，所以希望找个方便的方法，先谢谢！

tanjh

用VBA比较容易实现.以下是读数据的结构.

dim i as integer,n as integer

n=0

for i=8*n+1 to 8*n+8

...

next i

[此贴子已经被作者于2004-6-7 12:02:58编辑过]

hzg7818

我想还是实例文件比较容易解决，你不妨将关键内容隐去，发个附件由大家帮你做吧

fsswwxf

谢谢。希望大家替小弟想想办法！压缩包内有两个文件，TXT为原文件。

hzg7818

附件已看到，可以通过文本文件直接解决，但今天急于做单位的一套报表，恐怕要后天才有时间为你做，不好意思

fsswwxf

哦，只要知道能实现已经很开心了，先谢谢各位大哥了，特别是要谢谢hzg7818。期待着您的好方法！

test2006

要写代码才可行

hzg7818

看看是否满意

fsswwxf

谢谢版主，非常满意，这正是我想实现的，谢谢您的热心帮忙！

fsswwxf

如果它个格式像这样呢 “04/04/19   星期一”，我把代码改成这样“ Like "*/*/*星期*" ”，不行，望指教！