Bonjour à tous,
J'ai besoin de votre aide pour comprendre pourquoi le code ci-dessous ne fonctionne pas. Il bugue lorsque j'affecte la variable sur la ligne "cells (Nlig,4).select " Je joins un fichier pour plus de compréhension
Dim Nlig As Variant.
Nlig = "=Match(Paul, Liste, 0)"
Range("a10").Select
Selection = Nlig
Sheets("Forme").Select
ActiveSheet.Shapes.Range(Array("Isosceles Triangle 1")).Select
Selection.Copy
Sheets("Feuil1").Select
Cells(Nlig, 4).Select
ActiveSheet.Paste
Selection.ShapeRange.IncrementTop 2.25
a +
J'ai besoin de votre aide pour comprendre pourquoi le code ci-dessous ne fonctionne pas. Il bugue lorsque j'affecte la variable sur la ligne "cells (Nlig,4).select " Je joins un fichier pour plus de compréhension
Dim Nlig As Variant.
Nlig = "=Match(Paul, Liste, 0)"
Range("a10").Select
Selection = Nlig
Sheets("Forme").Select
ActiveSheet.Shapes.Range(Array("Isosceles Triangle 1")).Select
Selection.Copy
Sheets("Feuil1").Select
Cells(Nlig, 4).Select
ActiveSheet.Paste
Selection.ShapeRange.IncrementTop 2.25
a +
Pièces jointes
Dernière édition: