Excel VBA 코드를 모두 "." 에 의해 ","열에

나는 모두를 대체하기 위해 Excel VBA 매크로를 갖고 싶습니다. " (점)을 ","(쉼표) 한 시트의 열에 표시합니다.Excel VBA 코드를 모두 "." 에 의해 ","열에

다음 코드로 처리하려고하면 셀 값이 "."인 경우에만 바뀝니다. 하지만 "을 대체하지 않습니다." 셀 값 내부 :

Sub ReplaceDoTwComma() 

Worksheets("Sheet5").Columns("D").Replace _ 
What:=".", Replacement:=",", _ 
SearchOrder:=xlByColumns, MatchCase:=True 

End Sub

누군가가 나에게이 작업을 수행 할 수있는 좋은 코드를 줄 수 (즉 1.16 sheet5 내부의 열 D에서 1.16로 전환해야한다)? 당신은 그냥 엑셀에서 질문> CRTL + H에 넣어 무엇을 찾기에 열을 선택,이에 대한 매크로가 필요하지 않습니다

출처

2014-11-18 NT01

문제에 대해 많은 정보가 없지만 매크로보다 숫자 셀 (마우스 오른쪽 버튼 클릭, 형식)에 다른 형식으로 더 잘 풀릴 수 있습니다. 문제는 아마 당신이 텍스트를 조작하지 않는 것일 것입니다. – Casey

+1 나를 위해 작동하지만. 셀 내용이 텍스트로 변경된다는 경고를받습니다. – kaybee99

몇 가지 조사를 해보았으며 숫자로 이것을 수행하는 좋은 방법이 없습니다 (미국식 유럽식 쉼표와 마침표 교환). 텍스트로해야합니다. '.NumberFormat'을 사용하면 작동하지 않습니다. – Chrismas007

LookAt:=xlPart 옵션을 추가하십시오.

Worksheets("Sheet5").Columns("D").Replace _ 
     What:=sought, replacement:=replaced, LookAt:=xlPart

출처

2014-11-18 16:08:17 cheezsteak

루프가 있습니까? 정말? 그것은 성능을 많이 저하시킬 것입니다. –

간단한 질문에 대한 간단한 대답입니다. 좀 더 복잡한 버전을 원한다면 배열에 넣을 수 있습니다. – cheezsteak

하지만 왜 당신은 복잡한 일이겠습니까? 질문의 코드는 독자적으로 작동합니다. 문제가 다르며 원래 문제를 해결하려고하지 않는 이유는 무엇입니까? 덤핑 코드는 쉽습니다. 최종 결과를 얻기 위해 50 가지 버전을 제공 할 수 있지만 요점은 없습니다. –

사전에

감사합니다 ... "." 및 바꾸기에서 ","및 모두 바꾸기

출처

2014-11-18 16:06:22 AlexV

VBA 매크로를 사용하여이 작업을 수행하려고합니다. – NT01

Excel VBA 코드를 모두 "." 에 의해 ","열에

답변

관련 문제