IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Access Discussion :

[VBA]sortir un nombre d' une string


Sujet :

Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    344
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 344
    Par défaut [VBA]sortir un nombre d' une string
    bonjour,


    j ai une string où se trouve plusieurs nombres

    je souhaiterai séparer les nombres de la string


    mais je sais pas trop comment faire

    quelqu un aurait une idée , un lien , un tuto ??

    merci

  2. #2
    Invité
    Invité(e)
    Par défaut
    Salut,

    Il faudrait nous dire ce qui sépare tes nombres, un espace, une virgule ou autre, quel est ton critère d'éclatage pour donner un piste de recherche, avec un exemple de string et de ce que tu veux en sortir

    Starec

  3. #3
    Expert confirmé
    Avatar de cafeine
    Inscrit en
    Juin 2002
    Messages
    3 904
    Détails du profil
    Informations forums :
    Inscription : Juin 2002
    Messages : 3 904
    Par défaut
    Citation Envoyé par megapacman
    bonjour,


    j ai une string où se trouve plusieurs nombres

    je souhaiterai séparer les nombres de la string


    mais je sais pas trop comment faire

    quelqu un aurait une idée , un lien , un tuto ??

    merci
    Hello,

    Oui, il y a un tuto pour ça ...
    Les expressions rationnelles / régulières dans Access par la pratique

    Dans la pratique ...
    avec un pattern "(\d)" tu récupères uniquement les chiffres ...
    avec un pattern "([a-zA-Z])" uniquement les lettres (à adapter en cas d'accents ...)

  4. #4
    Expert éminent

    Avatar de Tofalu
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    Octobre 2004
    Messages
    9 501
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : France, Ain (Rhône Alpes)

    Informations professionnelles :
    Activité : Technicien maintenance
    Secteur : Associations - ONG

    Informations forums :
    Inscription : Octobre 2004
    Messages : 9 501
    Par défaut
    Ou bien plus simplement la fonction split si un caractère délimite chaque nombre

  5. #5
    Membre éclairé
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    344
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 344
    Par défaut
    en fait j ai trouvé ce que je cherchais bon c'est peut-être laborieux mais bon


    voila ca donne ca :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
     
     
    Sub nbpages()
    Dim i As Integer
    Dim mystring As String
    Dim nblettre As Integer
    Dim longueur As Integer
    Dim lettre As String
    Dim num As Integer
    mystring = Cells(14, 3).Value
    mystring = Replace(mystring, " ", "")
    Debug.Print mystring
    longueur = Len(mystring)
    Debug.Print longueur
     
    nblettre = 0
     
    For i = 1 To longueur
        lettre = Mid(mystring, i, 1)
        Debug.Print lettre
     
        If IsNumeric(lettre) = True Then
     
        nblettre = nblettre + 1
        Debug.Print nblettre
     
        Else
     
        i = longueur
     
        End If
     
    Next i
     i = 1
     num = Mid(mystring, i, nblettre)
     Debug.Print num
     
     MsgBox (num)
     
    End Sub

    car en fait j ai plusieurs nombre dans ma string mais moi je veux juste la premiere partie des nombres

    reste a passer le num en variable public et le tour est joué


    j espere que ca pourra servir a quelqu un d autre on ne sais jamais



    merci pour vos reponses

  6. #6
    Membre éclairé
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    344
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 344
    Par défaut
    mince il est ou le resolu ?????

  7. #7
    Expert confirmé
    Avatar de cafeine
    Inscrit en
    Juin 2002
    Messages
    3 904
    Détails du profil
    Informations forums :
    Inscription : Juin 2002
    Messages : 3 904
    Par défaut
    Citation Envoyé par megapacman
    mince il est ou le resolu ?????

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. extraire des nombres d'une string
    Par neonico dans le forum C#
    Réponses: 9
    Dernier message: 06/03/2014, 09h58
  2. Sortir un txt en une string et vérifier si il est vide
    Par loic.keysoft dans le forum ASP
    Réponses: 5
    Dernier message: 12/05/2008, 17h38
  3. afficher une suite de nombres dans une string
    Par hysah dans le forum C++
    Réponses: 4
    Dernier message: 27/04/2006, 18h51
  4. [vba]modifier un caratère dans une string
    Par megapacman dans le forum Access
    Réponses: 1
    Dernier message: 11/04/2006, 18h12
  5. Savoir si une string est un nombre
    Par SteelBox dans le forum SL & STL
    Réponses: 10
    Dernier message: 14/02/2005, 19h59

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo