2013-10-25 2 views
-1

VBA 매크로를 사용하여 시트를 복제하지만 VBA 복사 방법을 사용하지 않는 방법은 무엇입니까?VBA 매크로 (복사 안 함) 복제를 사용하여 시트를 복제하는 방법

그래서 Sheet2를 Sheet1과 똑같이 보이게하고 싶습니다.

나는 VBA 매크로를 처음 사용하므로 제게 안내해주십시오. 여기

+2

복사에 문제가 있습니까? 'ThisWorkbook.Sheets ("Sheet1"). 복사 후 : = ThisWorkbook.Sheets (ThisWorkbook.Sheets.Count)' –

+0

@SiddharthRout 복사를 사용하고 싶지 않습니다. 다른 방법을 말해 줄 수 있니? – NoobSa1b0tt

+0

네, 또 다른 방법이 있습니다. 그러나 왜 당신이'.Copy'를 사용하고 싶지 않은지 확인할 수 있습니까? 나는 실제로 흥미가있다. –

답변

6

가지 방법

WAY의 커플 (1 개) 가장 좋은 방법이 할 수 있습니다 그것은

ThisWorkbook.Sheets("Sheet1").Copy _ 
After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count) 

방법이

Sub Sample() 
    Dim wsToCopy As Worksheet, wsNew As Worksheet 

    On Error GoTo Whoa: 

    Set wsToCopy = ThisWorkbook.Sheets("Sheet1") 
    Set wsNew = ThisWorkbook.Sheets.Add 

    wsNew.Name = "Copy of " & wsToCopy.Name 

    wsToCopy.Cells.Copy wsNew.Cells 

    Exit Sub 
Whoa: 
    MsgBox Err.Description 
End Sub 

참고 :

Excel 2003을 사용하는 경우, WAY 2이 데이터에 따라 가장 좋은 방법 일 수 있습니다. 제발 SEE THIS

+0

여전히 복사 방법을 사용하고 있습니다. – NoobSa1b0tt

관련 문제