2017-05-08 3 views
1

값을 통합 문서간에 복사하여 붙여 넣을 수 있습니다. 왜냐하면 모든 셀에서 제대로 수행하지 못하기 때문입니다. 내가 잘못하고있는 것은 무엇입니까? ... 조언은 매우 도움이 될 것입니다. , 고맙습니다!VBA 복사 붙여 넣기 값이 올바르지 않음

Sub CopyPaste() 

Workbooks("LastData").Worksheets("East").Range("A3:BT3").Copy 
Destination:=Workbooks("DATA.xlsm").Worksheets("AP").Range("A" & 
Rows.Count).End(xlUp).Offset(1, 0) 
Application.OnTime Now + TimeValue("00:15:00"), "CopyPaste" 

End Sub 
+0

제대로하고 있지 않다는 것을 의미합니까? – 0m3r

+0

@ 0m3r 예를 들어 2 셀의 값을 스왑하거나 다른 셀에서 시간 함수를 복사하지 않는 경우 (#### 만 복사), thx! – Gabriel

답변

0

range1.copy range2은 수식과 형식을 복사합니다. 값을으로 복사하려면 PasteSpecial을 사용하거나 값을 직접 지정하십시오 (후자에 대한 선호도).

1 PasteSpecial

Workbooks("LastData").Worksheets("East").Range("A3:BT3").Copy 
Workbooks("DATA.xlsm").Worksheets("AP").Range("A" & Rows.Count).End(xlUp) _ 
    .Offset(1, 0).PasteSpecial xlPasteValues 

2 - 할당 된 값

Workbooks("DATA.xlsm").Worksheets("AP").Range("A" & Rows.Count).End(xlUp).Range("A2:BT2") _ 
    .Value = Workbooks("LastData").Worksheets("East").Range("A3:BT3").Value2 

번째 방법은 적절 대상 범위의 크기가 필요하지만,이 고속, 적절한되는 바람직하고 copy/paste의 사용을 피한다 물건.

+0

큰 감사합니다! ... 이제 완벽하게 작동합니다! – Gabriel

+0

@ 가브리엘 당신을 환영합니다. –