Trasporre dati variabili

[Statix]

Ciao a tutti,
ho un problema a trasporre dei dati da colonna in riga, mi servirebbe una macro,
allego foto con riferimenti, il numero 1 sono 8 quindi devo copiare gli 8 numeri in blu e trasporli nella cella CL5,
il numero 2 sono 19 quindi devo copiare i 19 numeri in blu e trasporli in cella CL6 e così via fino a 90,
i dati cambiano ad ogni ricerca statistica e quindi variano di volta in volta.
puo capitare anche che non ci sono numeri in blu per un numero in rosso

[Anthony47]

Ma tu sei sicuro che il primo blocco va trasposto (in verticale, vero) da CL5 in avanti e il secondo blocco da CL6 in avanti?
La parte a destra, oltre i numeri presenti, e' vuota "a oltranza" (diciamo per 90 colonne in tutto) o ...?

[Statix]

Ciao Anthony47
la parte destra è vuota

[Anthony47]

Non hai risposto sulle celle di destinazione...

[Statix]

la colonna BT dove ci sono i numeri in blu varia da 800 a mille righe, questi devono essere trasposti nelle
celle di destinazione colonna CL

[Statix]

allego un altra foto,

[Anthony47]

Rileggendo ho capito (prima guardavo il blocco di numeri orizzontali, che invece sono il risultato atteso).

Codice: Seleziona tutto

Sub peppa()
'
For I = 5 To Cells(Rows.Count, "BS").End(xlUp).Row
    mymatch = Application.Match(Cells(I, "BS").Value, Range("CK1:CK100"), 0)
    If Not IsError(mymatch) Then
        Cells(mymatch, "CK").Offset(0, 200).End(xlToLeft).Offset(0, 1) = Cells(I, "BT")
    End If
Next I
End Sub


Prova...

[Statix]

Anthony47 nel modulo mi da errore in rosso
ho Windows 10 ed Excel 2013

[Statix]

ok ho risolto,
quando ho copiato la macro evidentemente avrà copiato anche degli spazi,
provato va alla grande .
grazie Anthony47 come sempre non ho parole per ringraziarti.