Message avant synthese

bonsoir le forum

voila j'ai trouvé un formulaire qui me convient très bien pour faire l' entretiens de mon véhicule

se que je recherche c'est d 'avoir un msgbox après cliquer sur ok la liste de mes rentrées que je viens de faire sur mon véhicules

avec tout mes remercîment pour votre aide

Bonjour,

à tester à remplacer

MsgBox "dernier rentrer " _
& vbCrLf & vbCrLf & vbTab & "Vehicule = " & vbTab & CmbListeTypes.Value _
& vbCrLf & vbCrLf & vbTab & "Date = " & vbTab & TxtDate.Value _
& vbCrLf & vbCrLf & vbTab & "Nature Intervention = " & vbTab & TxtMontant.Value _
& vbCrLf & vbCrLf & vbTab & "Kilometrage = " & vbTab & TxtKm.Value, _
vbInformation, "Merci!!!"

si j'ai bien compris

j'ai du me trompé avec nature de l'intervention j'ai mis le montant arf

crdlt,

André

bonjour le forum

merci beaucoup andre 13 pour ton aide tout va bien j ai réglé le problème

mais quand je rentre de essence j ai le km mais pour les autre intervention le kilométrage apparaît pas dans mon usf j'arrive pas a savoir pourquoi

merci pour votre aide

Bonjour

pour répondre à ta question :

à cause de False (après le Else jusqu'au if)

Private Sub CmbListeTypes_Change()
If CmbListeTypes.Value = "Carburant" Then
    TxtNbreLitres.Visible = True
    LblNbreLitres.Visible = True
    TxtKm.Visible = True
    LblKm.Visible = True
Else
  '  TxtNbreLitres.Visible = False
  '  LblNbreLitres.Visible = False
   ' TxtKm.Visible = False
   ' LblKm.Visible = False
End If
End Sub

ci joint avec nouvelle mouture plus conviviale avec des mise en formes conditionnelles (MFC)

crdlt,

André

bonsoir le forum

merci infiniment ANDRE13 superbe réalisation je tente de le faire pour deux véhicules comment je peux faire cela avec synthèse pour chacun

mais encore un grand merci pour le temps que tu as bien voulus m'accorder

amitié sincère

le 13 est ta région ?????

Bonsoir,

oui le 13 est ma région Marseille

crdlt,

André

merci ANDRE pout ta précision je suis née dans le 13 aussi