XL pour MAC Sur Mac : changer une valeur dans une colonne A en fonction d'une table de correspondance (B et C)

cloum1

XLDnaute Nouveau
Bonjour la question a déjà été posée mais les solutions proposées en VBA ne fonctionnent pas peut être parce que je suis sur mac
Je joins mon fichier. La colonne A droite être modifiée e fonction de la table B C

Merci beaucoup si vous avez une idée !
 

Pièces jointes

  • test.xlsx
    51.9 KB · Affichages: 10

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonsoir, @cloum1, @djidji59430,

On ne peut pas utiliser la structure "dictionary" avec MAC.
Une version basé sur une structure "collection".
Si un élément de la colonne est absent de la colonne B alors on conserve la valeur de la colonne A.

Le code est dans le module de code de la feuille "Feuil1":
VB:
Sub test()
Dim t, c As New Collection, i&, x
   t = Range("a1").CurrentRegion.Resize(, 3)
   For i = 2 To UBound(t)
      If t(i, 2) <> "" Then c.Add Item:=t(i, 3), Key:=t(i, 2)
   Next i
   On Error Resume Next
   For i = 2 To UBound(t)
      x = Empty: x = c(t(i, 1))
      If Not IsEmpty(x) Then t(i, 1) = x
   Next
   Range("a1").CurrentRegion.Resize(, 3) = t
End Sub
 

Pièces jointes

  • cloum1- recherche- v41.xlsm
    57 KB · Affichages: 3

Staple1600

XLDnaute Barbatruc
Bonsoir le fil

[aparté à caractère informatif]
=>cloum1
je t'informe que mapomme a informé ma pomme qui avait répondu à ta pomme au sujet du code de mapomme.
C'est plus simple de créer ses propres discussions pour ses propres discussions, sinon bonjour les pépins
;)
[/aparté à caractère informatif]
 

Discussions similaires

Statistiques des forums

Discussions
314 485
Messages
2 110 101
Membres
110 663
dernier inscrit
ToussaintBug