Renvoyer dans la colonne E la dernière valeur saisie en colonne F avec un

Renvoyer dans la colonne E la dernière valeur saisie en colonne F

avec un espace (nbre de cellules) égal à la valeur saisie.

(Par formule excel de préférence,

mais je commence à lire les macros vba)

18classeur4.xls (17.00 Ko)

Pierre... Pierre...

c'est de là que vient ton pseudo

2020 04 20 22h59 47

C la galère

voir avec celui là

6classeur-4.xls (17.00 Ko)

Bonjour Pierre,

Tu aurais pu éditer ton 1er post et changer le fichier

Voici le code à mettre dans Feuil1

Private Sub Worksheet_Change(ByVal Target As Range)
  Dim MaVal As Integer
  ' Pour éviter les erreurs si selection multiple ou valeur vide
  If Target.Columns.Count > 1 Then Exit Sub
  If Target.Rows.Count > 1 Then Exit Sub
  If Target.Value = "" Then Exit Sub
  ' Si saisie d'une valeur en F
  If Not Intersect(Range("F:F"), Target) Is Nothing Then
    ' Désactiver les évènements
    Application.EnableEvents = False
    ' Récupérer la valeur
    MaVal = Target.Value
    ' A partir de la cellule modifiée, décaler de X lignes vers le bas et d'une colonne à gauche
    ' et inscrire la valeur
    Target.Offset(MaVal, -1).Value = MaVal
    ' Activer les évènements
    Application.EnableEvents = True
  End If
End Sub

A+

Bonjour Pierre,

bonjour Bruno

C'est plus clair qu'ici https://forum.excel-pratique.com/viewtopic.php?f=2&t=140159&p=860814#p860814 en effet

Par formule, en E6, à tirer vers le bas ...

=SI(F6="";"";INDEX(F$1:F5;EQUIV(9^9;F$1:F5;1)))

mais je ne vois pas dans ta logique de où peut venir la valeur de E5

3classeur-4.zip (8.67 Ko)

BrunoM45, merci

je regarde

Steelson

BrunoM45

Déja 40 minutes d'écoulées ... j'avais perdu les fenetres de vsa

Bruno ça parait fonctionner

Steelson merci pour ton rajout

=SI(F6="";"";INDEX(F$1:F5;EQUIV(9^9;F$1:F5;1)))

(J'ai pas encore appliqué mais j'avais fouillé avec ça et il me semble que que je rencontrait un pb avec les cellules comportant un 0)

je vais étudier ça.

Je regarde plus en détail

Merci à tous

Steelson

Bruno

Je viens de testes rapidos =SI(F6="";"";INDEX(F$1:F5;EQUIV(9^9;F$1:F5;1)))

ça semble être ok

me reste à comprendre tout ça

pour E5 ?

Vu comme ça y'a rien à comprendre (waouf)

en fait ce classeur me permet de réduire la demande.

plus détail si MP

Pour E5

plus concretement c'est la premiere saisie.

J'aurais du le présenter comme dans ce classeur5

4classeur5.zip (8.79 Ko)

Donc c'est ok ?

Rechercher des sujets similaires à "renvoyer colonne derniere valeur saisie"