Bonjour à tous
j'ai un problème pour coller une forme dans une cellule. En théorie c'est simple, le code ci-dessous fonctionne. Il permet de coller un triangle jaune dans les cellules prévues mais, le triangle est centré dans la cellule alors que je voudrais un qu'il soit en bas de la cellule (horizontal)
ActiveSheet.Shapes.Range(Array("AutoShape 152")).Select
Selection.Copy
Sheets("planning").Select
ActiveSheet.Paste Cells(ligPolySt, 3) 'Lundi
ActiveSheet.Paste Cells(ligPolySt, 4) 'Mardi
ActiveSheet.Paste Cells(ligPolySt, 5) 'mercredi
ActiveSheet.Paste Cells(ligPolySt, 7) 'vendredi
Merci d'avance pour vos conseil
a+ Gérard
j'ai un problème pour coller une forme dans une cellule. En théorie c'est simple, le code ci-dessous fonctionne. Il permet de coller un triangle jaune dans les cellules prévues mais, le triangle est centré dans la cellule alors que je voudrais un qu'il soit en bas de la cellule (horizontal)
ActiveSheet.Shapes.Range(Array("AutoShape 152")).Select
Selection.Copy
Sheets("planning").Select
ActiveSheet.Paste Cells(ligPolySt, 3) 'Lundi
ActiveSheet.Paste Cells(ligPolySt, 4) 'Mardi
ActiveSheet.Paste Cells(ligPolySt, 5) 'mercredi
ActiveSheet.Paste Cells(ligPolySt, 7) 'vendredi
Merci d'avance pour vos conseil
a+ Gérard