Discussion :

[naty76]

Bonjour,

Il m'arrive un truc bizarre:
sur un formulaire, j'ai créé des contrôles, je leur ai tous donné un nom explicite.
Je ne sais pas ce que j'ai fait mais en tous cas, toutes les propriétés Name se sont effacées et je me retrouve à nouveau avec des label 1 à 10....
Donc je recommence à les nommer et maintenant, il m'empeche de les renommer comme je l'avais pourtant fait avant.
Par exemple je veux renommer Label1 en LblPrixHT et j'obtiens le message "Impossible de définir la propriété Name. Nom ambigu"...

Quelqu'un peut m'aider ?

NATY

[pgz]

Bonjour.

Si le nom est ambigü, c'est qu'il est déjà utilisé dans le même container.

PGZ

[patbou]

bonjour,

attention à ne pas confondre la propriété name et caption !!!

[naty76]

Tous mes objets ont perdu leurs noms. Il n'y en a donc aucun qui s'appelle ainsi.
Je ne confond pas le caption et le name. Je parle bien du Name, d'ailleurs LblPrixHT çà ferait bizarre pour un caption non

[Didier Gonard]

bonsoir,

pgz a raison

Il ne serait pas impossible, que par un moyen quelconque (copie malencontreuse etc..) tu aies doublés tes contrôles les uns sur les autres , deplaces-en un pour voir des fois....

sinon mets ce code dans un module, adapte au nom de ton USF et fais tourner, ça te donnera une piste de deboggage

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub Kesako()
Dim monControl As Control
Dim I As Integer
 
I = 1
    MsgBox "Nombre de controles : " & UserForm1.Controls.Count
    For Each monControl In UserForm1.Controls
           'syntaxe textbox DG = genre txtFicheCli
    Cells(I, 1) = monControl.Name
    I = I + 1
Next
End Sub

cordialment,

Didier

[naty76]

J'ai pourtant regardé les noms contenus dans le menu déroulant de la fenêtre de propriétés et ils commencent tous par Label mais je vais tester avec ton bout de code et je te dis.
Merci pour la piste

NATY