Complément de code VBA
Résolu
JCB40
Messages postés
3465
Date d'inscription
Statut
Membre
Dernière intervention
-
JCB40 Messages postés 3465 Date d'inscription Statut Membre Dernière intervention -
JCB40 Messages postés 3465 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai cette macro qui fonctionne bien,mais je n'arrive pas à mettre un complément de code
pour que le curseur se mette sur la première cellule vide en colonne B.
Si vous avez une idée je suis preneur
Cordialement
J'ai cette macro qui fonctionne bien,mais je n'arrive pas à mettre un complément de code
pour que le curseur se mette sur la première cellule vide en colonne B.
Si vous avez une idée je suis preneur
Cordialement
Sub tri()
'
' tri Macro
Sheets("Saisie").Range("B3:M969").Select
ActiveWorkbook.Worksheets("Saisie").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Saisie").Sort.SortFields.Add Key:=Range("B3"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Saisie").Sort
.SetRange Range("B3:M969")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
Configuration: Windows / Firefox 70.0
A voir également:
- Complément de code VBA
- Code ascii - Guide
- Code puk bloqué - Guide
- Code de déverrouillage oublié - Guide
- Code activation windows 10 - Guide
- Scanner qr code pc - Guide
2 réponses
Bonjour,
Un code du genre devrait correspondre à ton besoin
Un code du genre devrait correspondre à ton besoin
ActiveSheet.Cells(Rows.Count, "B").End(xlUp)(2).Select
merci pour ta réponse
ou placer le code ,je l'ai mis avant .Apply mais ça ne fonctionne pas.
Crdlt