Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen

Variablenübergabe von Ufrm an Modul | Herbers Excel-Forum


Betrifft: Variablenübergabe von Ufrm an Modul von: Peter
Geschrieben am: 28.11.2009 20:00:27

Hallo Forum,
wie wird eine Variable von einer Userform an ein Modul übergeben?

z.B. die Variable z

Danke Peter

Private Sub SpinDatNr_Change()
    
    Dim Sh As Worksheet
    Dim DatenCounter
    Dim MaxDatenCounter
    Dim sDaten
    Dim rng
On Error Resume Next

lblDatenNr.Caption = SpinDatNr.Value
sDaten = SpinDatNr.Value
Set rng = Worksheets("Tmp").Columns(1).Find(sDaten, _
          lookat:=xlPart, LookIn:=xlValues)
'#################
z = rng.Row
'#################
TxtArtNr.Text = rng.Offset(0, 2).Value             '<<<<
TxtArtName.Text = rng.Offset(0, 3).Value           '<<<<
LblArtMaterial.Caption = rng.Offset(0, 4).Value    '<<<<
LblArtDatum.Caption = rng.Offset(0, 5).Value       '<<<<
End Sub

z.B. Im Modul:

Sub Ziel()
Set ShZ=Worksheets(„Ziel“)
Shz.cells(z,1)= ufrm1.TxtArtName.Text
End Sub

  

Betrifft: AW: Variablenübergabe von Ufrm an Modul von: Hajo_Zi
Geschrieben am: 28.11.2009 20:05:49

Hallo Peter,

definiere die Variable in dem Modul als Public.

GrußformelHomepage


  

Betrifft: AW: Variablenübergabe von Ufrm an Modul von: Nepumuk
Geschrieben am: 28.11.2009 20:46:40

Hallo Peter,

das hab ich mal hier beschrieben:

http://www.office-loesung.de/ftopic272045_0_0_asc.php

http://www.office-loesung.de/ftopic272062_0_0_asc.php

Gruß
Nepumuk


  

Betrifft: AW: Danke Nepumuk von: Peter
Geschrieben am: 28.11.2009 20:52:32

So kommt man weiter und kann sich das in Ruhe ansehen.

Peter


Beiträge aus den Excel-Beispielen zum Thema "Variablenübergabe von Ufrm an Modul"