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

Question

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!

Answer 1

               

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!

Mettiamo tu debba copiare tutti valori delle celle A1 di tutti i fogli, escluso il foglio Elenco, nel quale andremo a mettere i valori di tutte le A1 a partire da C1. Copia/incolla questo in modulo standard:

Public Sub m()

    Dim sh As Worksheet

    Dim shE As Worksheet

    Dim lng As Long

    lng = 0

    Set shE = ThisWorkbook.Worksheets("Elenco")

    For Each sh In ThisWorkbook.Worksheets

        If sh.Name <> "Elenco" Then

            lng = lng + 1

            shE.Range("C" & lng).Value = _

                sh.Range("A1").Value

        End If

    Next

    Set shE = Nothing

End Sub

Cambia riferimenti e nomi con i tuoi.

Answer 2

Grazie mille Sig. Gamberini, la macro è perfetta e adatta allo scopo. Mi ero incartato su come far scorrere in basso le celle dove scrivere una volta occupate, ma così ha reso tutto molto più semplice dell'albero nidificato che stavo barbaramente creando.

Grazie ancora per la velocità di risposta.

Buona serata!

Niente Sig. Gamberini, qui ci diamo del tu. ;-)

Grazie per il cortese riscontro.

Ciao e alla prossima.

Answer 3

Grazie mille Sig. Gamberini, la macro è perfetta e adatta allo scopo. Mi ero incartato su come far scorrere in basso le celle dove scrivere una volta occupate, ma così ha reso tutto molto più semplice dell'albero nidificato che stavo barbaramente creando.

Grazie ancora per la velocità di risposta.

Buona serata!