bonjour
une petite question qui apparaîtra toute bête aux pros que certains sont
mais qui à moi, me pose souci
pour éviter de saisir toutes les cellules je voudrais faire que si:
en A1 je tape"X" , E1 contienne "X"
comme si j'avais cette formule si A1=X alors E1=X
mais uniquement pour "X"
je ne peux utiliser E1=A1 car en F1 j'ai "NBVAL" et donc plein de zéros
pour les cellules sans X
vous avez une idée à me proposer?
d'avance merci à vous
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
ROGEON Eric
"bal bellegarde" a écrit dans le message de news:
bonjour
Avé ;o)
une petite question qui apparaîtra toute bête aux pros que certains sont mais qui à moi, me pose souci
pour éviter de saisir toutes les cellules je voudrais faire que si: en A1 je tape"X" , E1 contienne "X" comme si j'avais cette formule si A1=X alors E1=X mais uniquement pour "X" je ne peux utiliser E1¡ car en F1 j'ai "NBVAL" et donc plein de zéros pour les cellules sans X vous avez une idée à me proposer?
C'est très simple :
En E1 tu tappes : "=SI(A1="X";A1;"")
Par contre, la fonction NBVAL considèrera tout de même les cellule sans "X" non vide car il y a la formule dedans !
Pour contrecarrer cela, tu peux compléter la formule en F1 comme ceci : =NBVAL(ta plage)-NB.VIDE(ta plage)
d'avance merci à vous
De rien ;o)
Eric R.
"bal bellegarde" <balbel@wanadoo.fr> a écrit dans le message de news:
e4fczQ4NGHA.2472@TK2MSFTNGP11.phx.gbl...
bonjour
Avé ;o)
une petite question qui apparaîtra toute bête aux pros que certains sont
mais qui à moi, me pose souci
pour éviter de saisir toutes les cellules je voudrais faire que si:
en A1 je tape"X" , E1 contienne "X"
comme si j'avais cette formule si A1=X alors E1=X
mais uniquement pour "X"
je ne peux utiliser E1¡ car en F1 j'ai "NBVAL" et donc plein de zéros
pour les cellules sans X
vous avez une idée à me proposer?
C'est très simple :
En E1 tu tappes : "=SI(A1="X";A1;"")
Par contre, la fonction NBVAL considèrera tout de même les cellule sans "X"
non vide car il y a la formule dedans !
Pour contrecarrer cela, tu peux compléter la formule en F1 comme ceci :
=NBVAL(ta plage)-NB.VIDE(ta plage)
une petite question qui apparaîtra toute bête aux pros que certains sont mais qui à moi, me pose souci
pour éviter de saisir toutes les cellules je voudrais faire que si: en A1 je tape"X" , E1 contienne "X" comme si j'avais cette formule si A1=X alors E1=X mais uniquement pour "X" je ne peux utiliser E1¡ car en F1 j'ai "NBVAL" et donc plein de zéros pour les cellules sans X vous avez une idée à me proposer?
C'est très simple :
En E1 tu tappes : "=SI(A1="X";A1;"")
Par contre, la fonction NBVAL considèrera tout de même les cellule sans "X" non vide car il y a la formule dedans !
Pour contrecarrer cela, tu peux compléter la formule en F1 comme ceci : =NBVAL(ta plage)-NB.VIDE(ta plage)
d'avance merci à vous
De rien ;o)
Eric R.
JLuc
bal bellegarde avait soumis l'idée :
bonjour une petite question qui apparaîtra toute bête aux pros que certains sont mais qui à moi, me pose souci
pour éviter de saisir toutes les cellules je voudrais faire que si: en A1 je tape"X" , E1 contienne "X" comme si j'avais cette formule si A1=X alors E1=X mais uniquement pour "X" je ne peux utiliser E1¡ car en F1 j'ai "NBVAL" et donc plein de zéros pour les cellules sans X vous avez une idée à me proposer? d'avance merci à vous
Dans le code de la feuille concernee : Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A:A")) Is Nothing Then If Target = "X" Then Target.Offset(0, 4) = "X" Else Target.Offset(0, 4) = "" ' ou zero End If End If End Sub JLuc
-- JLuc
bal bellegarde avait soumis l'idée :
bonjour
une petite question qui apparaîtra toute bête aux pros que certains sont
mais qui à moi, me pose souci
pour éviter de saisir toutes les cellules je voudrais faire que si:
en A1 je tape"X" , E1 contienne "X"
comme si j'avais cette formule si A1=X alors E1=X
mais uniquement pour "X"
je ne peux utiliser E1¡ car en F1 j'ai "NBVAL" et donc plein de zéros
pour les cellules sans X
vous avez une idée à me proposer?
d'avance merci à vous
Dans le code de la feuille concernee :
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A:A")) Is Nothing Then
If Target = "X" Then
Target.Offset(0, 4) = "X"
Else
Target.Offset(0, 4) = "" ' ou zero
End If
End If
End Sub
JLuc
bonjour une petite question qui apparaîtra toute bête aux pros que certains sont mais qui à moi, me pose souci
pour éviter de saisir toutes les cellules je voudrais faire que si: en A1 je tape"X" , E1 contienne "X" comme si j'avais cette formule si A1=X alors E1=X mais uniquement pour "X" je ne peux utiliser E1¡ car en F1 j'ai "NBVAL" et donc plein de zéros pour les cellules sans X vous avez une idée à me proposer? d'avance merci à vous
Dans le code de la feuille concernee : Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A:A")) Is Nothing Then If Target = "X" Then Target.Offset(0, 4) = "X" Else Target.Offset(0, 4) = "" ' ou zero End If End If End Sub JLuc
-- JLuc
AV
| pour éviter de saisir toutes les cellules je voudrais faire que si: | en A1 je tape"X" , E1 contienne "X"
Clic droit sur l'onglet de feuille > Visualiser le code > Copier/coller le code suivant :
Private Sub Worksheet_Change(ByVal zz As Range) If zz.Address <> "$A$1" Then Exit Sub [E1] = IIf(zz = "x", "x", "") End Sub
AV
| pour éviter de saisir toutes les cellules je voudrais faire que si:
| en A1 je tape"X" , E1 contienne "X"
Clic droit sur l'onglet de feuille > Visualiser le code > Copier/coller le
code suivant :
Private Sub Worksheet_Change(ByVal zz As Range)
If zz.Address <> "$A$1" Then Exit Sub
[E1] = IIf(zz = "x", "x", "")
End Sub
