A voir également:
- Créer des dossiers à partir d'une liste excel
- Creer dossier a partir liste excel - Meilleures réponses
- Créer des dossier à partir d'une liste excel - Meilleures réponses
- Créer dossier à partir liste excel ✓ - Forum - Excel
- Création automatique de dossiers à partir d'une liste dans Excel ✓ - Forum - Bureautique
- Création dossier et sous dossier a partir d'excel ✓ - Forum - Excel
- Créer des dossiers automatiquement à partir d'une liste ? ✓ - Forum - Windows 8 / 8.1
- VBA Créer dossiers à partir de cellules Excel - Forum - Programmation
8 réponses
HibikiKun
- Messages postés
- 95
- Date d'inscription
- vendredi 30 avril 2004
- Statut
- Membre
- Dernière intervention
- 8 avril 2013
Merci ca marche !!
Juste du faire une petite modif :
Sub créer_dossiers()
On Error Resume Next
Dim lig As Byte, cptr As Byte
lig = Range("A65536").End(xlUp).Row
For cptr = 1 To lig
MkDir "C:\dossiers"
MkDir "C:\dossiers\" & Cells(cptr, 1)
Next
End Sub
Sinon il ne savait pas où les créer.
Juste du faire une petite modif :
Sub créer_dossiers()
On Error Resume Next
Dim lig As Byte, cptr As Byte
lig = Range("A65536").End(xlUp).Row
For cptr = 1 To lig
MkDir "C:\dossiers"
MkDir "C:\dossiers\" & Cells(cptr, 1)
Next
End Sub
Sinon il ne savait pas où les créer.
Signaler
Efrancoue
Merci ça marche super bien
michel_m
- Messages postés
- 16433
- Date d'inscription
- lundi 12 septembre 2005
- Statut
- Contributeur
- Dernière intervention
- 15 avril 2021
Bonjour,
tu fais un copier de la macro
dans Xexcel, tu fais Alt+F11 et tu arrives dans VBA
S'il ny a que du gris sous les barres d'outils ou moins dans la fen^tre de droite, tu fais CTrl+R (ou insertion module)
Tu fais un coller
Tu retournes dans Excel: dans outils-personnaliser- tu coches "formulaires puis fermer
tu cliques sur le bouton et tu le dessines; tu l'affecte à la macro
dans XL<2007, dans outils-macros-sécurité tu coches niveau moyen ou faible
Voili, voilou
tu fais un copier de la macro
dans Xexcel, tu fais Alt+F11 et tu arrives dans VBA
S'il ny a que du gris sous les barres d'outils ou moins dans la fen^tre de droite, tu fais CTrl+R (ou insertion module)
Tu fais un coller
Tu retournes dans Excel: dans outils-personnaliser- tu coches "formulaires puis fermer
tu cliques sur le bouton et tu le dessines; tu l'affecte à la macro
dans XL<2007, dans outils-macros-sécurité tu coches niveau moyen ou faible
Voili, voilou
HibikiKun
- Messages postés
- 95
- Date d'inscription
- vendredi 30 avril 2004
- Statut
- Membre
- Dernière intervention
- 8 avril 2013
Merci Michel,
Mais ca veut dire quoi tout ca ?
Macro Excel ? Et si oui comment ca marche ?
Mais ca veut dire quoi tout ca ?
Macro Excel ? Et si oui comment ca marche ?
michel_m
- Messages postés
- 16433
- Date d'inscription
- lundi 12 septembre 2005
- Statut
- Contributeur
- Dernière intervention
- 15 avril 2021
Bonjour,
Sub créer_dossiers()
Dim lig As Byte, cptr As Byte
lig = Range("A65536").End(xlUp).Row
For cptr = 1 To lig
MkDir Cells(cptr, 1)
Next
End Sub
Sub créer_dossiers()
Dim lig As Byte, cptr As Byte
lig = Range("A65536").End(xlUp).Row
For cptr = 1 To lig
MkDir Cells(cptr, 1)
Next
End Sub
eriiic
- Messages postés
- 24016
- Date d'inscription
- mardi 11 septembre 2007
- Statut
- Contributeur
- Dernière intervention
- 18 avril 2021
Bonjour,
est-ce réellement un dossier (répertoire) que tu veux créer ou un fichier excel portant ce nom ?
est-ce réellement un dossier (répertoire) que tu veux créer ou un fichier excel portant ce nom ?
HibikiKun
- Messages postés
- 95
- Date d'inscription
- vendredi 30 avril 2004
- Statut
- Membre
- Dernière intervention
- 8 avril 2013
C'est bien un dossier (répertoire) que je veux créer :-)
lrock
bonjour à tous,
Lorsque que je le fais (180 dossiers à créer) il ne m'en crée que 130 et lorsque que je refait la démarche pour les manquants dans une autre feuille ca ne marche pas,
Auriez vous des solutions vis a vis de ca ?
Merci d'avance
Lorsque que je le fais (180 dossiers à créer) il ne m'en crée que 130 et lorsque que je refait la démarche pour les manquants dans une autre feuille ca ne marche pas,
Auriez vous des solutions vis a vis de ca ?
Merci d'avance
eriiic
- Messages postés
- 24016
- Date d'inscription
- mardi 11 septembre 2007
- Statut
- Contributeur
- Dernière intervention
- 18 avril 2021
Bonjour,
Lorsque que je le fais
Lorsque tu fais quoi ? Il y a plusieurs propositions...
Et ne met pas On Error Resume Next, ça te permettra d'avoir les erreurs et d'analyser le pourquoi.
eric.
Lorsque que je le fais
Lorsque tu fais quoi ? Il y a plusieurs propositions...
Et ne met pas On Error Resume Next, ça te permettra d'avoir les erreurs et d'analyser le pourquoi.
eric.
lrock
Bonjour à tous,
Encore un petit problèmes, je voudrais générer des dossiers ayant juste des numéros comme noms (éventuellement de la forme 1 , 2 , 3 , ou 1. , 2. , 3. ...) mais lorsque je lance la macro, celle ci zappe l'étape de création de fichiers (vérification faite avec l'exécution pas à pas détaillée de Excel VBA)
Merci d'avance pour votre aide ! :)
Encore un petit problèmes, je voudrais générer des dossiers ayant juste des numéros comme noms (éventuellement de la forme 1 , 2 , 3 , ou 1. , 2. , 3. ...) mais lorsque je lance la macro, celle ci zappe l'étape de création de fichiers (vérification faite avec l'exécution pas à pas détaillée de Excel VBA)
Merci d'avance pour votre aide ! :)
