Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

[Excel] - Copia stringhe di diverse celle da diversi 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

[Excel] - Copia stringhe di diverse celle da diversi fogli

Postdi Ralph123 » 08/01/14 14:12

salve a tutti,
ho un grosso problema con Excel. Mi trovo nella condizione di lavorare con un file da più di 300 fogli di lavoro, rinominati in maniera differente e non sequenziale, dai quali dovrei copiare il contenuto stringa di una cella ed incollarlo in un foglio diverso. Per meglio intenderci, devo copiare il contenuto della cella B8 da tutti i fogli ed incollarlo in un altro foglio. Ho provato in tutti i modi, anche con alcune macro molto semplici (purtroppo sono troppo arrugginito con vb), ma ogni volta mi trovo di fronte al problema di non riuscire a selezionare la stessa cella su tutti i fogli o, diversamente, a copiare il contenuto stringa di esse.
Vi sarei molto grato se poteste darmi indicazioni a riguardo, dato che non riesco a procedere su questo punto da almeno un paio di giorni.
Grazie mille!
Ralph123
Newbie
 
Post: 3
Iscritto il: 08/01/14 14:05

Sponsor
 

Re: [Excel] - Copia stringhe di diverse celle da diversi fog

Postdi Anthony47 » 08/01/14 14:46

Ciao Ralph123, benvenuto nel forum.
Puoi copiare "tutti" i B8 con un loop del tipo
Codice: Seleziona tutto
For I=1 to Worksheets.count
    Sheets(I).Range("B8").Copy
'    Qui le istruzioni per incollare da qualche parte
'
Next I
Application.CutCopyMode = False

Per ulteriori approfondimenti non dimenticare di scrivere dove quei 300 valori vanno incollati.

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13903
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: [Excel] - Copia stringhe di diverse celle da diversi fog

Postdi Ralph123 » 08/01/14 16:45

Ciao Anthony,
c'è qualcosa che non va nella mia compilazione, che ti incollo qui sotto:
Sub copia()

For I = 1 To Worksheets.Count
Sheets(I).Range("A1").Copy
Sheets("foglio5").Range("A8").Select
ActiveSheet.Paste
Next I
Application.CutCopyMode = False
End Sub

mi dice che non può eseguire il codice in modalità interruzione. Oltre tutto, così facendo, mi sovrascrive ogni volta il contenuto precedentemente copiato con quello successivo. Es: se ha copiato da un foglio la parola "pero", quando passa alla pagina seguente, dove c'è la parola "melo", la macro sostituisce il contenuto. Morale, alla fine mi trovo solo l'ultima stringa incollata e non la totalità di esse. Posso ancora appellarmi al vostro aiuto?
grazie
Ralph123
Newbie
 
Post: 3
Iscritto il: 08/01/14 14:05

Re: [Excel] - Copia stringhe di diverse celle da diversi fog

Postdi Ralph123 » 08/01/14 18:40

ho trovato, anzi, mi hanno dato risposta, la pubblico per chi dovesse incappare in un problema simile.
in questo esempio viene copiata la cella b8 di tutti i fogli e incollata nel foglio chiamato "elenco" dalla cella A53 in poi:
Public Sub m()
Dim sh As Worksheet
Dim shE As Worksheet
Dim lng As Long
lng = 52
Set shE = ThisWorkbook.Worksheets("Elenco")
For Each sh In ThisWorkbook.Worksheets
If sh.Name <> "Elenco" Then
lng = lng + 1
shE.Range("A" & lng).Value = _
sh.Range("B8").Value
End If
Next
Set shE = Nothing

End Sub
buona serata a tutti e grazie per averci provato!

fonte: Microsoft community
Ralph123
Newbie
 
Post: 3
Iscritto il: 08/01/14 14:05

Re: [Excel] - Copia stringhe di diverse celle da diversi fog

Postdi Flash30005 » 09/01/14 01:40

Non ho capito o non so se può andare bene la somma di tutte le celle B8 dei fogli
Se vuoi la somma di tutte le celle B8 di tutti i fogli contenuti nella cartella di Excel puoi utilizzare una formula in questa maniera:
nel foglio generale che metterai a sinistra di tutti i fogli (1° foglio della cartella)
inserisci in una cella qualsiasi questa formula
Codice: Seleziona tutto
=SOMMA(Foglio2:Foglio1000!B8)

Dove il foglio2 è il nome del primo foglio sulla destra del foglio "generale" e Foglio1000 è il nome dell'ultimo foglio della cartella di Excel

ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-


Torna a Applicazioni Office Windows


Topic correlati a "[Excel] - Copia stringhe di diverse celle da diversi fogli":


Chi c’è in linea

Visitano il forum: enrico43 e 12 ospiti