Trascrivere dati tra due fogli

[Ricky0185]

Buongiorno, nel file allegato debbo riportare sul Foglio2 colonna K i valori riportati su Foglio1 colonna F in corrispondenza delle stesse sigle di colonna A dei due fogli.
Mi si sono accavallati i neuroni a forza di provare con gli IF , brutte bestie.
Cordiali saluti
R

[Ricky0185]

Cambiato strada, dopo aver sbattuto e risbattuto la testa con gli IF: Elimina Doppioni

Codice: Seleziona tutto

Range("k2:k35").Select
Set currentCell = Worksheets("Foglio2").Range("k2")
Do While Not IsEmpty(currentCell)
Set nextCell = currentCell.Offset(1, 0)
If nextCell.Value = currentCell.Value Then
currentCell.Value = "" '.Interior.ColorIndex = 6
End If
Set currentCell = nextCell
Loop

Perciò risolto
Un saluto
R

[Anthony47]

Stavo per risponderti
Ad esempio, se da fare con macro:

Codice: Seleziona tutto

Sub Trascrive2()
Dim Noms As Range, Nome As Range
Dim myMatch
'
Sheets("Foglio1").Select
Set Noms = Range(Sheets("Foglio2").Range("A2"), Sheets("Foglio2").Range("A2").End(xlDown))
For Each Nome In Noms
    myMatch = Application.Match(Nome.Value, Range("A1:A10000"), False)
    If Not IsError(myMatch) Then
        Nome.Offset(0, 10).Value = Cells(myMatch, "F").End(xlDown).Value
    End If
Next Nome
End Sub


Rispetto al tuo non cancella i dati di partenza, vedi tu se ti puo' interessare...

[Ricky0185]

La tua macro funziona bene, non ci sono dubbi…vorrei vedere. Maaa….come avrai capito nel Foglio2 c’è un riepilogo e deve evidenziare, insieme a tante altre cose (colonne vuote), i versamenti effettuati dai soggetti di colonna A.
Che in Foglio1 sono i valori della colonna F (somma di tutti i versamenti). Chi non ha versato niente nel Foglio2 avrà la corrispondente cella della colonna K vuota.
Questo è l’obbiettivo che, dopo molti tentativi con l’IF (Esempio: se nel Foglio1 la cella stessa riga, 4 colonne a destra e 1 in basso, non è vuota allora mi riporti su Foglio2 colonna K, stesso nominativo, il valore che si trova su Foglio1 stesso nominativo, 5 colonne a destra + xldown else la cella rimane vuota) sono riuscito a realizzare solo con l’Elimina Doppioni. L’importante è che nel Foglio2 ci sia quanto è stato versato e che sia evidenziato con cella vuota chi non ha versato niente.
Se hai tempo e voglia è gradito un tuo suggerimento.
Buon WE.
R

[Anthony47]

Eh he, in effetti mi sembrava che ci fosse la moltiplicazione dei pani e dei pesci; in assenza di ricche istruzioni, mi sono limitato a fare uscire via macro i risultati che sono presenti in Foglio2-colonna K del file che avevi allegato.
Dopo gli ultimi chiarimenti, probabilmente ti bastera' usare in Foglio2-K2 la formula

Codice: Seleziona tutto

=MATR.SOMMA.PRODOTTO(Foglio1!E1:E100;--(Foglio1!C1:C100=A2))

Da copiare poi verso il basso

Ciao

[Ricky0185]

Adesso si che ci siamo, una formuletta e senza macro e tutto funziona come volevo. Nonostante frequenti il forum da qualche annetto e quasi giornalmente, purtroppo con le formule non ci so fare se non copiandole da situazioni analoghe.
Ancora grazie ed un saluto a te ed a tutto il forum
R