Rentrer noms prénoms date de naissance
alaink54
-
alaink54 -
alaink54 -
Bonjour,
Je voudrais rentrer les noms prénoms et date de naissance en ligne et non pas en colonne c'est à dire que les noms seront sur la ligne 4, les prénoms sur la ligne 5, les date de naissance sur la ligne 6. J'ai fait ceci mais je ne sais pas sur quelle variable jouer pour inverser:
Sub trier()
Range("A2").Select
Application.DisplayAlerts = False
ActiveSheet.ShowDataForm
Application.DisplayAlerts = True
ActiveWorkbook.Worksheets("cycle1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("cycle1").Sort.SortFields.Add Key:=Range( _
"A2:A40"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("cycle1").Sort
.SetRange Range("A2:C40")
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
Merci par avance
Je voudrais rentrer les noms prénoms et date de naissance en ligne et non pas en colonne c'est à dire que les noms seront sur la ligne 4, les prénoms sur la ligne 5, les date de naissance sur la ligne 6. J'ai fait ceci mais je ne sais pas sur quelle variable jouer pour inverser:
Sub trier()
Range("A2").Select
Application.DisplayAlerts = False
ActiveSheet.ShowDataForm
Application.DisplayAlerts = True
ActiveWorkbook.Worksheets("cycle1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("cycle1").Sort.SortFields.Add Key:=Range( _
"A2:A40"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("cycle1").Sort
.SetRange Range("A2:C40")
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
Merci par avance
A voir également:
- Rentrer noms prénoms date de naissance
- Journal de naissance gratuit a imprimer - Télécharger - Histoire & Religion
- Comment changer sa date de naissance sur snap - Forum Snapchat
- Je me suis trompée sur la date de naissance comment le débloquer - Forum Snapchat
- Date de naissance - Forum Snapchat
- Le fichier contient une liste de prénoms. triez ce tableau par ordre alphabétique des prénoms - Forum Excel
2 réponses
Coucou,
Pour pouvoir t'aider, comment est constitué à la base ton tableau??
De plus, le code que tu as mis ne sert juste qu'à trier...
à la base en quelle colonne et/ou quelles lignes sont les noms, prénoms et dates de naissance?
Pour pouvoir t'aider, comment est constitué à la base ton tableau??
De plus, le code que tu as mis ne sert juste qu'à trier...
à la base en quelle colonne et/ou quelles lignes sont les noms, prénoms et dates de naissance?
alaink54
le 1er nom tapé sera en "A2" 1er prénom en "A3" et la date de naissance en "A4". J'ai changé a cause d'autres cases que je prévoie pour d'autres fonctions. Les autres noms suivront ensuite en "B2", "C2",... les autres prénoms en "B3", "C3",.... et les autres dates de naissance en "B4","C4",...Ce que j'ai fait en fait, fait ressortir une sorte de useform qui me permet de rentrer ma base de données "nom" "prénom""date de naissance"...
