후행 공백이 포함된 셀이 있는 작업 시트가 있습니다. 이러한 공백을 제거하기 위해 다양한 VBA 방법을 사용해 보았습니다. 그러나 아무도 성공하지 못했습니다. 공백을 복사하여 "207.6100 "
메모장에 붙여넣었는지 확인한 후 그 안에 0이 있습니다. "0 "
누구든지 이것을 이해하도록 도와줄 수 있습니까?
답변1
"정리"하려는 셀을 선택하고 다음 작은 매크로를 실행하세요.
Sub KleanCell()
Dim r As Range, CH As String, v As String
Dim v2 As String
For Each r In Selection
v = r.Text
CH = ""
For i = 1 To Len(v)
v2 = Mid(v, i, 1)
If IsNumeric(v2) Or v2 = "." Then
CH = CH & v2
End If
Next i
r.Clear
r.Value = CDbl(CH)
Next r
End Sub
편집#1:
셀에 실제로 무엇이 있는지 보려면 해당 셀을 클릭하고 다음 매크로를 실행하세요.
Sub WhatIsInThere()
Dim L As Long, v As String
Dim i As Long, msg As String
v = ActiveCell.Text
L = Len(v)
msg = L & vbCrLf & vbCrLf
For i = 1 To L
msg = msg & i & vbTab & Mid(v, i, 1) & vbTab & Asc(Mid(v, i, 1)) & vbCrLf
Next i
MsgBox msg
End Sub
답변2
실제 숫자 뒤에 패딩된 셀 값에 표시되는 "0"은 "없는". 이것은 많은 데이터베이스 시스템에서 사용되는 필러 "Black Hole"입니다. Oracle Database에서도 이를 사용합니다. "NULL"은 "0"으로 나타납니다.
답변3
기능 을 사용하세요 Trim()
. 그래도 작동하지 않으면 Val(Trim())
.