나머지 데이터를 복제하면서 셀을 두 행으로 분할합니까?

-1

데이터베이스에서 템플릿에 따라 제 3 자에게 데이터를 전송하려고합니다. 보호자 정보를 보내야합니다. 각자는 자신의 행이 있습니다. 우리 데이터베이스에는 "/"다음에 각 ID별로 세부 정보가있는 보호자 정보가 있습니다. 다른 모든 것을 복제하면서 Guardian 셀에 따라 데이터를 분할해야합니다. 나머지 데이터를 복제하면서 셀을 두 행으로 분할합니까?

이 특별한 추가 기능없이 엑셀에서 수행 할 수 있습니까? 모든 도움을 주시면 감사하겠습니다.

출처

2017-12-15 AnemonePoppy

https://stackoverflow.com/questions/42425208/vba-split-cell-values-into-multiple-rows-and-keep-other-data –

https://stackoverflow.com/questions/ 35439099/분할 셀 단일 셀에서 다중 행 및 추가 행 다른 행 –

https://stackoverflow.com/questions/25776914/vba-to-split-multi-line- 텍스트 - 인 - 엑셀 - 셀 - 분리 - 행 - 계속 - adja –

Scott Craner는 VBA (나에게 새로운 기능)를 사용하여 정답에 연결했지만 정확히 내가 필요한 것입니다.

Sub splitByColB() 
    Dim r As Range, i As Long, ar 
    Set r = Worksheets("Sheet1").Range("B999999").End(xlUp) 
    Do While r.row > 1 
     ar = Split(r.value, "/") 
     If UBound(ar) >= 0 Then r.value = ar(0) 
     For i = UBound(ar) To 1 Step -1 
      r.EntireRow.Copy 
      r.Offset(1).EntireRow.Insert 
      r.Offset(1).value = ar(i) 
     Next 
     Set r = r.Offset(-1) 
    Loop 
End Sub

출처

2017-12-15 18:04:43 AnemonePoppy

나머지 데이터를 복제하면서 셀을 두 행으로 분할합니까?

답변

관련 문제