2017-01-11 11 views
-1

すべてのアプリケーションの上にポップアップして表示されるユーザーフォームがあります。ユーザーを元のブックに戻すコマンドボタン

ユーザーは常に複数のブックとアプリケーションで作業しているため、ユーザーフォームにボタンが必要です。このボタンをクリックすると、ユーザーフォームがアクティブになっているワークブックにユーザーが戻されます。

ユーザーフォームがBook1からアクティブ化されているとします。ボタンをクリックすると、ユーザーはbook1に戻ります。

私はちょうど優れた初心者です。すべてのヘルプは、このような

+0

'ThisWorkbook.Activate' –

答えて

0

何かがユーザーフォームのコードで動作するはずですが理解されよう。

Public wbSource As Workbook 

Private Sub CommandButton1_Click() 
    wbSource.Activate 
End Sub 

Private Sub UserForm_Initialize() 
    Set wbSource = ThisWorkbook 
End Sub 
+0

' wbSource'は、ここに不必要です。 'ThisWorkbook'として割り当てる場合は、' ThisWorkbook.Activate'を使用してください。 –

+0

'ThisWorkbook'はUserFormを起動したもので、' Set wbSource = ActiveWorkbook 'など...'というように扱うことができない場合がありますが、もしOPがコードを書いていたら高度なシナリオでは、これを行う方法を尋ねる必要はありません。 –