[發問] [已解決]如何地址分類

本帖最後由 owen9399 於 2012-2-9 15:49 編輯

如何寫函數或 vba

自動分類資料:
把資料貼上 sheet1 的表單  , 新增按鈕 (地址自動分類)
儲存於 sheet2的表單

1.其中舊資料中的彰化縣彰化市田中里２４鄰彰泰二街２８之１１號　
變成新資料彰化市彰泰二街２８之１１號

去除彰化縣田中里 24鄰保留  彰化市
但是保留彰化縣和美鎮 ...彰化縣鹿港鎮 ....等外縣鄉鎮

2.
自動排列  QTY的數值  由  大排到小

3.分區域儲存資料於 sheet2 的表
彰化市的放一起

彰化縣芬園鄉+彰化縣和美鎮+彰化縣線西鄉  放一起

彰化縣鹿港鎮放一起

彰化縣溪湖鎮放一起

各區  空格距離(間距)10列

謝謝大大

另外 sheet2的表單
zip的數字就不要顯示出來可以自動刪除

地址範本:

彰化縣溪湖鎮中山里２０鄰大溪路一段７０３號　　　　　　　　　
彰化縣芬園鄉圳墘村４鄰彰南路一段８４５號　　　　　　　　　　
彰化市西興里景宗街６６巷２１號　　　　　　　　　　　　　　　
彰化縣鹿港鎮溝墘里６鄰溝墘巷２０８號　　　　　　　　　　　　
彰化縣鹿港鎮新宮里７鄰文開路６巷２１號　　　　　　　　　　　
彰化縣鹿港鎮景福里９鄰景福巷１１１號　　　　　　　　　　　　
彰化縣溪湖鎮中山里３鄰大溪路１段４９４號　　　　　　　　　　
彰化縣溪湖鎮東溪里２鄰銀錠路２３２巷７４弄３號　　　　　　　
彰化縣溪湖鎮中山里３鄰大溪路１段４９４號　　　　　　　　　　

彰化市中正路二段９４號　　　　　　　　　　　　　　　　　　　
彰化縣線西鄉頂犁村１１鄰頂犁路１２３號　　　　　　　　　　　
彰化縣芬園鄉圳墘村１０鄰碧園路一段３５５巷５號　　　　　　　
彰化縣彰化市下

地址分類.rar (3.47 KB)

樓主熱帖

owen

owen9399

中學生 Rank: 2

帖子: 94
主題: 16
精華: 0
積分: 128
點名: 0
作業系統: XP
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
註冊時間: 2012-1-30
最後登錄: 2015-11-17

2^#

發表於 2012-2-7 00:08 | 顯示全部帖子

我目前有用字串來取代

但有一些問題

owen

TOP

owen9399

中學生 Rank: 2

帖子: 94
主題: 16
精華: 0
積分: 128
點名: 0
作業系統: XP
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
註冊時間: 2012-1-30
最後登錄: 2015-11-17

3^#

發表於 2012-2-7 11:41 | 顯示全部帖子

本帖最後由 owen9399 於 2012-2-7 12:53 編輯

請問  超級版主 Hsieh 或各位大大
1.可以修改以此順序排列
H I J K L
分組          鄉鎮市區
1          彰化市
2          花壇鄉秀水鄉埔鹽鄉溪湖鎮
3          鹿港鎮       福興鄉
4          線西鄉伸港鄉和美鎮芬園鄉

2.設定  每頁的大小  固定列印範圍  版面設定上.下.左.右:  各為1cm

3.設定分頁    如分組1 為一頁
A_NO A_NM QTY TEL       ADDR
32848 羅**　　265000 04-75***       彰化市西興里景宗街**巷２*號　

另外  請問
我有新增彰化市的  (例如:500 . 彰化縣 . 彰化縣彰化市　. 0001里 . 13鄰...等 )  用字串表示取代或不顯示  ,但是有些問題 ,
   如: 500彰化縣彰化市延平里15鄰中山路1段509號按下修改按鈕
      顯示    彰化市1中山路1段509號 (15鄰的  1 未被取代  成不顯示)

另外附上    完整的清單的結果  +  如何修正檔的資料表

地址分類測試清單版.rar (27.51 KB)

地址分類測試修正版.rar (27.16 KB)
謝謝大大的指導

彰化市放一起

花壇鄉秀水鄉埔鹽鄉溪湖鎮  的放一起
但是空一格
例如:
A_NO A_NM QTY TEL       ADDR
32848 羅**　　265000 04-75***       彰化縣花壇鄉景宗街**巷２*號　

A_NO A_NM QTY TEL       ADDR
328 林**　　26000 04-75***       彰化縣秀水鄉溪心街**巷1２*號
3268 王**　　20230 04-75***       彰化縣秀水鄉溪心街10**號

　　　　　　　　　　　　

owen

TOP

owen9399