Extraire valeur d'une cellule

mylord6666 Messages postés 62 Statut Membre -
mylord6666 Messages postés 62 Statut Membre - 24 juin 2014 à 09:55

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

Afficher la suite

1 réponse

Réponse 1 / 1
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717
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
1. mylord6666 Messages postés 62 Statut Membre
  
  merci beaucoup je vais le tester
  
  0
2. mylord6666 Messages postés 62 Statut Membre
  
  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
3. f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717
  
  Re,
  
  Sub test()
  x = "$E$11-$E$39-"
  tAddr = Split(x, "-")
  Textbox1 = tAddr(0)
  Textbox2 = tAddr(1)
  End Sub
  
  0
4. mylord6666 Messages postés 62 Statut Membre
  
  merci beaucoup cela marche bien bravo de votre aide
  
  0

Extraire valeur d'une cellule

1 réponse

Discussions similaires

Newsletters