Code VBA à modifier

Bonjour,

j'aimerai, dans le code ci joint, que le nom de mon onglet se transforme en minuscule ('Dupont'), possible ou pas ??

(PS: je saisie toujours dans la Inputbox le nom et le prénom comme suis 'DUPONT Jean')
merci d'avance


Sub Bouton1()
Dim nom As String
Dim mafeuille As String

mafeuille = InputBox('Nom de feuille ?')
nom = Mid(mafeuille, 1, InStr(1, mafeuille, ' ') - 1)

If mafeuille <> '' Then
Worksheets('Exemple').Copy After:=Worksheets('Exemple')
With ActiveSheet
.Name = nom
.Range('a1') = mafeuille
End With
End If


End Sub

Message édité par: archi, à: 08/08/2005 18:34