Optimisation declaration variable code macro vba Fermé

Question

Bonjour, 

J'ai eu à déclarer de nombreuse variable dans une macro vba. Afin d'obtenir les données que je voulais, j'ai réalisé ce code :

    'Declaration Départ ArrS
        Rows("1:1").Select
        Selection.Find(What:="Arrivée", after:=ActiveCell).Activate
        ArrS = ActiveCell.Column

Or cela fait de nombreuses lignes de code car il y a beaucoup de variable. Serait il possible de réduire ce  code ? 

Merci à vous,
Configuration: Windows Vista / Internet Explorer 9.0

pijaku · Answer

Bonjour,

Si tu nous donnais tout le code?
 
Sinon :
'Declaration Départ ArrS
Rows("1:1").Select
Selection.Find(What:="Arrivée", after:=ActiveCell).Activate
ArrS = ActiveCell.Column 

peut s'écrire :
Dim ArrS As Integer
ArrS = Rows("1:1").Find(What:="Arrivée", after:=ActiveCell).Column
Qui est effectivement plus court, mais sujet à de nombreux risques de plantage...

Optimisation declaration variable code macro vba

1 réponse

Discussions similaires