Macro référence au contenu d'une cellule

[Ontrose]

BOnjour forum

Petite question aujourd'hui :
J'ai une cellule qui renvoie un numéro de ligne en O3.
(Obtenue comme ça au passage : =EQUIV(C3;Base!B:B;0) )
Je voudrais faire référence à une cellule composé de la colonne B et de ce numéro de ligne :
Si O3 contient 16, eh bien je veux faire référence à la cellule B16.

Ce afin de coller une plage de valeurs à partir de B16 (et donc écraser les données précédentes !!)

Une idée ?

Ontrose, bien à vous !

[Nad-Dan]

Bonjour,

Comme ceci par code :

Code: Tout sélectionner

Sub test()
'Dan pour Ontrose
Dim lig As Integer
lig = Range("O3")
Range("plage de valeur").Copy Destination:=Range("B" & lig)
End Sub

avec Plage de valeur à remplacer pour ce que tu veux coller à partir de B16

Amicalement

Dan

[Ontrose]

SAlut Dan !

Merci pour ton code !
Juste une petite précision, si je dois réaliser un collage transposé et uniquement des valeurs, je dois modifier le code "destination" ?
De ce style ?

Code: Tout sélectionner

Range("plage de valeur").Copy Destination:=Range("B" & lig).PasteSpecial(xlPasteValues, , ,Transpose = true

Ontrose

[Nad-Dan]

re,

Là je ne vois pas ce que tu cherches à faire exactement ..
Ce qu'il faut savoir c'est la plage que tu copies et vers où dans la feuille.

Sinon si tu fais un collage spécial, il faut soit lire la cellule et la copier vers la cellule de destination ou prendre la plage complète et faire un genre de code comme celui ci-dessous :

Code: Tout sélectionner

Sub test()
'Dan pour Ontrose
Dim lig As Integer
lig = Range("O3")
Range("plage de valeur").Copy
Range("B" & lig) .PasteSpecial Paste:=xlValues, Operation:=xlNone, Transpose:=True
End Sub

Dan

[Ontrose]

Re !
Merci de ton aide
J'essaye ton code là, bon je butte un peu mais c'est que de la syntaxe, l'esprit est là !
Vraiment merci ton code est impeccable Dan.

Bonne journée, si ça t'intéresse je te donnerais des nouvelles plus tard dans la journée

Ontrose