2013-06-19 3 views
1

Null로 셀 범위를 채워야합니다.Null로 범위 채우기

Sub FillARangeWithNulls() 
Dim DQ As String 
DQ = Chr(34) 
With Selection 
    .Clear 
    .Formula = "=" & DQ & DQ 
    .Copy 
    .PasteSpecial Paste:=xlPasteValues 
End With 
End Sub 

이 코드는 작동하지만,이 간단한 작업에 대한 조금 복잡한 것 같다 내가 현재 사용하고 있습니다. 내가 좋아하는 뭔가를 바라고 :

Sub WhatIWouldLike() 
Selection.Value = ??????????????? 
End Sub 

하지만 수행

+0

사용할 수 있습니다 당신은 널 말할 때, 당신은 무엇을 의미합니까? 길이가 0 인 문자열? # N/A? – Bathsheba

+0

@ Bathsheba 예 단일 NULL 문자 –

+0

을 의미합니다. 나는 길이가 0 인 문자열이라고 가정합니다. 아래 답변. – Bathsheba

답변

2

를 사용할 올바른 문자열을 찾을 수없는이 : 빈에 선택의 모든 셀을 설정합니다

Sub WhatIWouldLike() 
    Selection.Value = "" 
End Sub 

끈; 당신이 당신의 코멘트에서 원하는대로.

그러나 이것은 접촉되지 않은 셀과 동일한 이 아니라입니다. 그렇게하려면 ClearContents를 @mehow 또는 @Cody Piersall로 사용하십시오.

+0

의 더 빠르고 더 명시적인 버전입니다. 코드를 작동하지만, 먼저 셀을 Text로 포맷해야합니다. 나는 매크로 안에서 이것을 할 수있다. 당신의 도움을 주셔서 감사합니다! –

+0

텍스트가 필요한 경우'Selection.Value = ""'앞에 'Selection.NumberFormat = "@"'을 추가하십시오. – chancea

0

이 시도 :

Sub WhatIWouldLike() 
    Selection.ClearContents 
End Sub 
2

당신은 또한

With Selection 
    .Value = "'" 
    .ClearFormats 
End With 
+0

NEAT !!!! ClearFormats는 아포스트로피를 제거합니다! –

관련 문제