De waarde van een aangepaste eigenschap weergeven

Hallo

 

Ik ben momenteel een macro aan het maken, ik wil graag de waarde van een aangepaste eigenschap in het gebruikersformulier als tekst weergeven.

 

Weet iemand hoe je dat moet doen?

 

Bedankt allemaal en een fijne dag verder!

Hallo

 

U moet een variabele maken die uw eigendom ophaalt:

 

Voorbeeld met mijn code eigenschap:

 

CODE = swRefDoc.GetCustomInfoValue("", "code")

 

Geef dan gewoon CODE weer in het gebruikersformulier!

Ik weet niet hoe ik het precies moet weergeven. Er moet een code zijn? Printen ofzo?

 

(Het doel is om het in een tekstvak te hebben)

Het werkt niet om gewoon te schrijven:

Tekstvak1 = CODE

Bij het initialiseren van het gebruikersformulier moet u de standaardtekst van het tekstvak toewijzen aan

 

.value = CODE

 

Door CODE in het openbaar te verklaren, natuurlijk.

 

Voorbeeld:

 

Privé Sub UserForm_Initialize()

Met mij.NaamTekstvak

. Waarde = CODE

. Focus instellen

. SelStart = 0

. SelLength = Len(. Tekst)

Eindigen met

Einde Sub

Sorry, maar ik begrijp het niet.

Hoe heet je tekstvak ?

Dison tekstvak1, dan moet u de standaardtekst instellen zoals deze tekstvak1.waarde = CODE waarbij CODE de aangepaste eigenschap is.

 

En je moet dit in een speciale sub zetten die je UserForm initialiseert, ofwel: 

 

Privé Sub UserForm_Initialize()

Me.TextBox1.Waarde = CODE

Einde Sub

 

Maar om ervoor te zorgen dat uw CODE-variabele in een andere sub wordt gelezen, moet u niet vergeten deze helemaal aan het begin van uw programma in Public CODE te declareren.

 

Is het duidelijker?

Hebben jullie een compleet stukje code om mij aan te bieden?

 

Mijn woning is "DW_NUM"

 

Samenvattend zou ik gewoon in een texrbox van een userform van een solidworks macro de waarde van "DW_NUM" willen weergeven (dat is bijvoorbeeld: DW-505).

 

De tekst moet zichzelf laden wanneer de macro wordt gestart, indien mogelijk.

 

Bedankt!

Verstuur je bestand met je macro!

Het werkt, ik ben op zoek om het deze middag te doen!

Hier!


lynkoa.zip

Ik zie niet waar het vastzit...?