단락

2012-06-14 5 views
-1

에서 문자열의 두 번째 발생을 삭제하는 방법 나는 수지가 구두닦이 가게에 앉아 보았다이단락

같은 단락이있다. 그녀가 앉아있는 곳에서 그녀는 빛을 발하고, 그리고 그녀는 그녀가 앉아있는 곳으로 빛난다.

그래서 한 번 이상 나타나는 문자열을 삭제하고 싶습니다. 위 단락에서 그녀는 앉아 있는데, 어디서, 한 번 이상 빛이 반복됩니다. 나는 이런 식으로 문자열 출력을 지우고 싶다.

나는 수지 빛깔의 가게에 앉아있는 것을 보았다. 그녀가 앉는 곳은 빛난다.

누가이 문제를 해결할 수 있도록 안내해 줍니까?

답변

1

문장 부호를 허용하지 않으면, 당신은이 라인에서 뭔가를 시도해 볼 수도 있습니다 : 코드가 너무 잘 작동

s1 = "I saw Susie sitting in a shoe shine shop. " _ 
    & "Where she sits she shines, and where she shines she sits." 
a1 = Split(s1, " ") 

For i = 0 To UBound(a1) 
    For j = i + 1 To UBound(a1) 
     If a1(j) = a1(i) Then 
      a1(j) = "" 
     End If 
    Next 

Next 

s2 = Trim(Join(a1, " ")) 
+0

아래처럼. http://social.msdn.microsoft.com/Forums/en-US/isvvba/thread/2ce86f3b-08ce-47e5-bd89-60ec21160083?prof=required – DeeGo

+0

@HarvestHappiness 태그는'access-vba'라고하지만 링크는 위의 MS 워드 VBA입니다. 질문을 게시 할 때 유효한 태그를 사용하십시오. – Fionnuala