Auf aktivieren einer bestimmten Seite im Multipage reagieren

01/07/2010 - 14:53 von Volker Neurath | Report spam
Hallo zusammen,

ich möchte gerne auf das aktiveren einer Seite im Multipage-Control
reagieren.

Konkret: ich habe ein Userform mit 6 Seiten.
Sobald die erste Seite verlassen wird (i.e. wenn eine der Seiten 2 - 6
aktiviert wird) Soll die Auswahl einer Multiselect-listbox in eine Zelle
eines Worksheets geschrieben werden.

Volker

Wenn es vom Himmel Zitronen regnet -- lerne, Limonade zu machen.
 

Lesen sie die antworten

#1 Andreas Killer
01/07/2010 - 15:42 | Warnen spam
Am 01.07.2010 14:53, schrieb Volker Neurath:

ich möchte gerne auf das aktiveren einer Seite im Multipage-Control
reagieren.


Dazu hat das Multipage-Control das Change-Ereignis.

Sobald die erste Seite verlassen wird (i.e. wenn eine der Seiten 2 - 6
aktiviert wird) Soll die Auswahl einer Multiselect-listbox in eine
Zelle eines Worksheets geschrieben werden.


Dann machst Du Dir eine globale Variable Lastpage und prüfst diese auf
den Wert, wenn sie 0 ist verlàßt Du gerade die 1. Seite.

Andreas.

Dim LastPage As Integer

Private Sub MultiPage1_Change()
If LastPage = 0 Then MsgBox "Exit 1. Seite"
LastPage = MultiPage1.Value
End Sub

Private Sub UserForm_Initialize()
LastPage = MultiPage1.Value
End Sub

Ähnliche fragen