A voir également:
- Création automatique d'une feuille sous excel
- Liste déroulante excel - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Formule excel - Guide
- Déplacer une colonne excel - Guide
- Creation compte gmail - Guide
2 réponses
Bjr
voici une macro a lancer tous les jours
Sub nouvellefeuille()
'
' Macro1 Macro
' Macro enregistrée le 12/01/2008 par ROBERT René http://utilsfr.new.fr
On Error GoTo finerreur
Date = CDate(Date)
jour = Day(Date)
annee = Year(Date)
mois = Month(Date)
fois = Worksheets.Count
jour = Format(jour, "00")
annee = Right(annee, 2)
mois = Format(mois, "00")
jour = jour - 1
num = annee & mois & jour
Sheets("" & num & "").Copy After:=Sheets(fois)
Sheets("" & num & " (2)").Select
jour = jour + 1
num2 = annee & mois & jour
Sheets("" & num & " (2)").Name = "" & num2 & ""
Range("a1").Select
GoTo Fin
finerreur:
MsgBox "Feuille introuvable vérifier si le nom de la feuille " & num & " est présente"
Sheets("" & num & " (2)").Delete
Fin:
End Sub
voici une macro a lancer tous les jours
Sub nouvellefeuille()
'
' Macro1 Macro
' Macro enregistrée le 12/01/2008 par ROBERT René http://utilsfr.new.fr
On Error GoTo finerreur
Date = CDate(Date)
jour = Day(Date)
annee = Year(Date)
mois = Month(Date)
fois = Worksheets.Count
jour = Format(jour, "00")
annee = Right(annee, 2)
mois = Format(mois, "00")
jour = jour - 1
num = annee & mois & jour
Sheets("" & num & "").Copy After:=Sheets(fois)
Sheets("" & num & " (2)").Select
jour = jour + 1
num2 = annee & mois & jour
Sheets("" & num & " (2)").Name = "" & num2 & ""
Range("a1").Select
GoTo Fin
finerreur:
MsgBox "Feuille introuvable vérifier si le nom de la feuille " & num & " est présente"
Sheets("" & num & " (2)").Delete
Fin:
End Sub
gbinforme
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 684
12 janv. 2008 à 18:41
12 janv. 2008 à 18:41
bonjour
chaque jour je créer un nouvelle feuille excel
Tu penses aller loin ainsi ?
Le nombre d'onglets n'est pas extensible à l'infini mais limité par la mémoire disponible.
Tu peux constituer sur une feuille des cumuls 3D d'un ensemble d'onglets mais il faut créer les nouveaux à l'intérieur pour qu'ils soient pris automatiquement.
Cela veux dire que tu te crées par exemple une feuille 08 (début année) et une 08f (fin d'année) et tu mets tes onglets entre les deux pour pouvoir avoir des formules : somme('08:08t'!C1) par exemple pour les reprendre dans ton graphique.
chaque jour je créer un nouvelle feuille excel
Tu penses aller loin ainsi ?
Le nombre d'onglets n'est pas extensible à l'infini mais limité par la mémoire disponible.
Tu peux constituer sur une feuille des cumuls 3D d'un ensemble d'onglets mais il faut créer les nouveaux à l'intérieur pour qu'ils soient pris automatiquement.
Cela veux dire que tu te crées par exemple une feuille 08 (début année) et une 08f (fin d'année) et tu mets tes onglets entre les deux pour pouvoir avoir des formules : somme('08:08t'!C1) par exemple pour les reprendre dans ton graphique.