Forum di Excel e VBA, per condividere esperienze e risolvere problemi su:
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
Associare più valori di
- Hai un problema con Excel?
Associare più valori di....
di Simerba (utente non iscritto) data: 15/01/2010
...associare più valori di campi orizzontali a unico valore orizzontale:
dunque ho un foglio di excel strutturato da 800 righe con 4 colonne.
esempio:
campo1-campo2-campo3-campo4
160-263-58-11
394-426-195-19
vorrei associare tutti i campi numero 2-3-4 con il campo numero 1 della prima colonna cosi per ogni riga formando soltanto 2 colonne e non piu 4 lasciando invariato il numero di righe.
esempio:
campo1-campo2
160-263
160-58
160-11
394-426
394-195
394-19
essite un modo per farlo in modo automatico che ne so con una formula o codice vb?
perchè non ci riesco.
grazie ancora.
ciao, simone.
di Locate (utente non iscritto) data: 16/01/2010
Ciao
ecco una macro per il tuo lavoro
ho allegato il file di prova per farti vedere come si comporta
ciao locate
Sub CopiaSposta() Dim cella(4), I, C, TC, Prima TC = Cells(Rows.Count, 1).End(xlUp).Row For C = 1 To TC Step 1 I = 1 For I = 1 To 4 Step 1 cella(I) = Worksheets("Foglio1").Cells(C, I).Value Next I I = 1 Prima = cella(I) For I = 2 To 4 Step 1 Worksheets("Foglio1").Cells(Rows.Count, 6).End(xlUp).Offset(1, 0).Value = Prima Worksheets("Foglio1").Cells(Rows.Count, 7).End(xlUp).Offset(1, 0).Value = cella(I) Next I Next C End Sub
di Simerba (utente non iscritto) data: 17/01/2010
Grandissimo! grazie davvero infinitamente.
ciao simone.
- Vuoi Approfondire?
