Hallo
Ik ben er al in geslaagd om een schets te maken die me de massa en het materiaal in de eigenschappen zal geven, maar nu wil ik een formulier maken dat me een hoeveelheidsvraag stelt en dat elke keer dat ik een schets plaats, en het zal me in staat stellen om deze schets direct in te vullen met de hoeveelheid die ik heb gekozen.
Zoals de foto hieronder, maar om de hoeveelheid in te vullen, zou je een vraag moeten stellen en dat, afhankelijk van wat ik erin stop, het automatisch de schets invult.
Is het mogelijk of helemaal niet?
1 like
Hallo, voeg toe:
Dim MaQte As Integer
MaQte = Val(InputBox("Quelle quantité?"))
Het probleem is dat ik het zo deed voor de schets.
Wat is je code op dit moment?
De macro moet een aangepaste eigenschap maken die in de notitie wordt aangeroepen.
Hallo
Je hoeft geen code aan te maken. U kunt een nieuw schetssymbool definiëren op het tabblad Annoteren/Nieuw symbool definiëren.
Voor de in te vullen tekst moet van het type Enter vereist zijn.
Elke keer dat u het schetssymbool invoegt, verschijnt er een venster zoals het bijgevoegde :
capture.jpg
2 likes