With ActiveChart .HasTitle = True .ChartTitle.Characters.Text = "titre du graph" .Axes(xlCategory, xlPrimary).HasTitle = True .Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "titre des abscisses" .Axes(xlValue, xlPrimary).HasTitle = True .Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "titre des ordonnées"
With ActiveChart .HasTitle = True .ChartTitle.Characters.Text = "titre du graph" .Axes(xlCategory, xlPrimary).HasTitle = True .Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "titre des abscisses" .Axes(xlValue, xlPrimary).HasTitle = True .Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "titre des ordonnées"
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questiondim i as integer for i= 0 to 100 if range("A1").offset(i).value =0 then range("B1").offset(i).value= "désactivé" elseif if range("A1").offset(i).value =1 then range("B1").offset(i).value= "partiellement activé" elseif if range("A1").offset(i).value =2 then range("B1").offset(i).value= " activé" end if next i