Déclarer une variable

Bonsoir a tous, forum bonsoir,

Je souhaiterai déclarer une variable mais en évitant le répétitif, si bien sur cela est possible.

et puis pour les affichées Exemple Range("D4")=Mess1

Quel serait le mieux et plus court ???

          Dim Mess1, Mess2, Mess3, Mess4, Mess5, Mess6, Mess7 As String

          Mess1="Lundi"
          Mess2="Mardi"
          Mess3="Mercredi"

''''''''''''''''''''''''''''''''''''''''

          Dim Mess(T) as string

et pour afficher Exemple

T=4

Range("D4")=MessT

Merci pour votre aide et vos conseils.

Cdly Ray

bonsoir,

par exemple

Dim mess(1 to 7)

mess(1)="Lundi"
mess(2)="Mardi"
'etc ..

t=4
range("D4")=mess(t)

Bonjour Eliot raymond,

Evidemment le code 2 est plus court. Surtout lorsqu'il y a beaucoup de messages.

Mettre les textes dans une colonne sur plusieurs lignes. En plus si tu commences par Lundi puis en dessous Mardi et que tu copie en tirant vers le bas dès la case Lundi. Tu auras tous les jours de la semaine.

Ensuite tu fais une boucle

Sub Jours()
Dim Mess(6)
For Lig=1 to 7
Mess(Lig-1)=Range("A" & Lig) 
Next Lig

Et c'est fait.

Bonne continuation.

Bonjour,

Une bonne ou mauvaise intuition ?

Cdlt.

Dim dtm As String
dtm = Format(VBA.Weekday(VBA.Date, 2), "dddd")
'dtm = WorksheetFunction.Proper(dtm)

Bonjour,

Je souhaiterai déclarer une variable...

Dans cas la 1ère chose à faire est de s'informer et de lire qq tutos pour connaitre les bases.

Par exemple Dim Mess1, Mess2, Mess3, Mess4, Mess5, Mess6, Mess7 As String ne fait pas ce que tu crois qu'elle fait....

Le plus court que j'ai :

Dim mess(1 To 7) As String, i As Long
For i = 1 To 7: mess(i) = Application.Proper(Format(i + 1, "dddd")): Next i

eric

Salut a vous,

Jean-Eric et eriiic merci a vous pour vos réponses.

Mais pas besoin de code pour la date, mais merci quand même ça peut servir

X Cellus et H2so4 merci également ça fonctionne

Merci a tous pour ces infos et codes.

Je vous souhaite a tous la bonne soirée et merci.

Cdlt Ray

Pourquoi avoir mis les jours de la semaine si ce n'est pas ce que tu veux ??

Salut eriiic

Juste pour exemple, j'aurai pu mettre des prénoms, désoler de t'avoir induit en erreur.

Merci de t'intéresser sur le sujet, c'est sympa.

Bonne soirée.

Cdlt Ray

Re,

@eriiic,

Avec Ray, il faut faire preuve d'imagination...

Cdlt.

Salut eriiic et Jean-Eric,

Je le prends comme un compliment, mais avec l'âge, j'ai de plus en plus de neurones qui se touchent.

Et pourtant, je me soigne tout les jours a 12 h et 19 h.

Cdlt Ray

Quand tu donnes un exemple il faut éviter de donner un cas particulier.

Si tu dis j'ai 1 , 3, 12 etc on va en déduire que ce sont des nombres. Tu vas revenir en disant "ah oui mais j'ai aussi chaton, train ou autre chose..."

Rester général, compléter ensuite avec les exceptions et cas particulier.

C'est comme ça que chacun gagne du temps, toi en premier.

eric