Microsoft 365 Userform de recherche-Modif affichage numérotation de départ Textbox d'enregistrement

jcf6464 à dit:

Bonjour J-Laurie et le forum,

dans UserForm_Initialize

VB:

Private Sub UserForm_Initialize()
   Set f = Sheets("bd")
   Set Rng = f.Range("A2:M" & f.[A65000].End(xlUp).Row)
   decal = Rng.Row - 1

Tu passe le A2:M en A4:M
et tu insère deux lignes au-dessus des titres

Bonne continuation jcf64

Cliquez pour agrandir...

Bonjour @jcf6464 et merci beaucoup de ton aide

Je sais que c'était bête mais comme j'ai pris ce fichier en base pour élaborer un autre fichier, j'avais beau modifier cette partie du code, rien n'y faisait. Je pensais donc que la modif était à faire autre part. Tu m'as confirmé que non de part ton aide. J'ai donc repris le code initial de l'UserForm_Initialize et vérifié pas à pas et c'est bon.

Alors encore merci

Laurie