Столбец для ФИО

[Kraimon]

Подскажите плз, как сделать макрос для столбца ФИО, а именно нужно чтобы при заболнении стобца скажем таким образом: иванов иван иванович , текст автоматически преобразовался в такой формат Иванов Иван Иванович. Т.е чтобы все слова были написаны с заглавной буквы. Функцией "ПРОПНАЧ" пользоваться крайне неудобно.

[Serge 007]

Тупо записал макрорекордером:

Sub Макрос2()
    ActiveCell.FormulaR1C1 = "=PROPER(RC[-1])"
    Selection.Copy
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("B1").Select
    Application.CutCopyMode = False
    Selection.ClearContents
End Sub

А чем ПРОПНАЧ-то неудобна?

[Kraimon]

Не работает, мб потому что у меня 2003 офис? Мне нужно чтобы автоматически это работало

[Kraimon]

дак как всетаки сделать ?

[nilem]

Так можно попробовать (как-то раз научили пользоваться StrConv )

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A1:A100")) Is Nothing Then
Target = StrConv(Target, 3)
End If
End Sub

[Kraimon]

Работает!!!!!! спс тебе большое, выручил