Discussion :

[Chappoe]

bonjour a tous,

Je travail actuellement sur une macro permettant de mettre en page une feuille excel.
le nom des colonnes de mon tableau est un numéro de semaine. La macro doit exécuter un autofill jusqu'au numéro de la dernière semaine spécifier en autorisant un changement d'année.

Pour cela j'ai trouvé la date du lundi de la 1er semaine et du lundi de la derniere.

et j'execute le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
date_fin = cells(8, 12 + nb_annee).value                
    date_debut = Range("L8").Value
    nb_col = ((date_fin - date_debut) / 7)

le problème est que la date_fin est entouré de guillement qui empeche la soustraction de date.

Quelqu'un aurait-il une idée?

Je vous remercie d'avance
Chappoe

[Dolphy35]

bonjour,

utilise Replace()

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
date_fin = Replace(Cells(8, 12 + nb_annee).Value, """", "")
    date_debut = Range("L8").Value
    nb_col = ((date_fin - date_debut) / 7)

@++