VBA remplacer 1 de A1 par le chiffre d'une autre cellule

lolodepau · 25 Mai 2012

Bonjours a tous,
Je voudrais remplacer le 25 de H25 par le nombre se trouvant dans la cellule J5.
Merci

Sub xxxxxxxx()
'
' xxxxxxxx Macro
'

'
Range("A1:H25").Select
Selection.Copy
Sheets("Données 1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub

Pierrot93 · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

Bonjour,

essaye ceci :

Code:

Range("A1:H" & Range("J5").value).Select

supposant une valeur correcte dans la cellule en question...

bonne journée
@+

lolodepau · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

Merci bien, Bonne journée !

lolodepau · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

et comment faire si le nombre se trouve dans la celule J5 mais d'un autre onglet ??

lolodepau · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

Help Me

Pierrot93 · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

Re,

modifie comme suit :

Code:

Range("A1:H" & Sheets("NomFeuille").Range("J5").value).Select

lolodepau · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

Et si je veux le A1 d'un autre onglet ???

tu pense cela correct ?

Sheets("Nomfeuille1").Range("A1:H" & Sheets("NomFeuille2").Range("J5").value).Select

Pierrot93 · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

Re,

tu pense cela correct ?

bah oui... un petit test te le confirmera tout de suite... ou pas d'ailleurs.... lol

lolodepau · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

Ca ne marche pas Pierrot

lolodepau · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

Help me

Pierrot93 · 25 Mai 2012

Re : VBA remplacer 1 de A1 par le chiffre d'une autre cellule

Re,

la synthaxe est bonne, mais ne fonctionnera que si la feuille "Nomfeuille1" est active, sinon il y a lieu de l'activer au préalable...

VBA remplacer 1 de A1 par le chiffre d'une autre cellule

lolodepau

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

lolodepau

XLDnaute Junior

lolodepau

XLDnaute Junior

lolodepau

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

lolodepau

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

lolodepau

XLDnaute Junior

lolodepau

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

Discussions similaires