GLC

Hai un problema con Excel?

Nuova discussione

GLC
di Gianluca (utente non iscritto) data: 07/03/2013 10:41:30
buongiorno! Piccola domanda:

Ho una tabella grande (circa 1000x1000) molte celle sono vuote, le altre riportano 3 possibili valori (A,B,C)

Quello che mi servirebbe è creare un report in cui per ogni riga mi riporta in quali colonne è presente A in quali B e in quali C tralasciando le vuote. Ho usato il codice seguente, però mi riporta tutte le intestazioni a capo, è possibile mandarle a capo, separarle o metterle in celle diverse?

Grazie!

Sub aaa()
Lastcol = ActiveSheet.UsedRange.Columns.Count
Lastrow = ActiveSheet.UsedRange.Rows.Count
cola = Lastcol + 2
colb = Lastcol + 3
colc = Lastcol + 4
Cells(1, cola) = "A"
Cells(1, colb) = "B"
Cells(1, colc) = "C"
For r = 2 To Lastrow
  For c = 2 To Lastcol
    ColumnLetter = Cells(1, c)
    If Cells(r, c) = "A" Then sa = sa & ColumnLetter
    If Cells(r, c) = "B" Then sb = sb & ColumnLetter
    If Cells(r, c) = "C" Then sc = sc & ColumnLetter
  Next
  Cells(r, cola) = sa
  Cells(r, colb) = sb
  Cells(r, colc) = sc
  sa = "": sb = "": sc = ""
Next
End Sub

di Mauro data: 07/03/2013 11:59:29
Cosa significa GCL? Come indicato nel form di inserimento si richiede di inserire un titolo con poche parole inerenti al problema proposto!

Vuoi Approfondire?