Excel 2010 轉置txt檔求助

各位大大安，最近臨時受命協助一個系統log檔案轉換，但由於小弟並不熟悉VBA，也查過許多函數用法但仍無法解決問題，所以想向大家請教
問題如下:
log的txt檔內容大致如下
-------------- 01 --------------
Time: 2013.06.25, 00:01:10
Connect : OK!
Model: C200
Version: 1.0.0-1
Video :
Jpeg Connection...Ok
Image Check : Ok
Audio In :
Connection...Ok
PC Listening Check : Ok
Wlan :
Enable Wlan...Ok
Set ESSID...Ok
Try connect Camera...Ok
CountryCode :
Write Code...Ok!
LightSensor :
Test Sensor...Ok
SN:
Input : AA0001
-------------- 02 --------------
Time: 2013.06.25, 00:01:20
Connect : OK!
Model: C200
Version: 1.0.0-9
Video :
Jpeg Connection...Ok
Image Check : User Stop!
-------------- 03 --------------
Time: 2013.06.25, 00:01:30
Connect : OK!
Model: C200
Version: 1.0.0-9
Video :
Jpeg Connection...Ok
Image Check : Ok
Audio In :
Connection...Ok
PC Listening Check : User Stop!
原想直接轉置，但發現此log檔案轉出的欄位並非每一筆都是完整的，由內容可以看出---01---算是一筆完整的紀錄，02和03則並沒有包含完整的欄位紀錄
而在無法變動log輸出格式的情況下，為了方便統計分析，需要將此紀錄轉為橫式，但因欄位紀錄資料無法直接轉置
想請教各位大大可以透過有甚麼方式轉置這樣的資料呢?
麻煩了~~感謝!

kulisung

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 15
點名: 0
作業系統: Windows 7
軟體版本: 旗艦版
閱讀權限: 10
註冊時間: 2013-6-27
最後登錄: 2013-7-4

2^#

發表於 2013-7-1 13:30 | 顯示全部帖子

回復 2# luhpro

Hi~luhpro大大～感謝你的回覆
因為小弟並不是很懂VBA的語法，只是邏輯概念還可以
至於那d(lpos)的用法，小弟有稍微咕狗一下Dictionary的涵義
但仍是不甚瞭解（因小弟無coding的經驗，所以一些深入的概念要瞭解有點小難）
試過大大的程式也是在d(lpos)這行出現問題沒有定義的問題
請問d(lpos)是否需要另外定義？

TOP

kulisung

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 15
點名: 0
作業系統: Windows 7
軟體版本: 旗艦版
閱讀權限: 10
註冊時間: 2013-6-27
最後登錄: 2013-7-4

3^#

發表於 2013-7-2 00:13 | 顯示全部帖子

回復 4# Hsieh

感謝超級版主 Hsieh 的回覆
不過大概是因為我只是擷取一段log內容的關係，因為發現轉出的內容似乎有錯
經過查看似乎是因為是用"-"來區分，所以造成這樣的錯誤
因為看過大量的log內容發現不同的日期會有相同的-----xx----- 紀錄
例如
-------------- 01 --------------
Time: 2013.06.25, 00:01:10
.
-------------- 01 --------------
Time: 2013.06.26, 10:01:20
.
.
看起來時間才算是唯一值

