bonjour,
dans un meme classeur:
je dois recopier des cellules de l'onglet s52 (cellule en vertical)
vers un onglet :recap sem (cellule à recopier en vertical)
voici la macro
'copie
Range("i10:i26").Select
Selection.Copy
Sheets("recap sem").Select
ddate = Date
sem = Format(ddate, "ww", vbMonday, vbFirstFourDays)
Range("c10").Offset(0, sem).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
mais avec cette macro elle recopie sous la sem 52 les chiffres en horizontal
comment faire pour copier la serie d echiffres en vertical?
a+
dans un meme classeur:
je dois recopier des cellules de l'onglet s52 (cellule en vertical)
vers un onglet :recap sem (cellule à recopier en vertical)
voici la macro
'copie
Range("i10:i26").Select
Selection.Copy
Sheets("recap sem").Select
ddate = Date
sem = Format(ddate, "ww", vbMonday, vbFirstFourDays)
Range("c10").Offset(0, sem).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
mais avec cette macro elle recopie sous la sem 52 les chiffres en horizontal
comment faire pour copier la serie d echiffres en vertical?
a+