XL 2013 Augmenter dernière cellule non vide d'une colonne de 1

Fat

XLDnaute Nouveau
Bonjour tout le monde,

=RECHERCHE("9";'CTS'!E:E)
Cette formule me donne le contenu de la dernière cellule non vide de la colonne E, onglet CTS.
Ce contenu est de forme standard avec tiret : 05-007
Je voudrais après chaque validation ajouter une unité et passer à 05-008, puis 05-009 etc..
Comment ajouter cette unité dans la formule ?
Ou alors, y a t-il une formule plus adaptée ?
Merci pour votre assistance.
Cordialement
Fat
 

job75

XLDnaute Barbatruc
Bonjour Fat,

Fichier joint avec ces macros dans le code de la feuille "Feuil1" (clic droit sur l'onglet et Visualiser le code) :
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Address = "$A$1" Then ActiveCell = Sheets("CTS").Range("E" & Rows.Count).End(xlUp)
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address <> "$A$1" Then Exit Sub
Application.ScreenUpdating = False
Cancel = True
Target(2).Insert xlDown
Target.AutoFill Target.Resize(2)
Target = Target(2)
Target(2).Delete xlUp
End Sub
A+
 

Fichiers joints

Fat

XLDnaute Nouveau
Merci Job75
Ça colle parfaitement et le suis ravi.
Mais je reste curieux de savoir si on peut avoir le même résultat avec une formule.
=RECHERCHE("9";'CTS'!E:E) pour la dernière cellule non vide de la colonne E / C'est OK
COMMENT AJOUTER +1 A CETTE FORMULE ?
Bonne soirée
Fat
 

mapomme

XLDnaute Barbatruc
Bonsoir @Fat, @job75 :)

Peut-être?:
VB:
=GAUCHE(RECHERCHE("9";CTS!E:E);CHERCHE("-";RECHERCHE("9";CTS!E:E))) & TEXTE((1*STXT(RECHERCHE("9";CTS!E:E);CHERCHE("-";RECHERCHE("9";CTS!E:E))+1;99)+1);"000")
 

job75

XLDnaute Barbatruc
Bonsoir mapomme,

D'accordi mais :
Je voudrais après chaque validation ajouter une unité et passer à 05-008, puis 05-009 etc..
Comment ajouter cette unité dans la formule ?
Et ça a priori ce n'est pas possible par formule.

A+
 

Fat

XLDnaute Nouveau
Impossible n'est pas possible chez EXCEL !!!

La réponse est venue d'ailleurs et répond parfaitement à la demande :
=GAUCHE(RECHERCHE("9";'CTS'!E:E);2)&TEXTE(CNUM(DROITE(RECHERCHE("9";'CTS'!E:E);3))+1;"000")
On y était presque avec la proposition de "mapomme"

Merci à tous pour l'intérêt que vous avez porté à ma question.
Cordialement
Fat
 

Fat

XLDnaute Nouveau
Mea Culpa !
La formule de "mapomme" fonctionne aussi très bien.
Elle est juste un peu plus longue que celle que j'ai affiché.
Merci encore et à bientôt.
 

Fat

XLDnaute Nouveau
Bonjour @job75 :),


J'avais aussi remarqué. Mais comme ça semble satisfaire Fat...
Bonjour,
Je suis curieux de savoir ce qu’il manque à cette formule, ce petit quelque chose...
On peut tester sur le fichier que j’ai déjà envoyé. Une formule doit avoir des limites de fonctionnement avec un minimum requis pour répondre à la demande et un maximum en utilisant d’autres voies.
Bonne journée !
 

job75

XLDnaute Barbatruc
Y a comme un défaut mapomme...

Fat, il manque simplement le tiret, au lieu de :
Code:
=GAUCHE(RECHERCHE("9";CTS!E:E);2)&TEXTE(CNUM(DROITE(RECHERCHE("9";CTS!E:E);3))+1;"000")
écrire :
Code:
=GAUCHE(RECHERCHE("9";CTS!E:E);2)&TEXTE(DROITE(RECHERCHE("9";CTS!E:E);3)+1;"-000")
 

Discussions similaires


Haut Bas