je ne comprend pas la formule VBA

[tiphanie]

Bonjour,

J'ai fait une macro mais je ne comprends pas la formule
pourriez-vous me l'expliquer.

Range('E2:E14').Select
Selection.DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, _
Trend:=True
End Sub

Merci d'avance,

Tiphanie

 

[bebere]

bojour Tiphanie,le Forum

3 procédures pour illustrer l'emploi DataSeries
curseur devant DataSeries et F1 pour aide

Sub SerieJours()
Dim DateRange As Range
'dimension plage arrête la série
Set DateRange = Worksheets('Feuil1').Range('E1:E31')
'début de la série
Worksheets('Feuil1').Range('E1').Value = '01/01/2005'
DateRange.DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, _
Trend:=True
End Sub

Sub SerieFinMois()
Dim DateRange As Range
'dimension plage arrête la série
Set DateRange = Worksheets('Feuil1').Range('F1:F12')
'début de la série
Worksheets('Feuil1').Range('F1').Value = '01/01/2005'
DateRange.DataSeries Type:=xlChronological, Date:=xlMonth, _
Trend:=True
End Sub

Sub SerieDebutMois()
Dim DateRange As Range
'dimension plage arrête la série
Set DateRange = Worksheets('Feuil1').Range('G1:G12')
'début de la série
Worksheets('Feuil1').Range('G1').Value = '01/01/2005'
DateRange.DataSeries Rowcol:=xlColumns, Type:=xlChronological, Date:=xlMonth, _
Trend:=False
End Sub
j'ai aussi appris,grâce à ta question
à bientôt