Tableau aleatoire automatique

Bonjour à tous

On me demande un tableau qui doit être établi sur 3 colonnes

date - temp matin - temp soir

ce tableau doit se remplir tout seul chaque jour, la date doit être celle du jour et les deux autres colonnes remplies de façon aléatoire d'un chiffre compris entre 1 et 16.

Au delà de la fonction "alea entre bornes" mon tableau est un peu plus compliqué. disons que temp matin doit s'inscrire vers 9h le matin et temp soir 18h. si le tableau est ouvert à 11h (par exemple) seule temp matin doit s'afficher.

je suppose qu'il faut ici une macro et là je ne sais pas faire

Est ce que cela est réalisable ? pouvez vous m'aider ?

merci par avance

Salut,

Je n'ai pas spécialement le temps de me pencher sur ton souci, mais si tu connais quelqu'un ou si quelqu'un du forum peux t'aider, voici un code qui permet de randomizé de la donnée.

A mon avis c'est une bonne base pour ce dont tu a besoin.

Sub Generateur_Code_Aleatoire()

'Variables
Dim Source_Char As String
Dim Code_Final As String
Dim Nombre_Aleatoire As Long

'Initialise la randomisation
Randomize

'Source sur laquel l'aléatoire se base
Source_Char = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"

'Vide une variable
Code_Final = ""

'Boucle de 1 a 10 pour avoir un code a 10 caractère
For i = 1 To 10

    'Défini un nombre aléatoire
    Nombre_Aleatoire = Int(Len(Source_Char) * Rnd) + 1

    'Rempli Code_Final petit a petit
    Code_Final = Code_Final & Mid(Source_Char, Nombre_Aleatoire, 1)

    'Si i = 5 on est a la moitier du code
    If i = 5 Then

        'ajoute un tiret
        Code_Final = Code_Final & "-"

    End If

Next

'Affiche le code
Range("E8:M10") = Code_Final

End Sub