j'ai une feuille de calcul qui a dix neuf colonne , je suis presentement sur le forum pour ameliorer mes userform , jusqu'a present tous va bien j'ai recu de tres bonne correction mais pour terminer ou presque j'aurais besoin d'une macro pour mettre les cellule en nom propre donc etant donnees le volume enorme des cette feuille se sera trop long pour les faires manuellement donc je recherche une formule a mettre sur une macro ou un bouton vba pour le faire plus rapidement il va de sois que je connais la facon de le faire avec des textbox vs WorksheetFunction.Proper
sauf quand c'est des cellules d'une feuille je ne connais pas , donc je cherche ce code
merci je vous envoie se que je croyais bien faire mais j'ai des erreurs que vous aller sans doute reconnaitre merci a vous
alors voici mon code si besoin est je vous enverais un petit dossier
private Sub CommandButton1_Click()
With Feuil2
.Range("I3").Select
For Y = 1 To 1200
.Cells.WorksheetFunction.Proper
Next Y
End With
End Sub
Re : Macro pour mettre en nom propre cellule d'une feuille
Bonjour,
il faut boucler sur les cellules en question, un exemple ci-dessous sur la colonne A :
Code:
Option Explicit
Sub test()
Dim c As Range
With Sheets("Feuil1")
For Each c In .Range("A1", .Range("A65536").End(xlUp))
c.Value = StrConv(c.Value, vbProperCase)
Next c
End With
End Sub
Re : Macro pour mettre en nom propre cellule d'une feuille
salut pierrot93
oui j'ai bien adapter ce code dans une macro nomme test et cela a fonctionner alors merci a toi ceci devra m'exempter de beaucoup d'heures de travail ouf