Discussion :

[cbredeche]

Bonjour
j'ai un fichier avec plusieurs formulaires le bouton "nouvelle fiche"

crée un ligne dans le tableau "00-recap" et crée un fiche via une trame

dans les fiches crée il y a un bouton pour rentré des montants "userform 2"

je voudrais que sur chaque fiche crée que la cellule R15 remonte dans mon tableau "00-recap" en colonne F en face du même non de ma fiche
après validation des éléments saisie dans l'userform 2.

de plus je voudrais que le n° de la dernière fiche s'affiche dans mon userform 1 dans le texbox 1 pour info

merci encore de votre aide

ci joints mon fichier
cordialement

[cbredeche]

J'ai essaye ce code mais cela ne marche pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Public Function DerValue()
Dim DerLig As Long
Application.Volatile
    DerLig = Cells(65536, "B").End(xlUp).Row
    DerValue = TextBox1
 
 
End Function

encore merci de votre aide

bonjour
quelqu'un pour m'aide sur mes 2 sujets de ci dessus
merci par avance

[cbredeche]

pour mon deuxième sujet "affichage de la valeur de la cellule dans un texbox"
J' ai applique ce nouveau code mais malgré avoir choisir la colonne b cela m'affiche la colonne A

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub UserForm_Initialize()
Dim dl As Integer
    dl = Sheets("00-recap").Range("B" & Rows.Count).End(xlUp).Row
 
 TextBox1.Value = Range("B" & dl)
End Sub

Merci de votre aide