traduction algo en vba svp

[xaviier]

salut le forum!
Je voudrais demander un petit service au expert excel de ce forum!
Etant donne que je début en excel j' avoue avoir un peu demal ac trrouver le code car je fais beaucoup derreur de syntaxe

QQ1 pourrais t'il m' aider a transcrire cela en vba ca m' aiderait beaucoup!


a= range("A5,C5,E5,G5,I5,K5,L5,N5,P5,Q5,S5").select

For i = 5 To 51 Step 1

Set newser = .SeriesCollection.newseries
newser.Values = a.Select

a = Range("A5+1, c5+1, E5+1, G5+1, I5+1, K5+1, L5+1, N5+1,P5+1,Q5+1, S5+1").Select

Next i

merci davance!^^
xav
ps ; coomprennez par A5+1= A(5+1) soit A6
voila remerci d' avance

 

[tao.tix]

pourquoi ne pas mettre tout simplement 6 au lieu de 5+1 car ça ne sert à rien ce que tu fais???

Pourrais tu joindre ton fichier zippé à ton post stp

Merci

 

[xaviier]

je ne met pas 6 car je dois faire 48 series par consequent cela risque detre un peu long! En effet g pour objectif de faire un planning identique a celui fourni en pieces jointes , et je t' avouerais que je rame bien , :-/
voila
en attendant ta reponse ^^
merci
xav

 

[xaviier]

perssone pour méD??
:'(