안녕하세요..

혹시 Vba를 아시나요?

alt+F11 키로 VB에디터로 들어가셔서 모듈을 삽입하세요.

아래의 코드를 넣고 저장하신 다음 재실행하세요.

메뉴에 MyTool 을 실행하시면 될껍니다.

Sub auto_open()
Dim oMyMenuItems As Object
Set oMyMenuItems = Application.MenuBars(xlWorksheet).Menus.Add("&MyTool")
oMyMenuItems.MenuItems.Add ("&Excute")
oMyMenuItems.MenuItems("&Excute").OnAction = "MySelection"
End Sub
Sub MySelection()
    Dim rngArea As Range, shtNew As Worksheet
   
    Set rngArea = Selection '선택영역
    rngArea.Copy 
    Set shtNew = Sheets.Add
    shtNew.Paste
    Application.CutCopyMode = False
   
    Set rngArea = Nothing: Set shtNew = Nothing
End Sub
Sub auto_Close()
    On Error Resume Next
    MenuBars(xlWorksheet).Reset
End Sub

일단 옮기고 싶은 영역을 선택하신후 실행하세요.

복사해서 옮기는 방식으로 이해한 겁니다. 응용해보시고,

모르시겠으면 메일 주세요. 아직 허접하지만 알고 있는데까지는 알려드리죠.

그럼 행복한 하루되시길... ^^;