Excel - Esportazione di dati in un altro foglio di calcolo

Esportare dati da un foglio di calcolo di Excel a un altro foglio di calcolo è sempre un problema se si desidera avere lo stesso sapore anche nel secondo. Molto spesso, ogni volta che un file da Internet viene esportato, viene salvato in un nuovo file, non in quello esistente. Ci vuole così tanto tempo per riconfigurarlo. Per risolvere questo problema, è necessario utilizzare i dati - importare l'opzione dati esterni in Excel con una nuova query Web in cui l'indirizzo della pagina Web deve essere incollato. Quindi, utilizzando l'opzione di importazione, è possibile ordinare la destinazione corretta.

Problema
Soluzione
Nota che

Problema

Ho una domanda. Ogni volta che esporto un file da Internet i dati vengono salvati in un nuovo file Excel invece del foglio Excel in cui lavoro. Di conseguenza devo copiare i dati da quel file nel file Excel in cui sto lavorando. Questo è molto tempo. Esiste un metodo più breve per esportare direttamente i dati nel file Excel funzionante?
Ho un altro problema separato. Ho registrato una macro per un particolare foglio di lavoro. Quella macro fa due cose. 1. Ci sono due colonne. Colonna A e Colonna B. In col C sottrae Col A da B. 2. Trova la media ponderata tra colonna A e C.

Ora voglio eseguire questa macro in tutti i fogli di lavoro eccetto il primo foglio di lavoro. Qual è il codice per farlo?

Soluzione

Risolvere questo problema:

Copia l'indirizzo della pagina web negli Appunti di Excel.
Vai al tuo foglio.
Seleziona una cella da cui desideri copiare il file. ad esempio A1.
Fai clic su dati: importa dati esterni (o qualcosa di simile a seconda della versione): nuova query web.
Nella nuova finestra della query Web incollare l'indirizzo della pagina Web in alto su "indirizzo".
Clicca su Vai
Otterrai l'intera pagina web. Qualunque sia la tabella desiderata, fai clic sul segno di spunta e l'intera tabella verrà contrassegnata
Fai clic su "importa" in basso a destra
Chiederà dove vuoi parcheggiarlo. Se è già A1, clicca ok

Per risolvere il secondo problema:

 Sub test1 () Dim j As Integer, k As Integer j = Worksheets.Count 'MsgBox j Per k = 1 A j' MsgBox Fogli (k) .Name Se Fogli (k) .Name = "Foglio1" Quindi GoTo Nnext Fogli ( k). Attiva NOME DELLA MACRO nnesto: Avanti k Fine Sott