Base de données et périodicité

Z

ZeH

Guest
Je sais j'abuse, mais vous êtes tellement éfficace (et gentils) que j'ose encore ;-)

Voilà mes questions:

Je viens de créer une base de données annuelles, est-ce possible en vba de procéder comme ci-dessous:

Soit 12 feuilles Janvier, Février, ect...:

- A la fin du mois de janvier (par ex) la feuille n'est plus accessible en écriture, idem pour le reste des feuilles.


- A la fin de l'année, une copie vierge automatique de ma base de donné pour redémarrer une nouvelle année.


Merci à tous

ZeH
 
G

Gérard DEZAMIS

Guest
Bonjour ZeH

Une petite idée en passant
Mettre dans la cellule A1 la date 01/01/2005
format mmmm cela donne => Janvier
Dans le code de Worbook, écrire

Private Sub Workbook_Open()
If Range("A1").Value < Now() Then
ActiveWindow.SelectedSheets.Visible = False
End If
End Sub

Ainsi lorsque tu ouvre ton classeur, la feuille dont la cellule A1 comporte une date antérieure au mois actuel est cachée.

Une solution qui est peutêtre à creuser ...

@+ GD
 

Discussions similaires

Statistiques des forums

Discussions
314 200
Messages
2 107 116
Membres
109 754
dernier inscrit
agaderm