Bonjour à tous!
Bonnes fêtes à tous!!
J'ai besoin de votre aide pour un projet vba..
Je dois afficher des numéros de semaines en haut de colonnes pour faire un tableau
L'utilisateur doit pouvoir rentrer le numéro de la première semaine et le numéro de la dernière dans un userform
en gros je commence par créer le tableau pour la première semaine (initialisation); je copie/colle par un Range.copy puis Range.select pour le nombre de semaines nécessaire; puis je renomme les case de la première ligne avec "semaine X" qui correspond.
La où ca bloque c'est la boucle pour nommer les semaines et avancer à la colonne suivante:
Ya une partie du code en mode commentaire parceque j'avais essayé ave une boucle For mais bon.. ca n'a malheureusement pas marché... mais je le laisse au cas ou
Bonnes fêtes à tous!!
J'ai besoin de votre aide pour un projet vba..
Je dois afficher des numéros de semaines en haut de colonnes pour faire un tableau
L'utilisateur doit pouvoir rentrer le numéro de la première semaine et le numéro de la dernière dans un userform
en gros je commence par créer le tableau pour la première semaine (initialisation); je copie/colle par un Range.copy puis Range.select pour le nombre de semaines nécessaire; puis je renomme les case de la première ligne avec "semaine X" qui correspond.
La où ca bloque c'est la boucle pour nommer les semaines et avancer à la colonne suivante:
Code:
' * INSERTION # semaine *
Dim Col As Integer
Dim k As Integer
'For k = UserForm1.TextBox2.Value +1 To UserForm1.TextBox3.Value
'la première semaine à déja été creer d ou le +1 - tetbox2 donne le numero de la première semaine et texbox3 la dernière
Col = 6 'avant ya d'autre cellules occupées
k = UserForm1.TextBox2.Value + 1
While k < UserForm1.TextBox3.Value
Cells(1, Col).Value = "semaine " & k
Col = Col + 1
k = k + 1
Wend
'Next Col
Ya une partie du code en mode commentaire parceque j'avais essayé ave une boucle For mais bon.. ca n'a malheureusement pas marché... mais je le laisse au cas ou