VBA를 사용하여 Excel에서 다중 페이지 useform에 탭 추가

Question

Excel의 userform에 x 개의 탭을 추가하려면 VBA 코드를 찾아야합니다. 시각 기본 편집기를 사용하면 수동으로 탭을 추가 할 수 있지만 런타임 중에 VBA를 사용하여 동적으로 탭을 추가/삭제할 수 있기를 원합니다.

감사 MultiPage1에서

Answer 1

Tabs는 Pages이라고 당신은 당신이 페이지를 추가하는 루프에서 위의 코드를 사용할 수 있습니다

MultiPage1.Pages.Add 

를 사용하여 추가 할 수 있습니다.

그냥 질문의 두 번째 부분을 보았다 : 자세한 내용

편집에 대한 Excel의 붙박이 도움말을 참조하십시오. 삭제하려면 1 페이지/당신은 추가 할 수 있습니다이

MultiPage1.Pages.Remove (0) 

Answer 2

를 사용하여 런타임시의 요청에 따라

Sub Test() 
Dim vbComp As Object 
Dim objCntrl As Control 
Set vbComp = ThisWorkbook.VBProject.VBComponents("UserForm1") 
Set objCntrl = vbComp.Designer.Controls("MultiPage1") 
'add page 
objCntrl.Pages.Add 
'remove page 
objCntrl.Pages.Remove (1) 
End Sub