Event fra en anden form?

Trykfejl: RaiseEvent ikke RaiseRevent

I den ene form laver du en Friend eller Public Sub.
Den kalder du fra den anden form.

Form1:

Friend Sub SkeNoget()
  MsgBox "Kald fra Form2"
End Sub

Form2:

Private Sub Command1_Click()
  Form1.SkeNoget
End Sub

Da der er tale om nogle forme som skal genbruges vil jeg gerne have at de er uafhængige, dvs. form 1 (der hvor ændringen sker) ikke har noget kendskab til form 2.

Hvis det er forme du skal bruge flere steder, hvorfor så ikke lave en ActiveX Control. Den er faktisk beregnet til det samme!!

Hvis du endelig vil lave det med alm. formularer så har jeg prøvet at lave en form2 og en form1 i form1 sætter jeg flg. kode

Dim WithEvents i As Form2

Private Sub Form_Load()
    Set i = New Form2
    i.Show
    Set i = Nothing
End Sub

Private Sub i_huji()
    MsgBox "Form2 loaded!!"
End Sub


I form2 sætter jeg flg. kode

Public Event huji()
Private Sub Form_Load()
    RaiseEvent huji
End Sub

så giver det faktisk den ønskede effekt.

kedde

Folle>> Har du fundet en løsning. Hvis Ja, skulle vi så ikke se at få lukket spørgsmålet??

Kedde

Undskyld. Jeg er paa ferie indtil midt i marts, saa jeg faar foerst afproevet det naar jeg kommer hjem.

Tak for points og
velkommen hjem fra ferien :)