Macro et Nom composé

Gardien de phare

XLDnaute Accro

• 13 Novembre 2012

• #2

Re : Macro et Nom composé

Bonsoir,

Sauf erreur, et tout simplement parce que la ligne qui suit :

VB:

Nom = Application.WorksheetFunction.Proper(Left(.Range(Rangebase).Value, InStr(1, .Range(Rangebase).Value, " ") + 1) + ".")

fait que Nom s'arrête au premier espace rencontré !

HTH

 

Vote positif 0 Vote négatif

G

Goose

XLDnaute Occasionnel

• 14 Novembre 2012

• #3

Re : Macro et Nom composé

Merci pour avoir trouver l'erreur, cependant comment la corriger ?
@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Novembre 2012

• #4

Re : Macro et Nom composé

Bonjour,

peut être une autre approche ainsi, espérant que cela puisse te faire avancer :

Code:

ActiveCell.Value = StrConv(ActiveCell, vbProperCase)

bon après midi
@+

 

Vote positif 0 Vote négatif

G

Goose

XLDnaute Occasionnel

• 14 Novembre 2012

• #5

Re : Macro et Nom composé

Merci Pierrot mais où place ce bout de code ?
@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Novembre 2012

• #6

Re : Macro et Nom composé

Re,

pas tout compris dans ton fichier... la ligne de code donnée te convertit en noms propres tous les mots de la cellule active.... A voir si c'est ce que tu recherches à faire...

 

Vote positif 0 Vote négatif

G

Goose

XLDnaute Occasionnel

• 14 Novembre 2012

• #7

Re : Macro et Nom composé

oui pourquoi pas !! mais je ne sais pas ou mettre cette ligne ?

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Novembre 2012

• #8

Re : Macro et Nom composé

Re,

dans un module standard dans l'éditeur vba:

Code:

Option Explicit
Sub test()
ActiveCell.Value = StrConv(ActiveCell, vbProperCase)
End Sub

test ensuite asur une cellule avec la touche F8 (dans l'éditeur vba)v

 

Vote positif 0 Vote négatif

G

Goose

XLDnaute Occasionnel

• 14 Novembre 2012

• #9

Re : Macro et Nom composé

ok, mais dans mon code, je peux remplacer:

Nom = Application.WorksheetFunction.Proper(Left(.Range(Rangebase).Value, InStr(1, .Range(Rangebase).Value, " ") + 1) + ".")
par
ActiveCell.Value = StrConv(ActiveCell, vbProperCase)
???

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Novembre 2012

• #10

Re : Macro et Nom composé

Re,

non, la fonction "StrConv" s'applique à une chaine de caractères et non à une plage de cellules...

 

Vote positif 0 Vote négatif

G

Goose

XLDnaute Occasionnel

• 14 Novembre 2012

• #11

Re : Macro et Nom composé

étant novice en VB, je suis un peu perdu !!
comment insérer "StrConv" dans mon code d'origine ?

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Novembre 2012

• #12

Re : Macro et Nom composé

Re,

étant novice en VB, je suis un peu perdu !!

Cliquez pour agrandir...

bah vu la qualité du code dans ton fichier, je suis étonné....

comment insérer "StrConv" dans mon code d'origine ?

Cliquez pour agrandir...

test le déjà sur la cellule active pour savoir si il répond à ton problème.... voir post #8

 

Vote positif 0 Vote négatif