Copia SU righe non contigue

Hai un problema con Excel?

Nuova discussione

Copia SU righe non contigue
di Ferra80 (utente non iscritto) data: 18/12/2014 08:08:10
Ciao a tutti,
avrei bisogno di un aiuto.
Dovrei copiare i valori delle singole righe di una tabella (larghezza fissa "C:BC" e numero di righe variabili) su un'area delle stesse dimensioni ma filtrata.
(Spero di essere stato chiaro nella spiegazione).

Ho provato ad abbozzare una macro ma mi sono perso e non riesco ad uscirne

Grazie per la disponibilità

Sub Incollainvisibili()

Dim filtrate As Range
Dim u(1 To 500)
Dim r As Long, x As Long



Worksheets("Sheet1").Activate
For r = 2 To Cells(Rows.Count, "C").End(xlUp).Row
u(r) = Row(r).Value
Next r



Worksheets("Sheet2").Activate

Set filtrate = ActiveSheet.Range("J15:BK69").SpecialCells(xlCellTypeVisible)

For Each F In filtrate


x = x + 1
F.Value = u(x)

Next

di Lucas87 data: 18/12/2014 08:39:13
Ciao
Un file d'esempio e qualche spiegazione in più...
di Ferra80 (utente non iscritto) data: 18/12/2014 09:29:45
Ho inserito il file di esempio

Dovrei creare una macro in modo tale da poter copiare le righe della tabella nel foglio uno sull'area filtrata nel foglio due.

Vuoi Approfondire?