以下是實際的log內容
-------------- 19 --------------
Time: 2013.06.25, 00:44:13
Connect : OK!
Model: C1200
Version: 1.0.0-9
Mac: 00:FF:AA:BB:CC:01
Video :
Jpeg Connection...Ok
Image Check : Ok
Audio In :
Connection...Ok
PC Listening Check : Ok
Wlan :
Enable Wlan...Ok
Set ESSID...Ok
Try connect Camera...Ok
CountryCode :
Write Code...Ok!
LightSensor :
Test Sensor...Ok
Reset Button :
Setting Test mode...Ok!
Test Button...Ok
WPS Button :
Setting Test mode...Ok!
Test Button...Ok
Link QRCode :
Input : 11100000001A0123456
Write Mac...Ok
Check Mac...Ok! New Mac: 00:FF:AA:BB:CC:0F
Cloud Version :
Getting...Version: 1.1
Fast Factory Reset :
Reset Camera...Ok!
Model: C1200
Version: 1.0.0-9
Mac: 00:FF:AA:BB:CC:0F
Country Code: 0
-------------- 20 --------------
Time: 2013.06.25, 00:46:26
Connect : OK!
Model: C1200
Version: 1.0.0-9
Mac: 00:FF:AA:BB:CC:02
Video :
Jpeg Connection...Ok
Image Check : Ok
Audio In :
Connection...Ok
PC Listening Check : User Stop!
-------------- 19 --------------
Time: 2013.06.25, 06:07:22
Connect : OK!
Model: C1200
Version: 1.0.0-9
Mac: 00:FF:AA:BB:CC:03
Video :
Jpeg Connection...Ok
Image Check : Ok
Audio In :
Connection...Ok
PC Listening Check : Ok
Wlan :
Enable Wlan...Ok
Set ESSID...Ok
Try connect Camera...Ok
CountryCode :
Write Code...Ok!
LightSensor :
Test Sensor...Ok
Reset Button :
Setting Test mode...Ok!
Test Button...Ok
WPS Button :
Setting Test mode...Ok!
Test Button...Ok
Link QRCode :
Input : 11100000001A923415
Write Mac...Ok
Check Mac...Ok! New Mac: 00:FF:AA:BB:CC:1A
Cloud Version :
Getting...Version: 1.1
Fast Factory Reset :
Reset Camera...Ok!
Model: C1200
Version: 1.0.0-9
Mac: 00:FF:AA:BB:CC:1A
Country Code: 0

這樣的判斷條件是否又複雜了些呢？還請超級版主協助感恩

TOP

kulisung

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 15
點名: 0
作業系統: Windows 7
軟體版本: 旗艦版
閱讀權限: 10
註冊時間: 2013-6-27
最後登錄: 2013-7-4

4^#

發表於 2013-7-2 16:46 | 顯示全部帖子

回復 6# Hsieh

不好意思，試過程式轉出來似乎會造成錯位以及後面部份資料遺失（依上面的3筆資料來測試）
結果如下圖，再次麻煩真是不好意思
前半部份

後半部份

TOP

kulisung

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 15
點名: 0
作業系統: Windows 7
軟體版本: 旗艦版
閱讀權限: 10
註冊時間: 2013-6-27
最後登錄: 2013-7-4

5^#

發表於 2013-7-3 10:31 | 顯示全部帖子

回復 8# Hsieh

感謝Hsieh版主大大幫忙，這邊還有個小問題
就是似乎因為有部份欄位是相同的，所以會將資料內容擺放在一起
請問有辦法將他視為不同而分開嗎？就如log內容原本的順序
很不好意思因為小弟不是很懂，感謝幫忙
如下圖（Model，MAC，Version）

TOP

kulisung

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 15
點名: 0
作業系統: Windows 7
軟體版本: 旗艦版
閱讀權限: 10
註冊時間: 2013-6-27
最後登錄: 2013-7-4

6^#

發表於 2013-7-3 17:47 | 顯示全部帖子

回復 10# Hsieh

感謝回覆，小弟知道拉寬資料都會顯示出來
那若要將該列的值分為分欄排放（非分列）
程式是否會因為少了判斷值而無法達成？
因為欄位名稱都一樣，所以造成位置的指定都相同
（小弟這樣的想法可對？)

TOP

kulisung

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 15
點名: 0
作業系統: Windows 7
軟體版本: 旗艦版
閱讀權限: 10
註冊時間: 2013-6-27
最後登錄: 2013-7-4

7^#

發表於 2013-7-3 22:25 | 顯示全部帖子

回復 12# GBKEE

不好意思，文字檔就如前面所列3筆，原想擷取此3筆資料應該足夠（實際上千筆）
另外原本是想上傳excel結果，但是附件格式不允許？只好上傳圖片
而剛剛才發現可以上傳zip檔，真不好意思
不過就如前面的圖片所說的那樣
最後轉出結果因欄位名稱相同，所以會將資料內容皆放在同一儲存格
現在是希望能區隔開，只是依自己想法去判斷似乎是會很麻煩？
若造成困擾小弟在這說聲抱歉