Explication ligne de code Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
R
RIRI91
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 26 novembre 2013
Version d'Excel : 2010

Message par RIRI91 » 21 décembre 2013, 11:02

Bonjour,

Je suis novice dans le VBA, mais j'essaye de progresser.
J'ai récupérer une ligne de code, mais je ne comprend pas la signification et ce que ça fait.

Merci pour vos lumières.

Range("A5:C" & .Range("A" & Rows.Count).End(xlUp).Row + 1).ClearContents
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'726
Appréciations reçues : 2
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 21 décembre 2013, 11:07

Bonjour


La zone entre A5 et C (première ligne vide de la colonne A - celle après des données) est effacée
Image
R
RIRI91
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 26 novembre 2013
Version d'Excel : 2010

Message par RIRI91 » 21 décembre 2013, 11:10

Merci, pour cette explication,

Si je peut encore abusé de votre savoir?

ActiveWorkbook.Worksheets("A commander").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("A commander").Sort.SortFields.Add Key:=Range("C5") _
, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortTextAsNumbers
With ActiveWorkbook.Worksheets("A commander").Sort
.SetRange Range("A5:C" & Range("A" & Rows.Count).End(xlUp).Row)
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With

Merci vraiment.
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'726
Appréciations reçues : 2
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 21 décembre 2013, 11:25

Bonjour

C'est juste un tri du plus petit au plus grand de la zone A5:C (ligne de la dernière cellule non vide de la colonne A)

La clé de tri est la cellule C5
Image
R
RIRI91
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 26 novembre 2013
Version d'Excel : 2010

Message par RIRI91 » 21 décembre 2013, 11:44

Es ce qu'il n'y aurait pas une façon plus simple de faire un tri du plus petit au plus grand?
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'726
Appréciations reçues : 2
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 21 décembre 2013, 11:59

Bonjour

Bien sur quand le tri est simple on peut utiliser la méthode 2003
Sub Tri()
  With Sheets("A commander")
    .Range("A5:C" & .Range("A" & Rows.Count).End(xlUp).Row).Sort key1:=.Range("C5"), order1:=xlAscending, dataoption1:=xlSortTextAsNumbers, header:=xlNo
  End With
End Sub
Mais cela n'a aucune importance, c'est transparent pour l'utilisateur
Image
R
RIRI91
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 26 novembre 2013
Version d'Excel : 2010

Message par RIRI91 » 21 décembre 2013, 12:07

Merci.

J'espère ne pas vous déranger avec mon ignorance. j'apprend. :oops:
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message