Macro si
Fermé
alphonse
-
17 juin 2009 à 21:48
Alphlof Messages postés 2 Date d'inscription mercredi 17 juin 2009 Statut Membre Dernière intervention 19 juin 2009 - 19 juin 2009 à 11:41
Alphlof Messages postés 2 Date d'inscription mercredi 17 juin 2009 Statut Membre Dernière intervention 19 juin 2009 - 19 juin 2009 à 11:41
A voir également:
- Macro si
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro word - Guide
- Jitbit macro recorder - Télécharger - Confidentialité
- Macro logiciel - Télécharger - Organisation
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
4 réponses
necro27
Messages postés
160
Date d'inscription
jeudi 28 mai 2009
Statut
Membre
Dernière intervention
11 février 2011
8
18 juin 2009 à 08:57
18 juin 2009 à 08:57
Bonjour Alphonse,
Tu veux que la macro se lance si AL19 contient 20? ou AL + ligne active?
Si la la cellule de référence est fixe (ex : AL2 tout le temps, le code suivant est incomplet,mais tu peux le travailler, hésite pas à le dire
Si tu veux pour AL + ligneactive, ce que je pense,
Tu fait une boucle while, je précise je ne suis pas expert mais j'essai d'aider ^^
dim numligne as integer
numligne = 1
sheets("feuil2").range("A2").select
while activecell.range("A2")<> empty ' tant que la cellule active n'est pas vide
if sheets("feuil2").range("AL" & numligne) = 20
[tu met ton code]
end if
activecell.offset(1,0)?activate 'active la cellule suivante vers le bas
wend
Voila ensuite tu presse alt + F8 afin de lancer une fenêtre qui te permetra de mettre un raccourci sur ta macro
tu selectionne la macro puis tu fait option, tu choisi une lettre pour le raccourci.
A chaque fois que tu apuyera sur ce raccourci, la macro se lancera.
Bon tests
Necro27
Tu veux que la macro se lance si AL19 contient 20? ou AL + ligne active?
Si la la cellule de référence est fixe (ex : AL2 tout le temps, le code suivant est incomplet,mais tu peux le travailler, hésite pas à le dire
Si tu veux pour AL + ligneactive, ce que je pense,
Tu fait une boucle while, je précise je ne suis pas expert mais j'essai d'aider ^^
dim numligne as integer
numligne = 1
sheets("feuil2").range("A2").select
while activecell.range("A2")<> empty ' tant que la cellule active n'est pas vide
if sheets("feuil2").range("AL" & numligne) = 20
[tu met ton code]
end if
activecell.offset(1,0)?activate 'active la cellule suivante vers le bas
wend
Voila ensuite tu presse alt + F8 afin de lancer une fenêtre qui te permetra de mettre un raccourci sur ta macro
tu selectionne la macro puis tu fait option, tu choisi une lettre pour le raccourci.
A chaque fois que tu apuyera sur ce raccourci, la macro se lancera.
Bon tests
Necro27
Alphlof
Messages postés
2
Date d'inscription
mercredi 17 juin 2009
Statut
Membre
Dernière intervention
19 juin 2009
18 juin 2009 à 11:47
18 juin 2009 à 11:47
Merci pour ta réponse,
Mais il faut que la macro se lance automatiquement quand la cellule "AL19" a comme résultat 20, cette cellule a une formule: SI .....
NB Le problème c'est que l'écran tremble plusieurs seconde et empêche nouvelle entrée sur la feuille.
Bonne journée
Fony
Mais il faut que la macro se lance automatiquement quand la cellule "AL19" a comme résultat 20, cette cellule a une formule: SI .....
NB Le problème c'est que l'écran tremble plusieurs seconde et empêche nouvelle entrée sur la feuille.
Bonne journée
Fony
necro27
Messages postés
160
Date d'inscription
jeudi 28 mai 2009
Statut
Membre
Dernière intervention
11 février 2011
8
18 juin 2009 à 15:12
18 juin 2009 à 15:12
Désolé pour le retard
Peux tu me donner la formule qui est inscrite en AL19?
Sinon en faite si j'ai bien compris, tant que la cellule AL19 est vide, on ne fait rien, mais dès qu'elle prend la valeur 20 tu voudras lancer la macro c'est bien sa?
Peux tu me donner la formule qui est inscrite en AL19?
Sinon en faite si j'ai bien compris, tant que la cellule AL19 est vide, on ne fait rien, mais dès qu'elle prend la valeur 20 tu voudras lancer la macro c'est bien sa?
Alphlof
Messages postés
2
Date d'inscription
mercredi 17 juin 2009
Statut
Membre
Dernière intervention
19 juin 2009
19 juin 2009 à 11:41
19 juin 2009 à 11:41
Bonjour,
Pas de problème pour le retard, moi je travaille de 14 à 23 H donc pas tjs à l’ordi
Oui c’est cela, voici la formule le l’ai un peu simplifié pour les tests :
=SI(I25=0;20;0)
Bonne journée
Fony
Pas de problème pour le retard, moi je travaille de 14 à 23 H donc pas tjs à l’ordi
Oui c’est cela, voici la formule le l’ai un peu simplifié pour les tests :
=SI(I25=0;20;0)
Bonne journée
Fony