Condividi:        

Unire fogli

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Unire fogli

Postdi M@rtyn@ » 30/07/15 19:46

Buonasera a tutti, ho bisogno di unire le prime 4 righe di 50 fogli in un foglio unico, i fogli sono nominati Foglio1, Foglio 2, Foglio3 ecc...
Perciò le righe 1,2,3,4 di Foglio1 saranno le righe 1,2,3,4 del foglio Database completo, le righe 1,2,3,4 di Foglio2 saranno le righe 5,6,7,8 del foglio Database completo ecc...
Grazie
xp con Excel 2007
windows 8 con excel 2013
M@rtyn@
Utente Junior
 
Post: 88
Iscritto il: 02/03/11 21:03

Sponsor
 

Re: Unire fogli

Postdi alfrimpa » 30/07/15 21:16

Ciao Martina

Credo che sarebbe utile che tu allegassi un file di esempio strutturalmente uguale al tuo e con dati fittizi (bastano pochi fogli e pochi record) giusto per capire come sono disposti i dati.
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Unire fogli

Postdi M@rtyn@ » 31/07/15 08:57

Ciao, grazie per la risposa, unisco un piccolo file di esempio che rappresenta come dovrebbe apparire il lavoro finito.
http://dropcanvas.com/a86gf
xp con Excel 2007
windows 8 con excel 2013
M@rtyn@
Utente Junior
 
Post: 88
Iscritto il: 02/03/11 21:03

Re: Unire fogli

Postdi alfrimpa » 31/07/15 09:44

Ciao Martina

Ho guardato il file e mi sono fatto un'idea della macro necessaria.

Però ora sono in vacanza (quindi senza pc); lunedì rientro e cercheró di risponderti in modo compiuto.

Spero che tu non abbia eccessiva fretta :) .
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Unire fogli

Postdi M@rtyn@ » 31/07/15 10:19

Goditi le ferie,
magari se mi suggerisci qualche "concetto" o "parola chiave" da cercare sulla guida per scalare di un foglio provo a farla da sola.
Grazie
xp con Excel 2007
windows 8 con excel 2013
M@rtyn@
Utente Junior
 
Post: 88
Iscritto il: 02/03/11 21:03

Re: Unire fogli

Postdi alfrimpa » 31/07/15 10:35

Ciao Martina

Non è semplice in due parole e poi dipende dalle tue conoscenze di vba.

In pratica si tratta di ciclare con un For...Next i fogli della cartella di lavoro (tranne database), per ogni foglio copiare la zona dati specifica ed incollarla sul foglio database ovviamente accodando i dati gli uni dietro gli altri.

È ovvio che devo fare delle prove prima di proporti il relativo codice.
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Unire fogli

Postdi bismark » 31/07/15 10:59

Ciao a tutti

ciao Alfrimpa .....

chiedo scusa a tutti ma forse l'argomento si avvicina molto se non è uguale a quanto da te risolto il 25 maggio di quest'anno

"macro per incollare valori da diversi fogli"

adesso esco se poi non è sufficiente provo a postare un'altra impostazione che avevo archiviato nel mio pc se serve..

ma penso che la soluzione del grande Alfre dovrebbe essere sufficiente

a dopo
bismark
Utente Junior
 
Post: 54
Iscritto il: 08/07/15 15:03

Re: Unire fogli

Postdi alfrimpa » 31/07/15 11:14

Esatto Bismarck era proprio quella l'idea.

Mi ero completamente dimenticato di quella discussione; sono vecchio :-)
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Unire fogli

Postdi bismark » 31/07/15 11:26

Ciao

alfre vorrei essere io come te, con la tua esperienza invece mi limito a chiedere e cercare di adeguare alle richieste che mi vengono fatte quanto leggo sui vari forum e Tu mi hai gia aiutato più volte

p. s come si legge sono rientrato... se serve ho altre " soluzioni" utilizzate per risolvere richieste ricevute dai titolari o colleghi
bismark
Utente Junior
 
Post: 54
Iscritto il: 08/07/15 15:03

Re: Unire fogli

Postdi alfrimpa » 31/07/15 11:32

Bismark ti ringrazio per le belle parole di stima ma la mia è solo passione (come quella di tanti che provano a rispondere sui vari forum su Excel) che cerco di coltivare quanto più possibile ed ogni volta che riesco a proporre una soluzione corretta è, per me, motivo di grande soddisfazione.

Ora attendiamo il riscontro di Martina visto che la soluzione c'è :)
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Unire fogli

Postdi bismark » 31/07/15 11:43

Oppure


Sub copiafogli()
Dim nf As Long, i As Long 'il limite di fogli dipende dal pc, quindi teoricamente possono esisterne più di 32767!
nf = ThisWorkbook.Sheets.Count
Application.ScreenUpdating = False
Sheets("RISULTATO").UsedRange.ClearContents
For i = 1 To nf
Sheets(i).Range("a1:iv5000").Copy Sheets("RISULTATO").Cells(5000, 1).End(xlUp).Offset(1, 0)
Application.CutCopyMode = False
Next
Application.ScreenUpdating = True
End Sub


