Copier une cellule à l'aide d'un bouton/macro

Résolu/Fermé
nemotri Messages postés 175 Date d'inscription dimanche 9 août 2009 Statut Membre Dernière intervention 8 décembre 2017 - 4 sept. 2009 à 18:35
nemotri Messages postés 175 Date d'inscription dimanche 9 août 2009 Statut Membre Dernière intervention 8 décembre 2017 - 4 sept. 2009 à 19:42
Bonjour,

Voilà je souhaiterai, en cliquant sur un bouton qui répond à une macro, qu'une cellule située en D3 de la page précédente (par rapport à la feuille active où se trouve le bouton) soit copiée en F3 de ma page active.

J'ai essayé la formule suivante :

Sub Copier_Cellule ()
ActiveWorkbook.Sheets(feuille).Range("F3").Value=ActiveWorkbook.Sheets(feuille -1).Range("D3").Value
End sub


Est-ce le terme "value" qui ne correspond pas ?

je précise que le genre de cellule que je veux copier comporte du texte, genre :
"50 cr + 75 dos + 104N r : 10 secondes"

Merci d'avance de votre aide.
Boris.
A voir également:

1 réponse

pilas31 Messages postés 1825 Date d'inscription vendredi 5 septembre 2008 Statut Contributeur Dernière intervention 24 avril 2020 643
4 sept. 2009 à 18:42
Bonjour,

Il manque juste l'initialisation du numéro de feuille :

Sub Copier_Cellule()
feuille = ActiveSheet.Index
ActiveWorkbook.Sheets(feuille).Range("F3").Value = ActiveWorkbook.Sheets(feuille - 1).Range("D3").Value
End Sub


A+
0
nemotri Messages postés 175 Date d'inscription dimanche 9 août 2009 Statut Membre Dernière intervention 8 décembre 2017 35
4 sept. 2009 à 19:42
Ok merci et désolé pour cette question basique, je crois que je serai un éternel débutant en vba
0