2014-07-11 2 views
0

나는 특정 셀 범위를 복사하여 별도의 통합 문서의 테이블에 붙여 넣는 Excel의 VBA 매크로를 (stackoverflow 사용자 : @xificurC의 도움으로) 개발했습니다. . 그러나 내 계정에 대한 사용자 권한으로는 사용할 수없는 데이터와 관련된 수식이이 테이블에 있습니다. 그래서 내 질문은 어떻게 수식 대신 셀의 실제 액면 값을 복사 할 수 있습니다.VBA Excel 책 예약 수식이 아닌 복사 셀 값

'get all excel files (and only excel files) from specified folder 
    file_checks = Dir(path & "\*.xls*") 
    Do Until file_checks = "" 
     'open file 
     Set wkbklp = Workbooks.Open(path & "\" & file_checks) 
     Set wkshtlp = wkbklp.Sheets(1) 
     'copy data away from original 
     Set data_return = wkshtlp.Range(start_cell).CurrentRegion 
     data_return.Copy check_sheet.Cells(check_sheet.Rows.Count, "B").End(xlUp).Offset(1, 0) 
     'close file without saving to make it all more automated 
     wkbklp.Close False 
     'loop through files until all are done 
     file_checks = Dir 
    Loop 

이것은 한 책에서 다른 책으로 데이터를 전송하는 코드입니다. 나는이 일을하는 명령을 찾지 못했지만 나는 아마추어 일 뿐이므로 틀린 핵심 단어를 사용했을지도 모른다.

+0

그냥 사용 ** 복사 **와 ** PasteSpecial ** Gary'sStudent @ –

+0

내가 그것을 사용하는 방법을 잘 모르겠습니다 값, 사용자가 링크를 가지고있다? – Samiko

답변

3

이 pastespecial 사용해보십시오 무엇인가가있을 것입니다.

data_return.Copy 
    check_sheet.Cells(check_sheet.Rows.Count, "B").End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues 
+0

고마워, 그 위대한 작품. +1이되지만 충분하지는 않습니다. – Samiko

1

당신은, 당신이 붙여 넣을 위치를 확인하지 않는 pastespecial 방법을 사용할 수 있지만

Range.PasteSpecial Paste = xlPasteValues