Copia l'attuale intervallo di celle di Excel in una nuova tabella usando la macro VBA

Sommario

Per trasferire completamente i dati dall'intervallo di celle corrente a una nuova tabella, è necessario sapere quanto è grande l'intervallo di celle utilizzato attorno alla cella attiva. Oppure puoi lasciare che Excel lo faccia per te e copiare il g

Vuoi copiare automaticamente tutte le celle da un intervallo di celle contigue in una macro? Ciò è particolarmente utile se si desidera reagire in modo flessibile all'input degli utenti e non si conosce l'ampiezza delle aree di dati immesse.

Puoi usare una macro per fare questo lavoro. La macro determina tutte le celle intorno alla cella attiva e copia esattamente queste celle in una nuova cartella di lavoro.

La figura seguente mostra una tabella con tre diverse aree dati. Sono codificati a colori per renderli più facili da vedere.

Tutte le celle che si connettono a celle vicine senza celle vuote sono considerate appartenenti insieme.

Con una macro adatta, puoi assicurarti che dopo aver fatto clic su una cella in un intervallo di celle, tutte le celle che ne fanno parte vengano copiate in una nuova tabella. Ecco il codice del programma appropriato:

Sottocopia area corrente ()
Oscura l'area della sorgente come intervallo
Dim NewSheet come foglio di lavoro
Imposta area sorgente = ActiveCell.CurrentRegion
Imposta NeuesBlatt = Workbooks.Add.Worksheets (1)
Area di origine.Copia Destinazione: = NeuesBlatt.Range ("A1")
Fine sottotitolo

Prima di chiamare la macro, fai clic su qualsiasi cella in una tabella. La macro determina tutte le celle che, insieme alla cella selezionata, appartengono a un intervallo e copia questo intervallo di dati in una nuova cartella di lavoro vuota. La figura seguente mostra l'aspetto del risultato dopo aver chiamato la macro se la cella E9 nella tabella della prima figura è selezionata prima dell'avvio della macro.

Per inserire la macro, premi ALT F11 in Excel per visualizzare l'editor VBA. Seleziona il comando INSERISCI - MODULO nell'editor VBA e inserisci la macro. Per avviare la macro, attiva la combinazione di tasti ALT F8 in Excel. Le due scorciatoie da tastiera per avviare l'editor VBA e la macro funzionano in tutte le versioni di Excel.

Aiuterete lo sviluppo del sito, condividere la pagina con i tuoi amici

wave wave wave wave wave