inserer un nom dans une liste

  • Initiateur de la discussion rick
  • Date de début
R

rick

Guest
bonjour, j'aimerais que lorsque je rentre un nom dans une cellule celui-ci aille placer le nom dans une liste.

merci
 

Hervé

XLDnaute Barbatruc
Bonjour

Pas sur d'avoir tout compris

Ce code à placer dans la feuille voulue (clique qroit sur le nom de l'onglet, puis visualiser le code), te permettra de créer dans la colonne A, la liste des noms saisie sur la feuille.

Private Sub Worksheet_Change(ByVal Target As Range)
If Application.Intersect(Target, Columns(1)) Is Nothing Then
Range('a' & Range('a65536').End(xlUp).Row + 1) = Target.Value
End If
End Sub

A plus
 

_Thierry

XLDnaute Barbatruc
Repose en paix
Bonjour Rick, le Forum

Pas claire du tout ta question... Liste ? quelle Liste ?

Enfin voilà une Double Procédure qui reportera en colonne 'B' ligne à ligne tout ce que tu saisiras en cellule 'A1', pour autant que tu ne saisisses pas deux fois la même chose en 'A1' coup sur coup...

NB Code à Copier et Coller Dan le Private Module de La Feuille En Question.

Code:
Option Explicit

Private KeepInMemory As String

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = 'A1' Then
    KeepInMemory = Target.Value
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim CurrentCell As Range
Set CurrentCell = Me.Range('B' & Me.Range('B500').End(xlUp).Row + 1)

    If KeepInMemory <> '' Then
        If KeepInMemory <> CurrentCell.Offset(-1, 0) Then CurrentCell = KeepInMemory
    End If
End Sub

TIPS ! Pour atteindre le Private Module d'une Feuille, tu sélectionnes l'onglet et tu fais un click droit, puis, dans le menu contextuel 'Visualiser le Code'

Bonne Fin d'Après Midi
@+Thierry
 

_Thierry

XLDnaute Barbatruc
Repose en paix
re Hervé

Le Boum ! c'était en prévision de mon arrivée !! lol

Bon sinon on voit bien que Rick ne nous a pas suffisamment informé, car moi j'ai compris autre chose que toi lol !!!

Toi c'est n'importe o&ugrave; dans la feuille (Sauf Colonne 'A'), si tu tapes un truc, hop en colonne 'A' à la suite...

Moi c'est si tu Tape en 'A1' uniquement, Hop en colonne 'B' à la suite, pour autant que ce ne soit pas un doublon à la suite.

On verra bien !!! Si y faut c'est tout à fait autre chose dont Rick à besoin !!! LOL

Bonne Fin d'Aprèm
@+Thierry
 

dermience

XLDnaute Junior
bonjour

j'espère que cette solution répond à ta question

bonne soirée [file name=insertion nom_20050309185159.zip size=2048]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/insertion nom_20050309185159.zip[/file]
 

Pièces jointes

  • insertion nom_20050309185159.zip
    2 KB · Affichages: 10

Discussions similaires

Réponses
2
Affichages
184

Membres actuellement en ligne

Statistiques des forums

Discussions
314 450
Messages
2 109 719
Membres
110 551
dernier inscrit
Khyolyanna