voilà mon souci
je veux copier une cellule en feuille 3
et la coller en dernière ligne de ma feuil 1 mais décaler a droite en gros au lieu de "A6" La coller" B6"
Re : copier une cellule et la coller décaler a droite
Voici ta réponse :
Code:
Sub decale()
dim LastRow as String
Sheets("Feuil3").Select
Range("b1").Select
Selection.Copy
Sheets("feuil1").Select
LastRow = Range("A" & Rows.Count).End(xlUp).Row + 1
Feuil1.Range("B" & LastRow).Select
ActiveSheet.Paste
End Sub
Voilà, avec ca normalement ça marche, chez moi en tout cas oui.
Re : copier une cellule et la coller décaler a droite
Et pour explication, tu va enregistrer dans la variable LastRow le numéro de la dernière ligne non vide et lui rajouter 1 pour être en dessous. Et tu lui dit ensuite que tu veux coller en "B" & LastRow (ta variable contenant le numéro de ta ligne voulue).
Voilà. En espérant être clair dans mes explications. Si ce n'est pas la cas n'hésite pas à demander.
Re : copier une cellule et la coller décaler a droite
Re le Fil
Non non Anthony ne sort pas bien au contraire c'est en répondant qu'on devient Barbatruc . Plus sérieusement si à mon 4ème post j'avais pondu un tel code j'aurais été très fier.
Re : copier une cellule et la coller décaler a droite
bonsoir anthony
bonsoir dull
merci de vos réponses
en fait répondre j'ai pris celle a anthony qui marche très bien
car la tienne ne fonctionne pas pareil peut être que je m'y prends mal !
mais l'important c'est que ça fonctionne et ça fonctionne a merveilles
donc un grand merci a tous les deux