Sujet Précédent Sujet Suivant

Excel: prendre valeur sur feuille generer

draeist Messages postés 25 Date d'inscription   Statut Membre Dernière intervention   -  
zavenger Messages postés 817 Statut Membre -
Bonjour,

Voilà j'ai une magnifique macro que j'ai reussi à avoir ici ;) merci à celui qui me las donne;)

Elle me permet de generer une feuille type à partir d'un model.

Mais j'aimerais que chaque feuille generées aillent me chercher dans la précédente générée certaines données (chiffré la plupart du temps). hors je n y arrive pas... ququn connais?

(chaque feuille générée à pour nom un mois (janvier frevrier etc.... )

J'ai essayer avec month-1 mais marche po :'(
A voir également:

5 réponses

Réponse 1 / 5
zavenger Messages postés 817 Statut Membre 161
 
bonjour

pourquoi na pas utiliser une fonction comme celle-ci (je sais ce n'est pas très fin)

Function MoisPrecedent(MoisCourant As String)

Select Case LCase(MoisCourant)
Case "janvier"
MoisPrecedent = "Décembre"
Case "février"
MoisPrecedent = "Janvier"
Case "mars"
MoisPrecedent = "Février"
Case "avril"
MoisPrecedent = "Mars"
Case "mai"
MoisPrecedent = "Avril"
Case "juin"
MoisPrecedent = "Mai"
Case "juillet"
MoisPrecedent = "Juin"
Case "aout"
MoisPrecedent = "Juillet"
Case "septemnbre"
MoisPrecedent = "Aout"
Case "octobre"
MoisPrecedent = "Septemnbre"
Case "novembre"
MoisPrecedent = "Octobre"
Case "décembre"
MoisPrecedent = "Novembre"
End Select

End Function
0
draeist Messages postés 25 Date d'inscription   Statut Membre Dernière intervention  
 
euh, je ne comprend pas trop.... je colle ca ou ?
0
Réponse 2 / 5
zavenger Messages postés 817 Statut Membre 161
 
c'est une fonction vbs que tu peux utiliser dans ta macro de genreation de feuille qui te retourne le nom du mois precedent celui que tu lui passses en parametre.

Ou alors je n'ai pas compris ce que tu voulais faire ...
0
Réponse 3 / 5
draeist Messages postés 25 Date d'inscription   Statut Membre Dernière intervention  
 
A vrai dire ce que je ne comprend pas c'est comment dire à ma nouvelle feuille:

Vas prendre en A34 de la feuille précédente (moi d'avril si la nouvelle feuille généré est mai) la valeur inscrite.
0
Réponse 4 / 5
zavenger Messages postés 817 Statut Membre 161
 
tu veux le faire dans une macro ou tu veux une formule dans une cellule?
0
draeist Messages postés 25 Date d'inscription   Statut Membre Dernière intervention  
 
Ca as peu d'importance, mais ma macro de creation contient dejà :

Dim Var_Date As String
Var_Date = MonthName(Month(Now()))
Sheets("modelefeuille").Select
Sheets("modelefeuille").Copy After:=Sheets(xlLast)
Worksheets("modelefeuille (2)").Name = Var_Date

Je colle à la suite ce que tu m as mis ?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 5
zavenger Messages postés 817 Statut Membre 161
 
a la suite de ton code tu ajoutes:

MoisPrec = Month(Now()) - 1
if MoisPrec = 0 then
MoisPrec = 12
end if
MoisPrecNom = MonthName(MoisPrec)
Sheets(Var_Date).Cells(3,2).Value = Sheets(MoisPrecNom).Cells(4,3).Value ' pour copier le contenu de la cellule B3 en C4 de l'ancienne vers la nouvelle feuille
' et ainsi de suite pour toutes tes cellules.
0