Nom d'un form en paramètre

Réponse acceptée !
salut,
comme le dit jmfmarques(salut), myform est un objet. Tu as donc le choix entre 2 solutions .
1 - Passer le form en paramètre, ce qui donne ceci

Decouploc Form1
Public Sub DecoupLoc(MyForm As Form)

    For j = 0 To MyForm.lisLoc.ListCount - 1
...

ou bien
2 - Tu passes le nom du form en param et dans ton code tu test ce nom pour faire les actions appropriées

Decouploc Form1.Caption
Public Sub DecoupLoc(NameForm As String)
Select Case NameForm
Case "Form1" 
    For j = 0 To Form1.lisLoc.ListCount - 1
Case "Form2" 
    For j = 0 To Form2.lisLoc.ListCount - 1


etc..

bon dev

Pat

 Don't Worry , Be Happy

---

lorsque le problème est résolu, pensez Réponse Acceptée