Changement de plage

Bonsoir excel pratique

Bonsoir a tous

Svp si pouvez m'aidez a changer ce code pour que les noms du jour s'affichent dans la colonneA ..dans la plage (A1:A7)..

Avec ce code les noms du jours s'affichent dans la plage (A1:G1)..

Merci d'avance pour l'aide

AKRAMI

Bonjour

Sub AKRAMI()
Dim myArray() As Variant
myArray = Array("Dimanche", "Lundi", "Mardi", "Mercredi", "Jeudi", "Vendredi", "Samedi")
Range("A1:A7").Value = Application.Transpose(myArray)
End Sub

Cordialement

Bonsoir Amadéus

Merci beaucoup pour votre aide

Merci pour votre code simple et efficace

Cordialement

AKRAMI

Bonjour

Modifie ainsi ta macro :

Sub AKRAMI()
Dim myArray() As Variant
myArray = Array("Dimanche", "Lundi", "Mardi", "Mercredi", "Jeudi", "Vendredi", "Samedi")
Range("A1:A7") = Application.Transpose(myArray)

End Sub

Bye !

gmb a écrit :

Bonjour

Modifie ainsi ta macro :

Sub AKRAMI()
Dim myArray() As Variant
myArray = Array("Dimanche", "Lundi", "Mardi", "Mercredi", "Jeudi", "Vendredi", "Samedi")
Range("A1:A7") = Application.Transpose(myArray)

End Sub

Bye !

Bonsoir gmb

Merci pour votre idee

Merci beaucoup

Cordialement

AKRAMI