Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Creation de feuille automatique

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion alainca31
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
A

alainca31

Guest
Bonjour
J'ai créé un classeur ou quand on clique sur le bouton " Creation nouvelle feuille" on crée une feuille automatiquement en lui donnant comme nom la date "J+1" et en copiant le contenu de la feuille "J".
Tout fonctionne bien jusqu'au 10 du mois et après les feuilles s'incrémentent de 10 en 10.
Je vous joins le fichier merci d'avance pour votre aide
Cordialement
 

Pièces jointes

Trier par date Trier par votes
Re : Creation de feuille automatique

Bonjour Alainca31,

Le problème vient de la récupération de ton chiffre pour le jour
Tu utilises :
Code: 
NoFeuil = Val(Left(NomFeuilEnCour, 1)) + 1
Donc seul le premier caractère du nom de ta feuille est récupéré

Il faut donc que tu recherches l'espace qui se trouve dans ton nom,
pour déduire le nombre de caractères à récupérer
Code: 
NoFeuil = Val(Left(nomfeuilencour, InStr(1, nomfeuilencour, " "))) + 1
NomNouvFeuil = NoFeuil & Mid(nomfeuilencour, InStr(1, nomfeuilencour, " "))
...
'remet nouvelle date
D = NoFeuil: DateFeuil = D & Mid(DateFeuil, InStr(1, nomfeuilencour, " "))

Ou alors mettre systématiquement 2 chiffres dans le jour et récupérer ces 2 chiffres
Code: 
NoFeuil = Format(Val(Left(NomFeuilEnCour, 2)) + 1, "00")
NomNouvFeuil = NoFeuil & Mid(NomFeuilEnCour, 3)
...
' remet nouvelle date
D = NoFeuil: DateFeuil = D & Mid(DateFeuil, 3)

Voili, voilà 😉
 
Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

P
  • Question Question
Microsoft 365 Création d'un fichier Excel pour gérer le bénévolat valorisé
Réponses
8
Affichages
262
Nain porte quoi
  • Question Question
Microsoft 365 Création automatique de feuille et le remplissage correspondant
Réponses
8
Affichages
438
gbinforme
G
  • Question Question
Microsoft 365 Excel VBA: manipuler des fichiers partagés via Teams / Sharepoint
Réponses
2
Affichages
137
Eric 888
  • Résolu(e)
Microsoft 365 rendre visible automatiquement l'onglet de la feuille active sur la barre de navigation inférieure
Réponses
11
Affichages
1 K
Eric 888
B
  • Question Question
Microsoft 365 Feuille calcul de commision
Réponses
5
Affichages
428
bbanor
B
G
  • Question Question
Microsoft 365 Formule qui retourne le contenu de la cellule sélectionnée
Réponses
5
Affichages
490
Guy_M
G
B
  • Question Question
XL 2019 Conserver les formules qui sont enregistrées dans des cellules
Réponses
8
Affichages
607
Phil69970
C
  • Question Question
Microsoft 365 macro copie de feuilles (avec formules à adapter)
Réponses
9
Affichages
509
caseras
C
  • Résolu(e)
XL 2021 Problème à l'utilisation calendrier de Patricktoulon.
Réponses
6
Affichages
770
SAMUAL_2023
S
M
  • Question Question
Microsoft 365 Analyse de données, copie conditionnée
Réponses
7
Affichages
866
Max
M
M
  • Question Question
Microsoft 365 Comptabilité : Création d'un fichier automatique d'analyse de comptes
Réponses
2
Affichages
884
Max
M
G
  • Résolu(e)
XL 2016 Pb de tri et sous totaux
2
Réponses
27
Affichages
2 K
Gestionnaire_rh
G
  • Question Question
XL 2019 [VB] Organisation et gestion du ménage et de l'entretien global (à améliorer)... Comment procéder ?
Réponses
13
Affichages
527
anthoYS
M
  • Question Question
Power BI besoin urgent d'un tableau de bord pour la gestion mon entreprise (regie publicitaire)
Réponses
2
Affichages
53
Nain porte quoi
O
  • Question Question
XL 2013 Planification automatique des rdv d'intervention en fonction des dates disponibles
Réponses
3
Affichages
462
cathodique
S
  • Résolu(e)
Microsoft 365 Copier automatiquement sur une ligne sur une autre feuille si la date est supérieur à une date définie
2
Réponses
17
Affichages
2 K
S.J
S
M
  • Résolu(e)
Microsoft 365 Trouver une valeur dans une colonne
Réponses
7
Affichages
567
mikeduff
M
C
  • Résolu(e)
XL 2016 humains VS chatGPT
Réponses
9
Affichages
905
AtTheOne
C
  • Résolu(e)
XL 2016 Répartir dans des Groupes d'Effectifs Aléatoires ... mais pas trop
Réponses
2
Affichages
601
crocrocro
C
V
  • Résolu(e)
XL 2019 formule de transfère
Réponses
8
Affichages
528
viper68
V
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…