Excel Macro

Soko75 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
 Soko75 -
Bonjour,

J'ai un problème très simple et à la limite du ridicule.

Sur la Feuille 1 j'ai une fiche avec Nom, Prénom et Age à renseigner, en cliquant sur un bouton je souhaiterai que c'est informations ce colle dans un tableau à la Feuille 2 sans qu'elle supprime ma première ligne.

Je ne souhaite pas passer par du UserForm.

Si qql peut m'aider please.

voilà mon fichier :
https://mega.nz/#!Q8IR0aoY!6d_KHIN7D3XVEGw_mN1QCBaqFAJ5fyaTgcf-59LbMqs

Merci.
A voir également:

1 réponse

Réponse 1 / 1
Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour, 

Sub Macro1()
    Sheets("Fiche").Range("B1:B3").Copy
    With Sheets("Base de donnée")
        .Range("A" & .Range("A" & Rows.Count).End(xlUp).Row + 1).PasteSpecial , Transpose:=True
    End With
    Application.CutCopyMode = False
    Sheets("Fiche").Range("B1:B3").ClearContents
End Sub

A+
1
Soko75
 
Merci !
0

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro
vincentphilippos -
tontong -

6 réponses