Ocx vb6

Bonjour,
Il n'y a pas de commande directe pour répondre à ta question mais ont peu employer une petite astuce pour y arriver...

Private Sub Command1_Click()
Dim i
Dim F As Form
    On Error Resume Next
    For Each F In Forms
        i = F.List1.Tag
        If Err = 0 Then
            MsgBox "l'OCX se trouve sur la feuille " & F.Name
            Exit Sub
        End If
        Err.Clear
    Next
End Sub

Bien sûr, remplacer List1 par le nom de ton contrôle.
A+

Merci de ta part ca marche Nickell! :)

SVP je peux savoir comment faire ca a partir d'un OCX car dans mon cas c l'ocx qui dois determiner la form danslaquel il est utilisé

Pas compris ta question !!

bonjour, je voulais dire que je voulais un code ou je mettrais dans le UserControl et qui va me permettre de déterminer le nom de la form dans laquelle est utilisé mon ocx . Si tu comprend pas repose moi la question ou donne moi ton msn pour qu'on puisse communiquer ! Merci !

toujours pas compris du tout et
UserControl c'est quoi en VB6 ?

usercontrol c'est la form ou on met les objets dans un activex dans vb6

Ah boooon... Tu est en train de FAIRE un ocx.. C'est pas ce qui ressort de tes postes précédants
Et tu doit connaître le nom de la feuille dans lequel il est ?
ca dépend où tu met le code, ça peu être...

    Nom = Me.Parent.name

ou encore

    Nom = Extender.Parent.name

De mémoire.. si c'est pas ça tu dis, je regarderais dans un de mes anciens projet.
A+
L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)

ca marche pa :s
je t'ai di que le code j'vaii l'mettre dans le usercontrol et pas dans la feuille ou il ya l'ocx

CA MARCHE PAS...

C'est tout ce que tu sais dire ?
Tu cherche même pas un tout petit peu !!!
J'ai vérifié et... CA MARCHE, c'est toi qui sais pas où le mettre.

Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
...... Lire les propriétés
Dim Nom As String
    Nom = Extender.Parent.name
End Sub

ok merci ca marche mnt !!