VBA :

 **Original String**       **Result** 
      CMP         CMP Rs. 
      Rs. 

      Mar Cap        Mar Cap Rs.Cr. 
      Rs.Cr. 

      Debt        Debt Rs.Cr. 
      Rs.Cr. 

      # Shares       #Shares C. 
      Cr.

는

가 스트립 스트립 즉, 여러 줄 문자열에서 작동합니다 ("."는 문자열,) 모든 라인에 점 스트립
html로 문자열에서 링크 휴식을 제거하고 공간으로 교체 문자열이지만 스트립 (문자열, "\ n")가 작동하지 않습니다. 은입니다. 구분 기호입니까?VBA :

출처

2017-11-12 Vishal Kumar

거기에 LINEBREAK을 수행 할 수있는 다른 문자가 있지만 만약 표준적인 것이라면'Replace (String, Chr (10), "")' – Vegard

@Vegard 그것의 html st 'br'태그로 완성 된 반지 –

@Vegard 문자열의 모든 두 번째 줄 시작 부분에 솔루션에 '공백'이 추가되었습니다. –

시도 :

Strip(String, vbLf)

또는

Strip(String, vbCrLf)

이러한 상수에 대한 문서 및 here 더.

출처

2017-11-12 12:43:22 ashleedawg

스트립 fuction이 작동하지 않았습니다 –

실제 데이터를 공유 할 수 있습니까? 파일? 보이지 않는 공백은 다양한 문자로 인해 발생할 수 있으며 실제 문자열로 빠르게 수정됩니다. – ashleedawg

우리가 첫 번째 행에서 문자열을 복용하는 가정 :

Dim Result As String 
Dim Vhcv As IHTMLTableCell 
Dim j As Long 

    For j = 1 To Len(Vhcv.innerText) 

    If Asc(Mid(Vhcv.innerText, j)) = 13 Then 

     Result = Replace(Vhcv.innerText, vbCrLf, " ") 

     Debug.Print Result 

    End If 

Next

최종 결과 :

  CMP Rs. 

     Mar Cap Rs.Cr. 

     Debt Rs.Cr. 

     # Shares Cr.

출처

2017-11-12 13:22:34

답변

관련 문제