estrarre EAN da elenco matrice



  • estrarre EAN da elenco matrice
    di Traniwebdesign data: 11/10/2014 08:13:18

    ciao a tutti e ben ritrovati.......problemone......devo estrarre i codici ean da un elenco di codici presenti a catalogo........
    NELLA 1 COLONNA CI SONO I CODICI EAN, NELLA SECONDA COLONNA CI sono gli articoli che hanno codice ean relativo, e nella 3 colonna i miei articoli.
    ora vorrei una macro che prenda il 1° valore di ARTOK, controlli se è presente nella colonna ART. e se presente mi copi il suo codice EAN
    anche perche gli ART sono moltissimi, e i miei ARTOK sono molti meno.
    Grazie a tutti.


    EAN ART. ARTOK
    8015825011270 10011 10011
    8000071100120 10012 10013
    8000071100137 10013 10014
    8000071100144 10014 10020
    8000071100151 10015 10021
    8000071100168 10016 10023
    8000071100175 10017 10024
    8000071100205 10020 10041
    8000071100212 10021 10042
    8000071100236 10023 10043
    8000071100243 10024 10060
    8000071100410 10041 10062
    8000071100427 10042 10080
    8000071100434 10043 10081
    8000071100601 10060 10082
    8000071100625 10062 10084
    8000071100700 10070 10101



  • di Lucas87 data: 11/10/2014 08:24:40

    Ciao
    cit "mi copi il suo codice EAN"
    Dove?
    A spanne: un ciclo for per scansionare gli articoli, metodo find per cercarli nella colonna ART e l'offset per leggere il codice e copiarlo.



  • di Traniwebdesign data: 11/10/2014 09:03:54

    al lato del mio ARTOK



  • di Lucas87 data: 11/10/2014 09:37:04

    Ecco qua
     
    For i = 2 To Range("c" & Rows.Count).End(xlUp).Row
        Set fin = Columns(2).Find(what:=Cells(i, 3), lookat:=xlWhole)
        If Not fin Is Nothing Then
            Cells(i, 4) = fin.Offset(0, -1)
        End If
    Next