Diminuer la longueur d'une macro
Résolu
JCB40
Messages postés
2924
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
26 septembre 2024
-
Modifié le 30 nov. 2023 à 16:40
yg_be Messages postés 23233 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 29 septembre 2024 - 1 déc. 2023 à 21:46
yg_be Messages postés 23233 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 29 septembre 2024 - 1 déc. 2023 à 21:46
A voir également:
- Diminuer la longueur d'une macro
- Comment diminuer la taille d'un pdf - Guide
- Comment diminuer la taille d'une photo - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro word - Guide
- Comment diminuer la luminosité d'un ordinateur - Guide
2 réponses
f894009
Messages postés
17200
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
11 septembre 2024
1 708
30 nov. 2023 à 16:57
30 nov. 2023 à 16:57
Bonjour,
Sub test() ' test Macro Cel = "" A10 = Sheets("Liens").Range("A10") If A10 <> "" Then If A10 = "A" Then Cel = "F1" ElseIf A10 = "B" Then Cel = "G3" ElseIf A10 = "C" Then Cel = "H5" End If With Worksheets("Résultat").Range(Cel).Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .Color = 255 .TintAndShade = 0 .PatternTintAndShade = 0 End With End If End Sub
JCB40
Messages postés
2924
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
26 septembre 2024
461
1 déc. 2023 à 10:01
1 déc. 2023 à 10:01
Bonjour
Merci pour vos réponses cela correspond à mes besoins
Crdlt
30 nov. 2023 à 17:18
bonjour,
je pense utile de vérifier que A10 contient une des valeurs cherchées:
1 déc. 2023 à 07:43
Bonjour,
Ben, qu'est ce que j'ai ecrit en ligne 5!
1 déc. 2023 à 12:50
Si A10 contient "D", que va faire la macro?
1 déc. 2023 à 16:49
Re,
A lui de voir...
1 déc. 2023 à 21:46
Si je lis le code, la macro va se planter.