Traduction de code en vba Fermé

Question

Bonjour,

Pouvez -vous me traduire cette algorithme en code VBA excel.

J'ai une colonne "n.semaine"
Une autre "sélec s"

Voici le code:

Début

Pour chaque cellule de la colonne M jusqu'à la ligne 367 
numérosemaine = valeur de la cellule X de la colonne M

valeur de la cellule X de la colonne P =  "semaine" numérosemaine
 Fin

 Je sais pas si c'est vraiment e bon algorithme mais en gros je veux que la cellule X de la colonne P soit égale à "semaine " + n°semaine . Lee n°semaine se trouvant dans la colonne M et évoluant de 1 à 53 .

dandypunk · Answer

Essayes cela

Sub RemplirColonne()

Dim iIndex As Integer
Dim sNoSemaine As String

    For iIndex = 1 To 367
        sNoSemaine = Cells(iIndex, 13).Value 'On récupère la valeur l'une cellulle de la colonne 13 (M)
        Cells(iIndex, 16).Value = "Semaine " + sNoSemaine 'On affecte la colonne 16 (P)
    Next

End Sub

Traduction de code en vba

1 réponse

Discussions similaires

Newsletters