rechercher le dernier numéro et non le nombre de ligne

C

CHALET53

XLDnaute Barbatruc

• 5 Février 2015

• #2

Re : rechercher le dernier numéro et non le nombre de ligne

bonjour,

Il y a peut-être plus simple :

b = Range("B" & Range("B65536").End(xlUp).Row)

a+

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 5 Février 2015

• #3

Re : rechercher le dernier numéro et non le nombre de ligne

Bonjour,

Merci Chalet53 pour cette proposition mais dans mon combobox "série" apparaît les numéro.

C'est normal?

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 5 Février 2015

• #4

Re : rechercher le dernier numéro et non le nombre de ligne

Bonjour le fil, Robino

Voici une solution avec une petite fonction

A+

 

Pièces jointes

• Ronibo_Exemple.xlsm

  49.7 KB · Affichages: 45

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 5 Février 2015

• #5

Re : rechercher le dernier numéro et non le nombre de ligne

Re,

Merci beaucoup Bruno, sa fonctionne nickel, je serais curieux de savoir comment tu as fait

A+

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 5 Février 2015

• #6

Re : rechercher le dernier numéro et non le nombre de ligne

Re,
Tout est expliqué dans le code
A+

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 5 Février 2015

• #7

Re : rechercher le dernier numéro et non le nombre de ligne

Ah j'avais pas vu le code dans le module, je vais regarder sa de plus près

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 5 Février 2015

• #8

Re : rechercher le dernier numéro et non le nombre de ligne

Re,

Tu as une idée concernant le dtpicker, j'aimerais mettre automatiquement la date du jour et non la date de l'enregistrement.

Je sais qu'il faut mettre me.DTPDate = date mais où ?

edit :
C'est peu-être ça qu'il l’empêche :

Code:

        Me.DTPDate = .Range("C" & Ligne)

edit 2 : en effet c'était bien ça

 

Dernière édition: 5 Février 2015

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 5 Février 2015

• #9

Re : rechercher le dernier numéro et non le nombre de ligne

Une autre question Bruno peut-être que tu as la solution.

Si dans ma base de donnée, j'ai une série commençant par le numéro 1 (ex : Plus Belle La Vie BL 2 (05.02.2015) DVBRip XviD - TURG), théoriquement d'après le code si je nomme le fichier fichier il portera le numéro 2. (Plus Belle La Vie BL 2 (05.02.2015) DVBRip XviD - TURG)

La question est comment faire si une série commençant par N°1 dans ma base, garder le même numéro pour nommer le fichier, dans tous les autres cas ajouter +1.

J'ai pu exprimer?

A+

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 5 Février 2015

• #10

Re : rechercher le dernier numéro et non le nombre de ligne

Re,

RONIBO à dit:

Une autre question Bruno peut-être que tu as la solution.
Si dans ma base de donnée, j'ai une série commençant par le numéro 1 (ex : Plus Belle La Vie BL 2 (05.02.2015) DVBRip XviD - TURG), théoriquement d'après le code si je nomme le fichier fichier il portera le numéro 2. (Plus Belle La Vie BL 2 (05.02.2015) DVBRip XviD - TURG)
La question est comment faire si une série commençant par N°1 dans ma base, garder le même numéro pour nommer le fichier, dans tous les autres cas ajouter +1.
J'ai pu exprimer?
A+

Cliquez pour agrandir...

1) lors du nommage du fichier, il faut penser à mettre un 0 devant ton 1 si l'ordre alphanumérique ne sera pas respecté

2) Désolé, mais je n'ai pas compris ta question

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 5 Février 2015

• #11

Re : rechercher le dernier numéro et non le nombre de ligne

Re,

1) lors du nommage du fichier, il faut penser à mettre un 0 devant ton 1 si l'ordre alphanumérique ne sera pas respecté

Cliquez pour agrandir...

Bizarre, pourtant j'ai pas de problème chez moi

2) Désolé, mais je n'ai pas compris ta question

Cliquez pour agrandir...

Dans ma base de donnée, j'ai ajouté une série avec le numéro 1 en épisode


Au moment au je vais commencé à nommer mon fichier .avi
J'aimerais garder le numéro 1 si ma série actuelle porte le numéro un également, à compter du numéro 2 ajouter +1 à chaque numéro d'épisode.

Comme ceci


et non comme ci-dessous :


J'ai réussis à me faire comprendre?

A+

 

Pièces jointes

• 02.jpg

  27 KB · Affichages: 46
• 02.jpg

  27 KB · Affichages: 48
• 03.jpg

  26.5 KB · Affichages: 46
• 03.jpg

  26.5 KB · Affichages: 53
• 01.png

  16.3 KB · Affichages: 237
• 01.png

  16.3 KB · Affichages: 204

Dernière édition: 5 Février 2015

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 5 Février 2015

• #12

Re : rechercher le dernier numéro et non le nombre de ligne

Re,

RONIBO à dit:

Bizarre, pourtant j'ai pas de problème chez moi

Cliquez pour agrandir...

Laisse tombé, je pensais que ça allait poser problème, mais effectivement pas

Pour ta 2ème demande, si j'ai bien tout compris , voici le code pour remplacement

Code:

Private Sub ComboBoxNomSérie_Change()
  Dim Ligne As Long
  If Encours = True Then Exit Sub
  Me.ComboBoxNuméroEpisode.Enabled = True
  Me.CBNommer.Enabled = True
  Ligne = Me.ComboBoxNomSérie.List(Me.ComboBoxNomSérie.ListIndex, 1)
  With Sheets("série")
    ' Si le numéro d'épisode est 1 on laisse ce numéro
    If NumDerEpisode(Me.ComboBoxNomSérie) = 1 Then
      Me.ComboBoxNuméroEpisode = NumDerEpisode(Me.ComboBoxNomSérie)
    Else
      ' Sinon on ajoute 1
      Me.ComboBoxNuméroEpisode = NumDerEpisode(Me.ComboBoxNomSérie) + 1
    End If
    'Me.DTPDate = .Range("C" & Ligne)
    Me.ComboBoxQualité = .Range("D" & Ligne)
    Me.ComboBoxFormat = .Range("E" & Ligne)
  End With
  ConstructionNomFichier
End Sub

A+

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 5 Février 2015

• #13

Re : rechercher le dernier numéro et non le nombre de ligne

Re,

Oui c'est ça Bruno

Merci bien pour ce coup de main

Il me manque plus qu'à tout tester.

Bonne journée au fil

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 5 Février 2015

• #14

Re : rechercher le dernier numéro et non le nombre de ligne

Bonsoir le forum

Bonsoir Bruno

J'ai eu l'occasion de faire pas mal de teste, j'ai trouvé une correction à faire,
Désolé j'ai pu l'identifier seulement avec des essais

J'aimerais également appliquer garder le même numéro su dans ma base il y a une série avec un épisode, par exemple si dans ma base j'ai une série nommée Caméleon avec qu'une seule épisode qui a comme N°65, ne pas appliquer la règle du +1 pour la prochaine épisode, garder le même numéro (65)

Désolé Bruno, j'ai mal fait mes essais auparavant

A+

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 6 Février 2015

• #15

Re : rechercher le dernier numéro et non le nombre de ligne

Re,

Le test est pourtant simple si j'ai bien compris

Code:

  If NumDerEpisode(Me.ComboBoxNomSérie) = 1 or NumDerEpisode(Me.ComboBoxNomSérie) = 65 Then

A+

 

Vote positif 0 Vote négatif