S'il vous plaît noter les valeurs suivantes dans la colonne A & B.comment calculer les valeurs non nulles sans écart
1 2280
2 0
3 1250
4 0
5 1245
6 0
7 0
8 0
9 1258
10 0
i besoin suivant par la formule dans la colonne C & D. s'il vous plaît aider
1 2280
3 1250
5 1245
9 1258
En utilisation C1:
=IFERROR(AGGREGATE(15,6,(ROW($B$1:$B$10)-ROW($B$1)+1)/($B$1:$B$10<>0),ROWS($A$1:$A1)),"")
Il retourne la liste des numéros de ligne où il n'y a pas de zéro en B pour la plage désignée. Recopiez-le. Il affichera "" quand il manquera de nombre à afficher.
Lors de l'utilisation de D2:
=IFERROR(INDEX($B$1:$B$10,C1),"")
Il permet d'afficher la valeur correspondante de B au nombre de lignes inscrites dans la formule C. Copie vers le bas. Comme la première formule, l'IFERROR affichera "" quand il manquera de nombre à rechercher.
Formule C:
=IF($B1>0;A1;"")
Formule D:
=IF($B1>0;B1;"")
solution VBA:
Sub values()
linea = 1
For Each cell In Range("b1:b10")
If cell > 0 Then
Cells(linea, 3) = cell
Cells(linea, 4) = Cells(cell.Row, cell.Column - 1)
linea = linea + 1
End If
Next cell
End Sub
Votre méthode de formule affiche des espaces ou des lignes "" lorsque la valeur est zéro. Il ne fait rien pour compresser la liste selon l'exemple de sortie souhaité. –
C'est vraiment réconfortant de voir cette solution. Merci en profondeur. Plus loin dans la formule C1, puis-je remplacer G $ 9: G9 à la fin avec A $ 9: A9 ??? –
oui, en fait, vous devriez le changer à $ A $ 1: A1, je vais modifier ma réponse pour refléter cela. ce morceau particulier de la formule est essentiellement un compteur qui augmente d'un rang chaque fois copié vers le bas. –