Macro Crea fogli da celle - Suggerimenti per Excel

Sommario

Hai una colonna di testo. Per ogni testo nella colonna, vuoi inserire un nuovo foglio di lavoro e nominare quel foglio di lavoro per il valore nella cella.

Guarda un video

  • Pam vuole creare un foglio di lavoro per ogni numero di conto
  • Attualmente utilizza le pagine Mostra filtro report
  • Alla ricerca di un modo più veloce
  • Salva la cartella di lavoro come XLSM
  • Controlla la sicurezza delle macro con alt = "" + TMS e imposta il secondo livello
  • Alt + F11
  • Inserisci modulo
  • Digita il codice come mostrato
  • Alt + Q per tornare a Excel
  • Alt + F8
  • Seleziona la macro e fai clic su Opzioni
  • Assegna a Ctrl + Maiusc + W

Trascrizione del video

Impara Excel da Podcast, episodio 2082: Crea macro di fogli di lavoro

Ehi, bentornato al netcast, sono Bill Jelen. Bene, la scorsa settimana ero a Bloomington e Indianapolis, Indiana, a fare due seminari lì e Pam del seminario di Indy ha detto che aveva questo foglio di lavoro, e per ogni cella nella colonna A vuole creare un nuovo foglio di lavoro e poi ho fatto questa parte , inserisci la cella corrispondente dalla colonna B nella cella B1.

Voglio dire, al momento, Pam ha notato che lo sta facendo in un modo molto intelligente, come creare tutti quei fogli di lavoro, ma è ancora una seccatura. Va su Inserisci, Tabella pivot, OK e poi da quella nuova tabella pivot, inserisce l'Account nell'area Filtri e poi Dati nell'area dei valori in questo modo. Quindi, passa a Opzioni, Mostra pagine filtro report, Mostra tutte le pagine dell'account e BAM! Ottiene gli obiettivi delle lenzuola come vuole. Ora che i dati si trovano nel punto sbagliato, in realtà dice a questo punto che passa solo attraverso i gruppi e poi elimina quelle tabelle pivot in quel modo, ok? Quindi, questo è il metodo che sta usando in questo momento e voglio vedere se posso fare qualcosa di più veloce di quel foglio di lavoro.

Quindi il modo in cui lo faremo è che dovrai preselezionare i fogli, preselezionare i fogli. Inoltre hey, se non hai mai fatto macro prima, fai Alt + T per Tom, M per Mary, S per Sam e passa dalla prima scelta alla seconda scelta. Inoltre, molto, molto importante, il tuo file che garantisco viene salvato come .xlsx. Non funzionerà se lo lasci in questo modo, devi fare File, Salva con nome e scegliere questa cartella di lavoro abilitata per Excel. Quello in alto è l'impostazione predefinita e quello in alto è l'orribile formato di file a cui non è consentito l'uso di macro.

Va bene, quindi selezioneremo quei dati Alt + F11, apre l'editor VBA. Se non hai mai fatto VBA prima, otterrai questo brutto schermo qui. Dirà Insert, Module e c'è il nostro nuovo modulo e stai per digitare questo codice: la parola Sub CreateSheets (). Non appena lo digiti, metteranno un End Sub ma tra i due diremo For Each cell in Selection. Stiamo andando a Imposta foglio di lavoro e in realtà dovremmo probabilmente fare questo Dim WS come foglio di lavoro. Vuoi impostare foglio di lavoro = Fogli di lavoro. Inserisci. Ora, Worksheets.Add deve sapere dove vogliamo aggiungerlo e quello che voglio fare è solo aggiungere questo foglio di lavoro dopo l'ultimo lavoro che si trova nella cartella di lavoro. Quindi, dirò quanti fogli di lavoro abbiamo ora. E qui proviamo, diciamo: Debug.Print worksheets.Count.Va bene, dice che ne abbiamo 4, torniamo a Excel e controlliamo. 1 2 3 4 quindi lo aggiungeremo dopo il 4 ° foglio. Quindi, dopo il riepilogo, dovremmo vedere un nuovo foglio di lavoro e quel foglio di lavoro è dove metteremo i dati per l'account 100.

Va bene ora, WS.Name = cell.Value e poi abbiamo deciso di prendere tutto ciò che è a destra dell'account: i dati. E prenderemo quei dati e li inseriremo nella cella B1 del nuovo foglio di lavoro che abbiamo appena creato. Quindi dalla cella, a destra, per ogni cella andremo a Offset 0 righe 1 colonna sopra e prenderemo quel valore, va bene? Quindi abbiamo la nostra macro: File, Close e Return to Microsoft Excel e poi premeremo Alt + F8. Alt + F8, CreateSheets, andrà su Opzioni. Ragazzo, cosa sarà buono? Ctrl + Maiusc + W. W per fogli di lavoro. Quindi tengo premuto Maiusc + W lì, faccio clic su OK e possiamo fare clic su Annulla. Va bene, seleziona quelle celle e poi Ctrl + Maiusc + W. Guardalo qui dopo Wrap Up - BAM! Li ha su ciascuno. Ha ottenuto i dati da ogni singolo foglio. Fantastico, fantastico modo di andare.

Essere in grado di creare molti fogli di lavoro al volo e, naturalmente, funzionerebbe per molto di più. Facciamo a = ROW * 2 copia questo in basso, in basso, in basso, in basso, in basso e selezioniamo tutti quelli - Oh aspetta, dobbiamo mettere alcuni dati lì. Riempiamolo con 2, va bene. E poi Ctrl + Maiusc + W. BAM! Oh, ne ho già usato un foglio 49. Ma guarda, siamo arrivati ​​al vicino, alla fine veloce veloce. Come creare molti fogli di lavoro diversi al volo.

Bene, argomenti in questo episodio: Pam di Indy vuole creare un foglio di lavoro per ogni numero di conto nella colonna A. Attualmente, sta usando le pagine del filtro dei rapporti delle tabelle pivot. Sta cercando un modo più veloce, va bene? Quindi salveremo la cartella di lavoro come XLSM. Andremo Alt + TMS e imposteremo la seconda scelta, non la prima scelta. Alt + F11, ora siamo in VBA, Inserisci modulo, Digita il codice come mostrato, Alt + Q per tornare a Excel, Alt + F8, seleziona il nome della macro e fai clic su Opzioni, assegna a Ctrl + Maiusc + W.

Ehi, voglio ringraziare Pam per essere stata al mio seminario a Indianapolis. Ci siamo trovati benissimo, buon gruppo. E voglio ringraziarti per essere passato. Ci vediamo la prossima volta per un altro netcast da.

Download file

Scarica il file di esempio qui: Podcast2082.xlsm

Articoli interessanti...