You are here:---Rispondi a: [RISOLTO] UF Ricerca Materiale – Bottone Elimina
Rispondi a: [RISOLTO] UF Ricerca Materiale – Bottone Elimina2017-11-25T08:47:01+02:00

Home Forum Domande su Excel VBA e MACRO [RISOLTO] UF Ricerca Materiale – Bottone Elimina Rispondi a: [RISOLTO] UF Ricerca Materiale – Bottone Elimina

BySalvBySalv
Amministratore del forum
    Post totali: 460

    Ciao REAPAT, una mia svista in quanto il Codice ID ricavato, viene ricavato come Stringa, pertanto nella ricerca dell’ID non viene riconosciuto, questa la Modifica da fare nella Macro che ho scritto sopra.

    '----------------------------------- righe aggiunte
    If sh2.Cells(2, 1) = "" Then rr = 2 Else rr = sh2.Cells(Rows.Count, 1).End(xlUp).Row + 1
    For x = 2 To sh1.Cells(Rows.Count, 1).End(xlUp).Row
        If sh1.Cells(x, 7) = Val(k) Then '<--------------- Convertito k in valore Modificare
            Range(sh1.Cells(x, 1), sh1.Cells(x, 8)).Copy sh2.Cells(rr, 1)
            Range(sh1.Cells(x, 1), sh1.Cells(x, 8)).Delete
            Exit For
        End If
    Next x
    '----------------------------------- fine righe aggiunte

    Ciao By Sal :bye:

    Utilizzando il sito, accetti l'utilizzo dei cookie da parte nostra. maggiori informazioni

    Questo sito utilizza i cookie per fornire la migliore esperienza di navigazione possibile. Continuando a utilizzare questo sito senza modificare le impostazioni dei cookie o cliccando su "Accetta" permetti il loro utilizzo.

    Chiudi