Copier-coller dernière ligne
Fermé
nonotte
-
8 août 2010 à 21:48
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 10 août 2010 à 08:59
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 10 août 2010 à 08:59
A voir également:
- Copier-coller dernière ligne
- Copier coller pdf - Guide
- Aller à la ligne excel - Guide
- Historique copier-coller android - Guide
- Symbole clavier copier coller - Guide
- Coeur vide copier-coller ✓ - Forum Réseaux sociaux
1 réponse
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 752
10 août 2010 à 08:59
10 août 2010 à 08:59
Bonjour,
Cette petite macro, lance une InputBox pour la sélection, et copie/colle le résultat dans la feuille "Feuil3" (à adapter à ta situation) :
Cette petite macro, lance une InputBox pour la sélection, et copie/colle le résultat dans la feuille "Feuil3" (à adapter à ta situation) :
Sub CopierColler() Dim monchamp As Range 'code de l'Inputbox trouvé ici : 'http://boisgontierjacques.free.fr/pages_site/inpubox.htm On Error Resume Next Set monchamp = Application.InputBox(prompt:="Choisissez un champ", Type:=8) If Err = 0 Then On Error GoTo 0 monchamp.Copy Sheets("Feuil3").Range("A65536").End(xlUp).Offset(1, 0) End If End Sub