• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Macro voor apostrof

Status
Niet open voor verdere reacties.
W

wimix69

Gebruiker
Lid geworden
19 mrt 2011
Berichten
208
Hallo,

Ik heb een formulier gemaakt waar in cijfer code's worden ingevoerd die beginnen met nullen. Nu zet ik handmatig een apostrof voor maar hoe doe ik dit met een macro?

Groet
Wimix
 
bijvoordeeld

Code: 
a=chr(39) & "000"& 123
 
Of zo:
Code: 
Private Sub CommandButton1_Click()
    Range("Jouwveld").Value = "'" & Right("000000" & Me.TextBox1.Value, 6)
    Unload Me
End Sub
 
Code: 
Sub M_snb()
  c00 = "0000456"
  cells(1) = Format(c00, "'" & String(Len(c00), "0"))
End Sub
 
Macro voor apastrof

Hallo,

In heb een macro toegevoegd om automatisch een apostrof te krijgen maar ik krijg een foutmelding. wat doe ik verkeerd? in cel een heb ik de apostrof handmatig geplaats.
 

Bijlagen

  • test apostrof.xlsm
    14,8 KB · Weergaven: 14
dat gaat ook zonder macro maar met aangepaste cel opmaak
 

Bijlagen

  • test apostrof (1).xlsx
    15,6 KB · Weergaven: 15
of met macro met systeem van snb voor 7 karakters lang (dat is een gokje) of wil je dat de maro bij het selecteren al direct een "'" plaatst?
zodat je zelf de nullen kunt plaatsten.
 

Bijlagen

  • test apostrof sp.xlsm
    14,5 KB · Weergaven: 13
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan