PETIT PROGRAMME EXCEL

Fermé

kante - 3 déc. 2008 à 11:00
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 3 déc. 2008 à 14:57

Bonjour,

je veux que ma premiere ligne excel constitue la ligne d'entée de sorte que lorsque j'entre une donée dans dans une cellule et que je valide ,la donnée se retrouve dans la cellule suivante en bas

TCHOUKOU EMEKA
1 KAN THOMAS
2 JABOUR EBDEL
3 EVELYNE BROUBA
4 MICHEL BOURVIER
5 DAOUDAH THIAM
6 GGGGHH
7

apres le saisie de TCHOUCKOU EMEKA et apres validation, que GGGGHH se retrouve a la position 7
DAOUDA THIAM en 6 ansi de suite .............

aidez moi , mes cheveux sont sont en train de tomber................

A voir également:

PETIT PROGRAMME EXCEL
Liste déroulante excel - Guide
Formule excel - Guide
Si et excel - Guide
Programme demarrage windows 10 - Guide
Excel trier du plus grand au plus petit - Guide

1 réponse

Réponse 1 / 1

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
3 déc. 2008 à 14:57

Bonjour,
Je ne voudrais surtout pas que tu devienne chauve :-D
Tu colle ce code dans le module de ta feuille

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static AncAdress As String
    If AncAdress <> "" And Target.Count = 1 Then 'pour 1ère initialisation.
        If Range(AncAdress).Address = "$A$1" And Range(AncAdress) <> "" Then
            'La cellule que l'ont vient de quitter était A1 et a été modifiée.
            'L'ajoute en fin de colonne A
            Range("A" & Range("A65536").End(xlUp).Row + 1) = Range(AncAdress)
            Range("A1") = ""
            Range("A1").Select
            Exit Sub
        End If
    End If
    AncAdress = Target.Address
End Sub

Tout ce que tu tape en A1, suivi de ENTER serra recopier en fin de colonne A
A toi d'adapter pour tes adresses.
A+

Discussions similaires

programme qui n'affiche pas le mot secret

comment écrire des petits chiffres ?

Discussions similaires

Newsletters