Dovresti solo verificare di avere un foglio che si chiama risultato

correggere il range di dati che desideri copiare

p.s ogni volta che lancia la sub azzera tutto e ricopia nuovamente i dati aggiornati

buon appetito ....

aspettiamo notizie da Martina
bismark
Utente Junior
 
Post: 54
Iscritto il: 08/07/15 15:03

Re: Unire fogli

Postdi M@rtyn@ » 31/07/15 18:29

Buonasera e grazie a tutti,
le macro funzionano tutte benissimo ma devo confessare di aver ingenuamente omesso che nei fogli ho usato la formattazione condizionale per evidenziare i dati che mi interessano che così non viene copiata. :oops:
Ho cercato di arrangiarmi, ma le informazioni che ho trovato vanno oltre le mie capacità (taglia,cuci,copia ,incolla)
Ho registrato una macro in excel 2013 usando incolla speciale-mantieni formattazione originale e mi è uscito questo:
Selection.PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone _
, SkipBlanks:=False, Transpose:=False
mentre cercando nella guida di excel 2003 "copia formattazione condizionale" ho trovato il metodo PickUp e il metodo Apply
ma veramente non ho idea di come infilarceli dentro :undecided:
xp con Excel 2007
windows 8 con excel 2013
M@rtyn@
Utente Junior
 
Post: 88
Iscritto il: 02/03/11 21:03

Re: Unire fogli

Postdi alfrimpa » 31/07/15 18:53

Ciao Martina

Premetto che di formattazione condizionale ne capisco poco per cui non so se potrò esserti d'aiuto.

Comunque tu vorresti trasferire tutte le f.c. presenti sui 50 fogli tutte sul foglio database?

Su ogni foglio ci sono f.c. diverse rispetto agli altri.

Il foglio database è unico non puoi applicare la f.c. direttamente lì?

Ripeto di f.c. so poco o nulla.
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Unire fogli

Postdi M@rtyn@ » 31/07/15 19:11

Ciao, grazie per l'interessamento, hai capito benissimo, il file di esempio non contiene i miei dati, era solo un esempio per descrivere quello che pensavo essere il fulcro del problema, in realtà un foglio con l'elenco completo come appare sul foglio database è stato il mio punto di partenza, ed ho dovuto suddividerlo per non applicare la formattazione condizionale a mano ogni 4 righe.
xp con Excel 2007
windows 8 con excel 2013
M@rtyn@
Utente Junior
 
Post: 88
Iscritto il: 02/03/11 21:03

Re: Unire fogli

Postdi alfrimpa » 01/08/15 11:11

Ciao Martina

In veritá non è che abbia capito molto dal tuo ultimo messaggio.

Non so se sia possibile copiare una f.c. da un foglio all'altro ma penso che, visto che con vba è possibile replicare tutto ciò che si può fare manualmente, un modo per applicare la f.c. tramite macro lo si possa trovare.
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Unire fogli

Postdi alfrimpa » 01/08/15 12:57

Ciao Martina

Prova a riallegare il tuo file di esempio con le formattazioni condizionali impostate sui singoli fogli.

Se lo fai nella giornata di lunedì proverò a far qualcosa.

Non ti prometto niente ma è uno "sfizio" che mi voglio togliere.
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Unire fogli

Postdi M@rtyn@ » 01/08/15 17:56

xp con Excel 2007
windows 8 con excel 2013
M@rtyn@
Utente Junior
 
Post: 88
Iscritto il: 02/03/11 21:03

Re: Unire fogli

Postdi alfrimpa » 01/08/15 18:26

Ok Martina lunedì mattina provo a "giocarci" un po'.
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Unire fogli

Postdi Anthony47 » 01/08/15 23:01

Mi intrometto per chiedere se la fromattazione condizionale degli intervalli copiati deve ancora far riferimento ad A5 del foglio originale o se invece il valore di A5 puo' essere integrato nella formula; cioe' non piu' "Il valore della cella - e' maggiore di - $A$5" ma "Il valore della cella - e' maggiore di - 1500".

Ciao a tutti
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Unire fogli

Postdi M@rtyn@ » 02/08/15 06:55

Ciao Anthony, grazie per l'interessamento, il valore di A5 può cambiare da un foglio all'altro.
xp con Excel 2007
windows 8 con excel 2013
M@rtyn@
Utente Junior
 
Post: 88
Iscritto il: 02/03/11 21:03

Prossimo

Torna a Applicazioni Office Windows


Topic correlati a "Unire fogli":


Chi c’è in linea

Visitano il forum: Nessuno e 67 ospiti