在一个窗体的指定区域内显示另外一个窗体 如何用vba代码实现

可以使用以下代码：

Sub ShowFormInArea()
    Dim form As UserForm
    Set form = New UserForm
    
    '设置窗体的属性
    form.Width = 200
    form.Height = 100
    form.Caption = "新窗体"
    
    '在指定区域内显示窗体
    form.StartUpPosition = 0 '手动设置位置
    form.Left = Application.ActiveWindow.Left + 50 'x坐标
    form.Top = Application.ActiveWindow.Top + 50 'y坐标
    form.Show
End Sub

在代码中，首先创建了一个新的UserForm对象，并设置了窗体的属性，然后通过设置StartUpPosition属性为0，手动设置了窗体的位置，最后调用Show方法展示窗体。其中，Left和Top属性分别设置了窗体的x和y坐标，Application.ActiveWindow可以获取当前处于活动状态的窗口对象。您可以根据需要自行调整窗体的宽度、高度和位置。