필자가 가져온 데이터에서 처음에는 각 셀의 한 칸에 공백이 있음을 확인했습니다. 1000s의 타임 스탬프가 있기 때문에 백 스페이스를 사용할 수 없습니다. 아래 스크린 샷은 이것을 보여줍니다.
수동으로 할 필요없이이 공간을 어떻게 제거 할 수 있습니까?
답변
답변
이 짧은 매크로를 사용해보십시오 :
Sub NoSpace()
Dim rng As Range, r As Range
Set rng = Intersect(ActiveSheet.UsedRange, Range("B:B"))
For Each r In rng
If Left(r.Text, 1) = " " Then
r.Value = Mid(r.Text, 2)
End If
Next r
End Sub
답변
매크로로 문제를 해결하고 싶지 않다면 한 번만 수행하고 다른 컬럼은 사용하지 않으려 고하고 날짜는 모두 1 ~ 2 년 밖에 걸리지 않습니다.
- 열을 선택하고,
- 찾기 – 바꾸기
“2016-“과 “2016-“(물론 따옴표 없음)