Note: The other languages of the website are Google-translated. Back to English

Come creare rapidamente cartelle basate sui valori delle celle in Excel?

Supponendo che tu abbia un elenco di nomi di personale in un intervallo di un foglio di lavoro e ora desideri creare alcune cartelle per ciascuno di essi nelle celle per registrare le loro informazioni. Se crei le cartelle una per una, sprecherai molto tempo. Ma come hai potuto creare rapidamente queste cartelle? Oggi ti presenterò alcuni trucchi veloci:

Crea cartelle in base ai valori delle celle con codice VBA

Crea rapidamente cartelle in base ai valori delle celle con Kutools per Excelbuona idea 3


Crea cartelle in base ai valori delle celle con codice VBA

Ad esempio, ho un intervallo di nomi in un foglio di lavoro, voglio creare cartelle per ciascuno di essi e salvarli in un percorso specificato, con il codice VBA, posso completare questa attività.

1. Metti la cartella di lavoro attiva in una directory specifica in cui inserirai le cartelle create. Apri la cartella di lavoro e seleziona l'intervallo di celle che desideri utilizzare.

doc-crea-cartelle1

2. Clic Costruttori > Visual Basic, un nuovo Microsoft Visual Basic per le applicazioni verrà visualizzata la finestra, fare clic su inserire > Moduloe inserisci il codice seguente nel modulo:

Codice VBA: crea cartelle in base ai valori delle celle

