simplifacation de macro

clichy · 16 Juillet 2013

bonjour à tous,

merci pour votre forum, endroit de partage instructif
j'apprends, j'apprends

aujourd'hui, comment simplifier ma macro faite par l'enregistreur.

pourquoi une macro pour une liste déroulante? parce que j'ai +-30 liste à faire et que par les macro, ça doit être plus rapide. je sais faire par la validation de données mais un fainéant travaille pour aller plus vite et aussi bien voir mieux... non?

voici mon code

Code:

With Range("h29").Validation
    .Delete
    .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
    xlBetween, Formula1:="=liste!$AD$7:$AD$11"
   ' .IgnoreBlank = True
   ' .InCellDropdown = True
   ' .InputTitle = ""
   ' .ErrorTitle = ""
   ' .InputMessage = ""
   ' .ErrorMessage = ""
   ' .ShowInput = True
   ' .ShowError = True
End With

dailluers, quelle est la commande qui permet d'ecrire dans la cellule malgré les choix de liste?

merci à tous pour votre aide

Pierrot93 · 16 Juillet 2013

Re : simplifacation de macro

Bonjour,

essaye comme ceci :

Code:

    With Range("D9").Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertWarning, Operator:= _
    xlBetween, Formula1:="=liste!$AD$7:$AD$11"
    End With

dailluers, quelle est la commande qui permet d'ecrire dans la cellule malgré les choix de liste?

c'est l'alerte... "xlValidAlertWarning"

bonne soirée
@+

clichy · 16 Juillet 2013

Re : simplifacation de macro

merci beaucoup pour cette réponse rapide

et pour autoriser d'ecrire dans la cellule ou il y a la liste?

Code:

xlValidAlertWarning

ne l'autorise pas
quelles sont les autres options?

Pierrot93 · 17 Juillet 2013

Re : simplifacation de macro

Bonjour,

bah... comprends pas... fonctionne chez moi sous 2003 et sous 2010.... mais attention, tu as un message d'alerte auquel il faut répondre, mais la valeur que tu as saisie est bien prise en compte.... A noter, un autre choix avec "xlValidAlertInformation", la difference réside dans les messages.... mais idem tu peux "forcer" la saisie....

bonne journée
@+

clichy · 17 Juillet 2013

Re : simplifacation de macro

Bonjour,

Je n'avais pas exécuté la macro...

En effet ça marche
Est il possible de ne pas avoir le message?

Merci beaucoup pour ton aide

Pierrot93 · 17 Juillet 2013

Re : simplifacation de macro

Re,

rajoute ceci :

Code:

        .ShowError = False

clichy · 17 Juillet 2013

Re : simplifacation de macro

Arfff

J'ai cherché longtemps en plus!
Merci beaucoup

simplifacation de macro

clichy

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

clichy

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

clichy

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

clichy

XLDnaute Junior

Discussions similaires