Discussion :

[Didier77]

Bonjour, j'ai un probleme avec une fonction qui vient d'excel
message : invalid use of null

Code :

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

1
2
3
4
5
6
 
Function NomPropre(QuelTexte)
  Dim MonExcel As Excel.Application
  NomPropre = Excel.WorksheetFunction.Proper(QuelTexte)
  Set MonExcel = Nothing
End Function

[Didier77]

En fait il vaut mieux utiliser

Code :

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

StrConv([NomChamp],1 ou 2 ou 3)

1:Transforme en minuscule
2:transforme en majuscule
3:met le premiere lettre en majuscule et le reste en minuscule