Boucle afficher plusieurs fois la même valeur

Fermé

Prunett Messages postés 30 Date d'inscription jeudi 5 mars 2015 Statut Membre Dernière intervention 12 mai 2015 - 12 mai 2015 à 20:26
NHenry Messages postés 15194 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 23 février 2025 - 15 mai 2015 à 17:28

Bonjour,

J'aimerais réaliser une boucle qui me permettent de prendre pour le jour 1 la température moyenne associée et de l'appliquer 24 fois dans une autre colonne et cela pour l'ensemble des jours de l'année.

En vous remerciant d'avance,

A voir également:

Boucle afficher plusieurs fois la même valeur
Je suis une chose que les garçons utilisent deux fois par jour et les filles une fois toute leur vie - Forum Loisirs / Divertissements
Qu'est ce qu'une femme fait 3 fois par jour et un homme une fois dans sa vie ✓ - Forum Google Chrome
Afficher mot de passe wifi android - Guide
Devinette ✓ - Forum Loisirs / Divertissements

1 réponse

Réponse 1 / 1

NHenry Messages postés 15194 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 23 février 2025 353
12 mai 2015 à 20:40

Selon le théorème de CCM, toute demande d'aide au devoir finit implacablement plongée dans les profondeurs des messages hors sujets.
Sur ce, je vous invite à prendre connaissance de cette information concernant vos demandes de devoirs.

Prunett Messages postés 30 Date d'inscription jeudi 5 mars 2015 Statut Membre Dernière intervention 12 mai 2015
12 mai 2015 à 20:43

Bonsoir,

Mais ce n'est pas pour un devoir mais bien un projet au bureau. On me demande de simplifier le travail en réalisant un outil informatique, cependant je ne suis absolument pas douée car je découvre sur le tas.
J'ai déjà essayé de réfléchir au problème et cela ne me mène à rien. J'appelle la valeur et en revanche je l'affiche 8760 (24*365) et non 24 fois, puis j'appelle la deuxième.
Je pourrai tout aussi bien le faire à la main, mais je trouve ça très bête et peu efficace.
J'ai déjà demandé de l'aide pour les boucles, mais je n'arrive vraiment pas à cerner le langage et à reproduire le processus pour un autre modèle.

NHenry Messages postés 15194 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 23 février 2025 353
12 mai 2015 à 20:45

As-tu essayé de faire quelque chose, de te documenter sur VBA, d'enregistrer une Macro et de voir le code ?

Prunett Messages postés 30 Date d'inscription jeudi 5 mars 2015 Statut Membre Dernière intervention 12 mai 2015
12 mai 2015 à 20:45

J'avais pensé à ce code :

Option Explicit
Option Base 1

Sub Tmaxmin_jour()
Dim Derlig As Integer, Nbre_jours As Integer
Dim lig As Integer, Jour As Integer, T_jour, T_temp, T_out
Dim tab_temp(8760) As Variant

'initialisations

    Application.ScreenUpdating = False
    'nettoyage tableau résultats
    Range("H3:L370").ClearContents
    Derlig = Columns("A").Find("*", , , , , xlPrevious).Row
    Nbre_jours = (Derlig - 1) / 24 ' prendre en compte année bissectiles
    ReDim T_out(Nbre_jours, 5) 'champ2=jour, 1=mois 3:maxi,4: mini, 5 moyenne
    
'------Mémorisation des températures maxi/mini/moyenne par jour/mois
    For lig = 2 To Derlig Step 24
        Jour = Jour + 1
        T_jour = Range(Cells(lig, "A"), Cells(lig, "B"))
        T_temp = Range(Cells(lig, "D"), Cells(lig + 23, "D"))
        T_out(Jour, 1) = T_jour(1, 1)
        T_out(Jour, 2) = T_jour(1, 2)
        T_out(Jour, 3) = Application.Max(T_temp)
        T_out(Jour, 4) = Application.Min(T_temp)
        T_out(Jour, 5) = Application.Average(T_temp)
        tab_temp(Jour) = T_out(Jour, 5)
        
    Next
'-----Restitutions des mesures
    Range("H3").Resize(UBound(T_out), 5) = T_out
    Range("O2").Resize(UBound(tab_temp)) = tab_temp
End Sub

NHenry Messages postés 15194 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 23 février 2025 353
15 mai 2015 à 17:28

Et en quoi se code ne te satisfait-il pas ?

Discussions similaires

Que peut faire 3fois/j un homme, mais qu'1fois/j une femme

Bonjour,

devinette:qu'est ce qu'un homme peut faire trois fois par jour,et que la femme ne fait qu'une seul fois dans sa vie?

imprimer plusieurs fois la meme photos sur la meme page

bonjour,

j'utilise windows 7 et parfois windows 8. Mon imprimante est une canon.

Je voudrais imprimer plusieurs fois la même photo sur une page.

Comment faire? Existe t il un logiciel pour ça?

Merci de me dire oui ou non. si oui lequel?

Merci de vos conseils.

cordialement

Gaoule

Cellules en surbrillance selon une TextBox

Bonjour à tous,

Voici mon problème : j'ai une liste d'utilisateurs dans une TextBox. Chaque utilisateur est lié à plusieurs références listées sur la feuille 'Principal'.
Est-il possible de mettre en surbrillance (police en gras ou coloriage temporaire de la cellule) toutes les références liées à un utilisateur choisi dans la TextBox ?

Une copie d'écran pour me faire comprendre (enfin j'espère !)

Merci pour votre aide !
Wyrgle

paiment 4x nickel sur top achat

bonjour après avoir était refusé 2-3 fois par top achat pour mes paiement je me suis demandé si le problème venez de la carte nickel j'ai bien le plafond assez haut pour l'achat,assez d'argent déposer sur le compte et jamais eu de problème avec top achat

additionner nombres dans cellules avec texte

Bonjour à tous,
Je vous contacte car je n'ai pas trouvé la solution à mon problème.
J'ai vu des posts qui s'en rapprochaient mais pas réussi à mettre en œuvre :/

J'ai deux colonnes contenant texte et chiffres et souhaite "simplement" additionner les chiffres afin de contrôler si les totaux sont bons.
Voilà ce que j'ai :
Existe [3] N'existe pas [223]
Existe [185] N'existe pas [41]
Existe [10] N'existe pas [216]
Existe [21] N'existe pas [205]
Existe [6] N'existe pas [220]
Existe [6] N'existe pas [220]
Existe [1] N'existe pas [225]
Existe [1] N'existe pas [225]
Existe [1] N'existe pas [225]