VBA définir une plage par rapport au chiffre dans une cellule
Bonjour,
Dans:
For Each c In [Aj9:Aj2000]
Je cherche à remplacer le 2000 par le chiffre indiqué dans la cellule A1 de la feuille1.
On aurait donc
For Each c In [Aj9:Aj(chiffre de la cellule A1]
Quelqu'un peut il m'aider ?
Cordialement
Bonjour,
Dim maplage as string
Dim X as long
X=range("A1")
maplage=Range("cells(9, 36):cells(X, 36)")
For Each c In maplageOops j'avais inversé ligne et colonne
Voilà ce que ça donne:
X = Worksheets("1. Info Site").Range("E19")
maplage = Range("cells(9, 36):cells(X, 36)")
For Each c In maplage
c = c.Formula
J'ai mis le chiffre 100 dans la cellule E19 de l'onglet 1. Info Site.
Malheureusement, il me dit qu'il y a une erreur de compilation:
For each ne peut itérer que sur un objet collection ou un tableau
J'ai remplacé Dim maplage as string par Dim maplage As Range mais ca ne marche pas non plus
Dim c As Range
Dim X As Long
X = Worksheets("1. Info Site").Range("E19")
For Each c In Range(Cells(9, 36), Cells(X, 36))
Cela fonctionne. Je te remercie.
Content que cela fonctionne
Mais avec maplage cela devait aussi fonctionner c'est juste une erreur de frappe
maplage = Range("cells(9, 36):cells(X, 36)")
pas correct
maplage=Range(Cells(9, 36), Cells(X, 36))
Correct