Bonjour à tous,

J'ai utilisé le modéle de barre de menus que Fring a mis sur le net et j'aimerai pouvoir modifier une partie du code et notamment la partie concernant la zone texte où l'on peut taper une date.

http://fring.developpez.com/vba/excel/barremenu/


Dans mon application, j'aimerai que cette date soit la date du jour et non modifiable.

Pouvez-vous m'aider s'il vous plait ?
Merci par avance

Voici le code de Fring

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Sub Macro2()
With CommandBars("MaBarre").Controls(2)
    If .Text = "" Then
        MsgBox "Veuillez saisir une date dans la zone de texte"
        Exit Sub
    Else
        MsgBox "Date saisie :" & Chr(10) & "le " & .Text
    End If
End With
End Sub