Helpmij.nl
Helpmij.nl
Helpmij.nl
Steun Helpmij.nl! Klik hier     Computerprobleem? Klik hier!

Quote

Weergeven resultaten 1 tot 10 van 10

Onderwerp: Het juiste format in vba vinden

  1. #1
    Vraag is opgelost

    Het juiste format in vba vinden

    Ik heb een klein programma, waarin artikelen worden gewijzigd, alleen het veld artikelnummer wordt verminkt.

    Ik heb al diversen formaten (in vba) geprobeerd , o.a. (Format((T_01.Text), "@@@@@@@@@@@@") of (Format((T_01.Text), "@", om het veld op de juiste manier te krijgen, maar het lukt mij niet bv. 500.00001930 wordt 550,0000193

    Heeft iemand een idee welk format ik moeten gebruiken ?

    Bij voorbaat hartelijk dank
    Bijgevoegde bestanden Bijgevoegde bestanden

  2. #2
    Mega Senior
    Geregistreerd
    21 januari 2012
    Test dit eens
    Code:
    Sub test()
    x = 50012345678#
    ActiveCell.NumberFormat = "#\.00000000"
    
    End Sub
    mvg Jean-Paul

  3. #3
    En als je nu voor de allereenvoudigste oplossing zou gaan, met name gewoon kolom A het formaat "tekst" geven. Hoef je je daarna nergens meer om te bekommeren!

  4. #4
    Mega Senior
    Geregistreerd
    21 januari 2012
    Ja dat kan kolom format geven, zie jou voorbeeld
    Bijgevoegde bestanden Bijgevoegde bestanden
    mvg Jean-Paul

  5. #5
    Giga Honourable Senior Member
    Geregistreerd
    2 maart 2013
    Of het bij het initialiseren al regelen.
    Bijgevoegde bestanden Bijgevoegde bestanden
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  6. #6
    @ VenA,

    Werkt ook, maar we vertrekken toch allemaal (?) van het principe dat een artikelnummer, al heet het dan nummer, géén getal is.
    Is mijn suggestie uit #3 dan niet nóg eenvoudiger?

  7. #7
    Giga Honourable Senior Member
    Geregistreerd
    2 maart 2013
    @Enigmasmurf, jouw suggestie heb ik niet getest maar zal waarschijnlijk werken. Mijn ervaring is dat Excel soms wat te goed meedenkt en zelf een interpretatie geeft aan de celinhoud en de opmaak. Vandaar het '- teken ervoor gezet dan weet je zeker dat het als tekst gezien wordt.
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  8. #8
    Alleen bedankt voor de reactie en ideeen die ik hierbij opgedaan heb.
    Even een reactie op de antwoorden van jullie :
    #1 1e versie incl. verandering in CommandButton2, werkt nu opeens wel?
    #2 werkte bij mij niet
    #3 is in principe de makkelijkste, alleen in mijn originele programma werkte hij soms wel en soms niet, waarom?, maar
    nu als ik 2 regels tussengevoegd in 1e versie werkt hij wel ?? (zie #1)
    #4 Verminkte alles, maar met het toevoegen van 2 regel voor het bepalen van kolom A als tekst, gaat het wel goed! (zie macro CommandButton2)
    #5 Werkt perfect, alleen met mijn kennis van VBA ga ik uitzoeken hoe de macro precies in elkaar zit

    Code:
    Private Sub CommandButton2_Click()
        Columns("A:A").Select
        Selection.NumberFormat = "@"
        Sheets("GOEDEREN").Range("A1:E150").Value = LB_01.List
    End Sub
    Enigmasmurf, JeanPaul28 en VenA nog hartelijk dank, dit probleem is voor mij opgelost, top!!

  9. #9
    Giga Honourable Senior Member
    Geregistreerd
    18 juli 2008
    Met je code in de CommandButton2() doe je hetzelfde als wat @Enigmasmurf aangeeft.
    Je opgenomen code, maar dan zonder de select.
    Code:
    Columns("A:A").NumberFormat = "@"
    Of:
    Code:
    Columns(1).NumberFormat = "@"
    ____________
    Met vriendelijke groet,
    Harry

    Lag nooit om de keuzes van dien vraauw, bist ter zulf aine van....
    (Grunnegs-Gronings)

  10. #10
    HSV, hartelijk dank, ik ga het aanpassen

Berichtenregels

  • U mag geen nieuwe vragen starten.
  • U mag niet reageren op berichten.
  • U mag geen bijlagen versturen.
  • U mag uw berichten niet bewerken.
  •  
Helpmij.nl
Helpmij.nl

Helpmij.nl en business

Partners
Sponsoren