Discussion :

[NEC14]

Bonjour à tous,

J'utilise ce code pour formater automatiquement des cellules (merci PatrickToulon). Ce code est copié dans 9 feuilles.
Est-ce qu'il serait pratique de le mettre dans un module ? cela pour atténuer le nombre de lignes d'écriture dans chacune des feuilles.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
 
    Dim chaine$
        If Target.Column = 1 And Target.Count = 1 Then
        chaine = Replace(Target.Value, " ", "") 'On cherche à replacer automatiquement la chaîne de caractères
        If Len(chaine) Mod 2 <> 0 And chaine <> "" Then 'Si la chaîne est impaire et pas vide
            Target.Value = Trim(Format(chaine, Application.Rept("@@ ", 30) & "@@@")) 'Application du formatage
        Else
            MsgBox "Référence inexacte - Veuillez vérifier": Application.Goto Target: Exit Sub
            End If
        End If     
 
End Sub

Je ne demande pas que l'on me fasse le travail, mais juste m'indiquer si c'est possible et un tuto qui pourrait m'aider.

Je me suis pas mal baladé dans différente discussion mais je n'arrive pas à trouver un cours sur le sujet.

Toute dernière question, quelle différence y a t-il entre un module et un module de classe ?

Merci par avance

[unparia]

Bonjour

Je ne demande pas que l'on me fasse le travail, mais juste m'indiquer si c'est possible et un tuto qui pourrait m'aider.

Réponse simple et claire :
procédure déclarée en public dans un module standard et à laquelle on passe les paramètres qu'elle utilise. Et ce : quelle que soit la finalité (celle qui est la tienne actuellement ou toute autre).

Toute dernière question, quelle différence y a t-il entre un module et un module de classe ?

Drôle de question.
A commencer par l'utilisation du mot "module".
Module, tout l'est, y compris celui que tu utilises pour y écrire un code simple. C'est le module de code concernant l'objet traité.
Un module "standard" est également un module, mais ne concerne pas un objet particulier. Il héberge en général des procédures paramétrées "partagées" (pour être plus clair, qui seront accessibles depuis différents autres modules, standards ou non
Un Module de classe est encore autre chose, avec une toute autre vocation. En parler ici nécessiterait tout un cours. Tu trouveras ta réponse en consultant la FAQ de ce forum.

[Philippe Tulliez]

Bonjour,

Ce code est copié dans 9 feuilles.

Si cela signifie que neuf feuilles ont la même procédure événementielle, je ne peux que te conseiller d'utiliser plutôt la procédure événementielle Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) du module ThisWorkbook
Voir le tutoriel Les évènements du module objet ThisWorkbook, dans Excel

[NEC14]

Merci Philippe, je n'avais pas pensé à cette option. Super le tuto.

Cordialement
René