현재 한 시트 (BACKEND)의 특정 셀에서 값을 복사하고 다른 시트 (EXPORT_DATA)의 특정 열을 다음 빈 행에 붙여 넣는 매크로가 있습니다.Excel : 특정 행에 값을 복사하는 VBA
Sub copy_values(Optional Source As String = "A1", Optional Source2 As String = "A1")
Dim R As Range
Dim col As Long
col = Range(Source).Column
Set R = Worksheets("EXPORT_DATA").Cells(Rows.Count, col).End(xlUp)
If Len(R.Value) > 0 Then Set R = R.Offset(1)
R.Value = Worksheets("BACKEND").Range(Source2).Value
End Sub
그것은 잘 작동하지만, 나는 그것이 어디에서 셀의 행의 데이터를 붙여 넣 곳에서 함수에, 열에서 다음 빈 셀에 데이터를 붙여 넣 곳의 기능을 대체 할 지정된 값을 보유합니다. (매크로 실행 후)
c1 c2 c3
a b 4
c d 6
2 단계 :이
예를 들어, 기존의 기능은 다음
단계를 할 것 1
c1 c2 c3
a b 4
c d 6
c d 5
그러나 나는 새로운 기능을 필요로하는 이 작업을 수행하십시오 :
2 단계 ("c"의 C1 값이 지정되고 매크로가 실행 됨) :
c1 c2 c3
a b 4
c d 5
현재 코드가 A 열의 마지막 값을 대체하는 것으로 보입니다. 이것을 알고 있습니까? 또한 A1 셀을 EXPORT_DATA 또는 전체 열에 복사하려고합니까? –
@VBAPete 네 말이 맞아. 나는 잘못된 매크로를 붙여 넣었다. 업데이트 됨. 고마워! –