Sub MakeFolders()
Dim Rng As Range
Dim maxRows, maxCols, r, c As Integer
Set Rng = Selection
maxRows = Rng.Rows.Count
maxCols = Rng.Columns.Count
For c = 1 To maxCols
r = 1
Do While r <= maxRows
If Len(Dir(ActiveWorkbook.Path & "\" & Rng(r, c), vbDirectory)) = 0 Then
MkDir (ActiveWorkbook.Path & "\" & Rng(r, c))
On Error Resume Next
End If
r = r + 1
Loop
Next c
End Sub

3. Clic doc-multiply-calcolo-3 pulsante per eseguire il codice. Tutte le celle selezionate sono state create in cartelle con i loro valori. E le cartelle vengono inserite nel percorso come la cartella di lavoro attiva. Vedi screenshot:

doc-crea-cartelle2


Crea rapidamente cartelle in base ai valori delle celle con Kutools per Excel

È facile e conveniente creare cartelle basate sui valori delle celle se si utilizza lo strumento Kutools per Excel.

Kutools for Excel, con oltre 300 funzioni utili, rende il tuo lavoro più facile. 

Dopo l'installazione Kutools per Excel, per favore fai come di seguito:(Scarica subito Kutools per Excel!)

1. Seleziona l'intervallo in cui desideri creare cartelle.

2. Clic Kutools Plus > Importa / Esporta > Crea cartelle dal contenuto delle celle..., vedi screenshot:

doc crea cartella 1

3. Nel Crea cartelle dal contenuto delle celle finestra di dialogo, fare clic doc-crea-cartelle3pulsante per specificare il percorso in cui si desidera salvare le cartelle. Schermata vista:

doc crea cartella 2

4. Clic OK. E una finestra di messaggio ti ricorderà quante cartelle sono state create. Vedi screenshot:

doc crea cartella 3

5. Clic OK. E tutti i valori nell'intervallo selezionato sono stati creati nelle cartelle nella cartella specificata.
doc crea cartella 4


Elenca tutti i nomi di file da una cartella in un foglio

per saperne di più su questa funzione.

Ecco un'utilità in Kutools per Excel - Elenco nomi file puoi elencare tutti i nomi di file di una cartella in un foglio, se ti interessa, continua a leggere.

Dopo l'installazione Kutools per Excel, per favore fai come di seguito:(Scarica subito Kutools per Excel!)

1. Clic Kutools Plus > Import / Export > Elenco nomi file.
doc crea cartella 5

2. Nel Elenco nomi file finestra di dialogo, selezionare una cartella in cui si desidera elencare i suoi file, il segno di spunta Tutti i file or Specificare opzione di cui hai bisogno Tipo di file sezione.
img src = "https: // cdn.extendoffice.com / images / stories / doc-excel / create-folders / doc-create-folder-6.png "alt =" doc create folder 6 "/>

3. Clic Ok, viene creato un nuovo foglio con tutti i nomi dei file e alcune informazioni relative.
doc crea cartella 7


I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di 300 potenti funzionalità. Supporta Office / Excel 2007-2019 e 365. Supporta tutte le lingue. Facile distribuzione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce centinaia di clic del mouse ogni giorno!
fondo officetab
Commenti (61)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Qual è l'errore nel seguire l'istruzione VBA? Fai mentre r
Questo commento è stato fatto dal moderatore sul sito
Grazie per la tua risposta, il codice VBA ha piccole domande quando lo modifico, quindi qui l'ho modificato e si applica correttamente, provalo. In bocca al lupo!
Questo commento è stato fatto dal moderatore sul sito
SkyYang, [quote] Grazie per la risposta, il codice VBA ha piccole domande quando lo modifico, quindi qui l'ho modificato e si applica correttamente, provalo. In bocca al lupo!Per Skyyang[/quote] SEI FANTASTICO!! Sono stato in grado di essere più produttivo al lavoro grazie al programma (codice VBA in Developer).
Questo commento è stato fatto dal moderatore sul sito
Chi ha mai scritto il primo esempio - Sei fantastico!!
Questo commento è stato fatto dal moderatore sul sito
per favore, ho bisogno della stessa macro ma invece di salvarli come cartelle, ne ho bisogno per salvare i blocchi note con solo i nomi delle celle in un intervallo di colonne, apprezzo il supporto.
Questo commento è stato fatto dal moderatore sul sito
Bene... :) Grazie.. Mi rende semplice lavorare.
Questo commento è stato fatto dal moderatore sul sito
Grazie questo mi fa risparmiare un sacco di tempo. Ma come creare sottocartelle?
Questo commento è stato fatto dal moderatore sul sito
Molte grazie!!! Questa è la soluzione fantastica, più efficace e più semplice che ho trovato su Internet per questo! :lol:
Questo commento è stato fatto dal moderatore sul sito
:-) Grazie per aver fornito questi dati.... ho risparmiato molto tempo
Questo commento è stato fatto dal moderatore sul sito
Come farlo in LibreOffice o OpenOffice Per favore rispondi.
Questo commento è stato fatto dal moderatore sul sito
AIUTO !!! Ho oltre 7500 cartelle da creare ma il programma ha un errore di compilazione che evidenzia [b]Sub MakeFolders()[b] come se fosse un nome non valido o qualcosa del genere! Sto utilizzando Excel 2010.
Questo commento è stato fatto dal moderatore sul sito
Ho avuto lo stesso problema, ma quando ho guardato più da vicino il nome della cartella c'era un / e una volta rimosso, il codice ha funzionato come un incantesimo.
Questo commento è stato fatto dal moderatore sul sito
sei un salvavita!!!!! [b]Grazie![b] Nota: non inserire uno spazio tra MakeFolder e ().
Questo commento è stato fatto dal moderatore sul sito
Per qualche motivo la cartella di lavoro attiva ha problemi con il percorso. AIUTOPPPP :piangere:
Questo commento è stato fatto dal moderatore sul sito
Ho avuto un problema simile, alla fine ho capito che il programma non funziona se il nome del file ha barre / o \, sostituisco / con _, ha funzionato
Questo commento è stato fatto dal moderatore sul sito
Grazie per questo - Eccellente risparmio di tempo
Questo commento è stato fatto dal moderatore sul sito
Ha funzionato come un incantesimo, ma c'è un modo per creare sottocartelle?
Questo commento è stato fatto dal moderatore sul sito
Provando questo su un Mac e ottengo "Errore di runtime '68': Dispositivo non disponibile", e premendo debug indica la seguente riga di codice come colpevole: If Len(Dir(ActiveWorkbook.Path & "\" & Rng( r, c), vbDirectory)) = 0 Quindi MkDir (ActiveWorkbook.Path & "\" & Rng(r, c)) Aiutatemi.
Questo commento è stato fatto dal moderatore sul sito
Vorrei sapere anche questo. Ho bisogno di creare sottocartelle con il nome già aggiunto. Esempio: Excelnamedfolder\P\E Ho bisogno di due cartelle all'interno della cartella P denominate E e K.
Questo commento è stato fatto dal moderatore sul sito
Grazie mille per questo utile post, mi ha fatto risparmiare un po' di tempo. Adoro i nerd :) Cosa faremmo senza di loro, sul serio!
Questo commento è stato fatto dal moderatore sul sito
Sto cercando di aggiungere più colonne insieme durante la creazione di una cartella. Qualche suggerimento su come fare questo? es. ABC 1 A1 A2 A3 2 B1 B2 B3 3 C1 C2 C3 Il prodotto finale una volta create le cartelle dovrebbe essere: Cartella 1 (A1 + A2 + A3) Cartella 2 (B1 + B2 + B3) Etc... Ho trovato più formule su creando cartelle da singole celle ma niente per più. Ho anche provato a modificare alcune cose senza successo. Qualche idea? Grazie
Questo commento è stato fatto dal moderatore sul sito
Sei fantastico. Ha funzionato. Grazie.
Questo commento è stato fatto dal moderatore sul sito
Bel lavoro..... Eccellente
Questo commento è stato fatto dal moderatore sul sito
Grazie mille per queste schede KUTOOLS e Enterprise ...... strumento per risparmiare tempo ..
Questo commento è stato fatto dal moderatore sul sito
mi hai appena risparmiato un sacco di tempo amico
Questo commento è stato fatto dal moderatore sul sito
Grazie mille amico,,, funziona...
Questo commento è stato fatto dal moderatore sul sito
Saluti! Ottima funzione!
Questo commento è stato fatto dal moderatore sul sito
Grazie per questo. funziona bene
Non ci sono ancora commenti pubblicati qui
Carica Altre
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite