[excel] automatizzare una operazione

[nelsonblu]

http://rapidshare.com/files/24475708...ntare.rar.html

Avrei bisogno che i valori sotto le intestazioni viola, prese dagli elenchi delle colonne gialle sia automatizzato.

In pratica ci sono due colonne TAB e ANAG che vengono confrontate.
Devo sapere le differenze. Ora sono ottenute quando il cerca.vert dà #N/D
Le celle corrispondenti sono copiate-incollate nelle colonne viola.
Vorrei automatizzare il copia-incolla

[nicola75ss]

Ciao. Ti ho scritto il codice solo per la colonna J ma per quella K è lo stesso, devi solo cambiare i range.

Sub copiaIncolla()
Dim i As Long
Dim cella As Range

ActiveSheet.Range("j2:j1000").Clear
i = 2 'setto a 2 la variabile per incollare a partire dalla seconda riga
For Each cella In Range("c2:c231")
    If cella.Text = "#N/D" Then
        Range("a" & cella.Row).Select
        Selection.Copy
        Range("j" & i).Select
        ActiveSheet.Paste
    i = i + 1
    End If
Next cella
End Sub

[nelsonblu]

E che ne parliamo a fare..... esattamente quello che cercavo!!

Thanks nico

p.s. per la statua mi sto attrezzando... h ih ih ih

[nicola75ss]

Originariamente inviato da nelsonblu
E che ne parliamo a fare..... esattamente quello che cercavo!!

Thanks nico

p.s. per la statua mi sto attrezzando... h ih ih ih

Solitamente le fanno postume quindi mi auguro che per mooooolto tempo non sia necessaria.