Extraire valeur d'une cellule

mylord6666 Messages postés 53 Date d'inscription   Statut Membre Dernière intervention   -  
mylord6666 Messages postés 53 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

j'ai réussi a trouver les adresses des produits en double mais comment récupérer l'adresse car je les retrouves toutes deux dans la même cellule
exemple
$E$11-$E$39-
je voudrais extraire chaque adresse pour la traiter
qui peut m'aider merci d'avance


1 réponse

Réponse 1 / 1
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,
si separteur comme ecrit: "-"
exemple: 
Sub test()
    x = "$E$11-$E$39-"
    tAddr = Split(x, "-")
    For a = 0 To UBound(tAddr)
        If tAddr(a) <> "" Then
            adr = tAddr(a)
            'code de traitement de l'adresse cellule
            
        End If
    Next a
End Sub
0
mylord6666 Messages postés 53 Date d'inscription   Statut Membre Dernière intervention  
 
merci beaucoup je vais le tester
0
mylord6666 Messages postés 53 Date d'inscription   Statut Membre Dernière intervention  
 
cela fonctionne bien merci mais comment faire pour récupérer les deux adresses dans deux textbox différents?
j'obtiens toujours la même adresse
merci encore et excusez moi de vous déranger une fois de plus
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re, 

Sub test()
    x = "$E$11-$E$39-"
    tAddr = Split(x, "-")
    Textbox1 = tAddr(0)
    Textbox2 = tAddr(1)
End Sub
0
mylord6666 Messages postés 53 Date d'inscription   Statut Membre Dernière intervention  
 
merci beaucoup cela marche bien bravo de votre aide
0

Discussions similaires

Problème de restrictions
SuperAmbi -
Pat -

5 réponses
Comment affecter une valeur à une cellule contenant du texte
kessya2002 -
Utilisateur anonyme -

6 réponses
Cette valeur ne correspond pas aux restrictions
Sulphide -
Coolmaster -

3 réponses
additionner nombres dans cellules avec texte
kawimaki -
kawimaki -

6 réponses