Copier celulle antérieure
Résolu
Brandysve
Messages postés
59
Statut
Membre
-
pijaku Messages postés 13513 Statut Modérateur -
pijaku Messages postés 13513 Statut Modérateur -
Bonjour 'Comment ça marche',
Je possède un modèle excel où j'encode, notamment, des dates de fin de leasing cependant il arrive souvent qu'en fonction des plaques, ce soit les mêmes dates.
Pour ne pas toujours les retaper ou faire "copier/coller" etc.. je voudrais qu'en appuyant sur une touche du clavier, ça copie le contenu de la cellule supérieure.
Est-ce possible en Vba?
Merci à l'avance pour votre aide
Brandysve
Je possède un modèle excel où j'encode, notamment, des dates de fin de leasing cependant il arrive souvent qu'en fonction des plaques, ce soit les mêmes dates.
Pour ne pas toujours les retaper ou faire "copier/coller" etc.. je voudrais qu'en appuyant sur une touche du clavier, ça copie le contenu de la cellule supérieure.
Est-ce possible en Vba?
Merci à l'avance pour votre aide
Brandysve
A voir également:
- Copier celulle antérieure
- Comment copier une vidéo youtube - Guide
- Super copier - Télécharger - Gestion de fichiers
- Historique copier coller - Guide
- Copier-coller - Accueil - Informatique
- Copier disque dur - Guide
2 réponses
Bonjour,
Oui, tout (ou presque) est possible en VBA.
Un exemple de recopie de la cellule supérieure dans la cellule active (ce code se déclenche lors d'un double clic dans la cellule)
Mise en oeuvre :
- Clic droit sur l'onglet de la feuille concernée
- choisir : visualiser le code
- copier-coller le code ci-dessus
- fermer visual basic editor
- tester
Oui, tout (ou presque) est possible en VBA.
Un exemple de recopie de la cellule supérieure dans la cellule active (ce code se déclenche lors d'un double clic dans la cellule)
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
ActiveCell.Value = ActiveCell.Offset(-1, 0).Value
End Sub
Mise en oeuvre :
- Clic droit sur l'onglet de la feuille concernée
- choisir : visualiser le code
- copier-coller le code ci-dessus
- fermer visual basic editor
- tester
J'avais juste besoin de ceci :
Je met en résolu et encore merci !
Voici le code code complet si une personne cherche la même chose
A bientot o/
ActiveCell.Value = ActiveCell.Offset(-1,0).Value
Je met en résolu et encore merci !
Voici le code code complet si une personne cherche la même chose
Sub Under_copy()
'
' Under_copy Macro
' Copie la celulle du dessus
'
' Touche de raccourci du clavier: Ctrl+w
'
ActiveCell.Value = ActiveCell.Offset(-1, 0).Value
End Sub
A bientot o/