procédures événementielles

[pyramide]

Je reconnais volontiers ne pas être un expert en procédures événementielles et m’en remets à vos bons conseils pour remédier à une routine simple dans un classeur qui comporte beaucoup d’onglets.

Je souhaite à l’ouverture de chaque feuille de ce classeur, que la feuille suivante recopie les données de la colonne A de la feuille précédente. Je précise que les données de la colonne à recopier ont été déclarées comme une liste dans chaque feuille. Pour plus de facilitée, je vous joins le fichier en question.


En substance, connaissez-vous de bons liens afférents à l'apprentissage des procédures événementilles

Merci d’avance de votre aide précieuse.

 

[job75]

Re : procédures événementielles

Bonjour pyramide, bienvenue sur le forum,

Pas de fichier joint, tant pis... Voici une petite macro à placer dans ThisWorkbook :

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Index > 1 Then Sheets(Sh.Index - 1).Range("A:A").Copy Range("A1")
End Sub

Elle copie toute la colonne A de la feuille précédente sur la colonne A de la feuille activée. A adapter aux plages que vous voulez.

A+

Edition : 15 secondes pour trouver sur le web le site suivant :

http://silkyroad.developpez.com/VBA/EvenementsFeuille/

 

[pyramide]

Re : procédures événementielles

Merci pour cette réponse rapide. En raison de la taille de mon fichier, je n'ai pas pu l'annexer à mon message. J'ai omis de préciser que la feuille précédente devait conserver les données saisies.

En réalité, il s'agit d'un fichier modèle de vote d'une copropriété. Les personnes présentes ou représentées forment le quorum. Chaque feuille représente une question et le quorum est reporté au vote suivant. Le corps électoral varie au gré des entrées et sorties des membres et par conséquence le quorum évolue.

Le code communiqué fonctionne au passage à la feuille 2 mais il n'y a plus rien en feuille 1si l'on revient dessus. Je voudrais que la feuille 1 soit non modifiable une fois que l'on a validé le vote. Peut-être faut-il ajouter une protection définitive des cellules ?