Démarrage d'une macro avec un chiffre
Résolu
Guy72
-
Polux31 Messages postés 7219 Statut Membre -
Polux31 Messages postés 7219 Statut Membre -
Bonjour,
Peut-on faire démarrer une macro avec les chiffres d'une liste déroulante ?
Exemple d'une des macros de 4 à 12
Sub Huit()
Range("Z2:Z16").Copy Destination:=Range("F10")
End Sub
Fichier exemple joint
https://www.cjoint.com/?kclbNqgjQl
Merci de votre aide
Peut-on faire démarrer une macro avec les chiffres d'une liste déroulante ?
Exemple d'une des macros de 4 à 12
Sub Huit()
Range("Z2:Z16").Copy Destination:=Range("F10")
End Sub
Fichier exemple joint
https://www.cjoint.com/?kclbNqgjQl
Merci de votre aide
A voir également:
- Démarrage d'une macro avec un chiffre
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Forcer demarrage pc - Guide
- Ordinateur lent au démarrage - Guide
- Rebooter un pc au démarrage - Guide
- Clavier iphone chiffre et lettre - Guide
3 réponses
Bonjour,
Oui et d'ailleur ce que tu as fait fonctionne ... je ne vois pas le problème !
Je conseillerai simplement d'utiliser un Select Case plutôt qu'une suite de If ... Then
;o)
Oui et d'ailleur ce que tu as fait fonctionne ... je ne vois pas le problème !
Je conseillerai simplement d'utiliser un Select Case plutôt qu'une suite de If ... Then
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [A1]) Is Nothing And Target.Count = 1 Then
'On efface le contenu des cellules
Range("F10:F33").ClearContents
Select Case Target
Case 4
Quatre
Case 5
Cinq
Case 6
Six
Case 7
Sept
Case 8
Huit
Case 9
Neuf
Case 10
Dix
Case 11
Onze
Case 12
Douze
End Select
End If
End Sub
;o)
