private sub

  1. M

    Autres VBA - cumuler 2 Private Sub Worksheet_change(ByVal Target As Range)

    Bonjour, Je souhaiterais cumuler, sur une même page, ces deux codes : Private Sub Worksheet_Change(ByVal Target As Range) Dim t, r, i As Long, ech As Boolean, aux, s$ If Intersect(Target, Range("N3")) Is Nothing Then Exit Sub Application.ScreenUpdating = False t =...
  2. Sooophie

    XL 2013 VBA - convertisseur automatique

    Bonjour, Je cherche à convertir automatiquement les valeurs rentrées dans un tableau : A B C D 1 10 mm in 2 20 mm in 3 ... J'ai rentré dans Sheet1 le code suivant, j'ai fait...
  3. ArnaudSi

    XL pour MAC Deux procédures "Private Sub" pour une feuille

    Bonjour à tous De manière indépendante ces deux procédures fonctionnent à merveille Et lorsque j'essaye de les combiner pour une feuille, l'ensemble fonctionne de manière aléatoire (voir pas du tout...) Y a t il une méthode pour résoudre ce problème? Merci de votre aide Arnaud Private Sub...