※ 引述《lame (生日快樂)》之銘言：
: 軟體:
: excel
: 版本:2003
: 我需要把以下的空格刪掉 就是讓每一直直列的空格被刪掉 順序不變
: 由於有上萬個數據 無法一一刪 希望有好心人可以提供聰明的方法
: 1
: d
: d
: w
: d
: d
: e dfe
: e d ew
: cx
: c c
: -------我想要變成以下這樣----------
: 1 d d
: w d d
: e d dfe
: e cx ew
: c c
範例下載
http://0rz.tw/7f32S
￣▽￣|| 抱歉 沒有把它寫很好 不過應該是堪用啦
如果你有更好的想法記得跟我說喔
Do
For x = 1 To 20
For y = 1 To 20
If Cells(x, y) = "" And Cells(x + 1, y) <> "" Then
Cells(x, y) = Cells(x + 1, y)
Cells(x + 1, y) = ""
End If
Next
Next
g = g + 1
Loop Until g = 400
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.104.167.7