PCZONE 討論區

PCZONE 討論區 (https://www.pczone.com.tw/vbb3/)
-   -- OFFICE 相 關 軟 體 討 論 版 (https://www.pczone.com.tw/vbb3/forum/5/)
-   -   【求助】刪去不需要的欄位改以空白替代 (https://www.pczone.com.tw/vbb3/thread/5/108909/)

lys338 2005-03-24 04:01 PM

【求助】刪去不需要的欄位改以空白替代
 
刪去不需要的欄位改以空白替代

Dim CELL1 As Range
Dim STRING1 As String

Set RANGE1 = Range("A1:B1000")
For Each CELL1 In RANGE1
If CELL1.Value = "=" Then CELL1 = ""
Next CELL1

如果看見"="就變空白
但如果資料是"==="或"=========".....不等...
該如何寫才是呢??

~GG~ 2005-03-25 02:30 AM

看不懂...

lys338 2005-03-25 08:21 AM

2 個附加檔案
抱歉..
說明不夠詳細
上傳附件說明
請參閱


[QUOTE=~GG~]看不懂...[/QUOTE]

vvcvc 2005-03-25 06:13 PM

一樣是利用Ctrl+H

leonchou 2005-03-26 07:18 PM

v兄說的是, 用[尋找/取代]便可。

lys338 2005-03-28 08:50 AM

謝謝諸位大大的賜教
小弟受惠萬分~~


所有時間均為 +8。現在的時間是 02:28 PM



 XML   RSS 2.0   RSS 
本站使用 vBulletin 合法版權程式
站務信箱 : [email protected]

本論壇所有文章僅代表留言者個人意見,並不代表本站之立場,討論區以「即時留言」方式運作,故無法完全監察所有即時留言,若您發現文章可能有異議,請 email :[email protected] 處理。