Ecire à partir d'une cellule fixe la valeur dans un tableau
3 réponses
andré
Bonjour,
J'ai une cellule fixe A1= nom, A2=note.
Je voudrais qu'en tapant un nom dans A1 celui-ci se reporte en A5, un
nouveau nom en A6, etc
Je voudrais qu'en tapant une note dans A2 celle-ci se reporte en B5, une
nouvelle note en B6, etc
J'ai essayé =Si(A1="";A5="";A5=A1) mais comment passer la nouvelle valeur de
A1 en A6.
Merci pour votre aide.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Philippe.R
Bonsoir André,
Clic droit sur l'onglet de la feuille / visualiser le code et coller ce qui suit dans la page qui s'ouvre
Private Sub Worksheet_Change(ByVal Target As Range) derliga = IIf(Range("a9876").End(xlUp).Row + 1 < 5, 5, Range("a9876").End(xlUp).Row + 1) derligb = IIf(Range("b9876").End(xlUp).Row + 1 < 5, 5, Range("b9876").End(xlUp).Row + 1) If Not Intersect(Range("a1"), Target) Is Nothing Then Cells(derliga, 1).Value = [a1] End If If Not Intersect(Range("b1"), Target) Is Nothing Then Cells(derligb, 2).Value = [b1] End If End Sub
retourner dan s la feuille par Alt+F11 et essayer -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "andré" a écrit dans le message de news:fethgp$as3$
Bonjour,
J'ai une cellule fixe A1= nom, A2=note. Je voudrais qu'en tapant un nom dans A1 celui-ci se reporte en A5, un nouveau nom en A6, etc Je voudrais qu'en tapant une note dans A2 celle-ci se reporte en B5, une nouvelle note en B6, etc
J'ai essayé =Si(A1="";A5="";A5¡) mais comment passer la nouvelle valeur de A1 en A6. Merci pour votre aide.
Bonsoir André,
Clic droit sur l'onglet de la feuille / visualiser le code et coller ce qui
suit dans la page qui s'ouvre
Private Sub Worksheet_Change(ByVal Target As Range)
derliga = IIf(Range("a9876").End(xlUp).Row + 1 < 5, 5,
Range("a9876").End(xlUp).Row + 1)
derligb = IIf(Range("b9876").End(xlUp).Row + 1 < 5, 5,
Range("b9876").End(xlUp).Row + 1)
If Not Intersect(Range("a1"), Target) Is Nothing Then
Cells(derliga, 1).Value = [a1]
End If
If Not Intersect(Range("b1"), Target) Is Nothing Then
Cells(derligb, 2).Value = [b1]
End If
End Sub
retourner dan s la feuille par Alt+F11 et essayer
--
http://www.excelabo.net/mpfe/connexion.php
http://dj.joss.free.fr/trombine.htm
Avec plaisir
Philippe.R
"andré" <aecr@tiscali.fr> a écrit dans le message de
news:fethgp$as3$1@news.tiscali.fr...
Bonjour,
J'ai une cellule fixe A1= nom, A2=note.
Je voudrais qu'en tapant un nom dans A1 celui-ci se reporte en A5, un
nouveau nom en A6, etc
Je voudrais qu'en tapant une note dans A2 celle-ci se reporte en B5, une
nouvelle note en B6, etc
J'ai essayé =Si(A1="";A5="";A5¡) mais comment passer la nouvelle valeur
de A1 en A6.
Merci pour votre aide.
Clic droit sur l'onglet de la feuille / visualiser le code et coller ce qui suit dans la page qui s'ouvre
Private Sub Worksheet_Change(ByVal Target As Range) derliga = IIf(Range("a9876").End(xlUp).Row + 1 < 5, 5, Range("a9876").End(xlUp).Row + 1) derligb = IIf(Range("b9876").End(xlUp).Row + 1 < 5, 5, Range("b9876").End(xlUp).Row + 1) If Not Intersect(Range("a1"), Target) Is Nothing Then Cells(derliga, 1).Value = [a1] End If If Not Intersect(Range("b1"), Target) Is Nothing Then Cells(derligb, 2).Value = [b1] End If End Sub
retourner dan s la feuille par Alt+F11 et essayer -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "andré" a écrit dans le message de news:fethgp$as3$
Bonjour,
J'ai une cellule fixe A1= nom, A2=note. Je voudrais qu'en tapant un nom dans A1 celui-ci se reporte en A5, un nouveau nom en A6, etc Je voudrais qu'en tapant une note dans A2 celle-ci se reporte en B5, une nouvelle note en B6, etc
J'ai essayé =Si(A1="";A5="";A5¡) mais comment passer la nouvelle valeur de A1 en A6. Merci pour votre aide.
andré
J'ai oublié de préciser que ne voudrais pas utiliser de macro. Merci
J'ai oublié de préciser que ne voudrais pas utiliser de macro.
Merci
J'ai oublié de préciser que ne voudrais pas utiliser de macro. Merci
Philippe.R
Bonsoir, Je passe car je ne vois pas comment, par formule uniquement, renvoyer de manière fixe les valeurs prises successivement par A1 et B1. -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "andré" a écrit dans le message de news:fetj2n$bsr$
J'ai oublié de préciser que ne voudrais pas utiliser de macro. Merci
Bonsoir,
Je passe car je ne vois pas comment, par formule uniquement, renvoyer de
manière fixe les valeurs prises successivement par A1 et B1.
--
http://www.excelabo.net/mpfe/connexion.php
http://dj.joss.free.fr/trombine.htm
Avec plaisir
Philippe.R
"andré" <aecr@tiscali.fr> a écrit dans le message de
news:fetj2n$bsr$1@news.tiscali.fr...
J'ai oublié de préciser que ne voudrais pas utiliser de macro.
Merci
Bonsoir, Je passe car je ne vois pas comment, par formule uniquement, renvoyer de manière fixe les valeurs prises successivement par A1 et B1. -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "andré" a écrit dans le message de news:fetj2n$bsr$
J'ai oublié de préciser que ne voudrais pas utiliser de macro. Merci