請問如何刪除Excel儲存格中的多餘空行？

shupo

110分

21樓

shupo

個人積分：110分

文章編號：76961621

常用 => 尋找與選取 => 特殊目標 => 空格(K)

滑鼠右鍵 => 刪除

laurent5680

3321分

22樓

laurent5680

個人積分：3321分

文章編號：76962720

shupo wrote:
常用 => 尋找與選...(恕刪)

刪除刪除刪除

WJS_HVM

31分

23樓

WJS_HVM

個人積分：31分

文章編號：76964610

用VBA試試
Private Sub CommandButton1_Click()
Range("A2") = Replace(Range("A1"), vbLf, "")
End Sub

sop2

154分

24樓

sop2

個人積分：154分

文章編號：76964675

這是儲存格格式裡的自動換行
點進儲存格用Backspace就可刪掉多餘的行

陌生的路

1211分

25樓

陌生的路

個人積分：1211分

文章編號：76965078

複製到word
清除換行或取代

貼回excel

snare

3211分

26樓

snare

個人積分：3211分

文章編號：76966485

Sub test()

Dim temp, i As Integer, j As Integer, s As String

Range("b1:b3").Clear
For i = 1 To 3
temp = Split(Cells(i, 1), vbLf)
For j = 0 To UBound(temp)
If temp(j) <> "" Then Cells(i, 2) = Cells(i, 2) & temp(j) & vbLf
Next j
Cells(i, 2) = Left(Cells(i, 2), Len(Cells(i, 2)) - 1)
Next i

End Sub