Всем привет!

Нужна ваша помощь в создании макроса, который будет проверять и обрезать количество символов в ячейке до 255. Диапазон проверки не имеет значения, но если это поможет сократить время работы, то столбцы В и С.

Вариант с формулой, например, "левсимвол" не подходит, т.к. каждый раз требует написание иной, копирования, вставки... А когда это требуется делать по многу раз в день... Сами понимаете.

Может уже кто сталкивался с подобным?

Круто! Всем спасибо!

Я сделал по-ламерски и все свои действия записал макрорееордером))) Вот такая портянка получилась:
Sub DVESTY()


With Application
.ScreenUpdating = False

Range("K3") = 255
Range("K4").Select
ActiveCell.FormulaR1C1 = "=LEFT(RC[-8],255)"
ActiveCell.SpecialCells(xlLastCell).Select
Range(Selection, Selection.End(xlUp)).Select
ActiveWindow.SmallScroll Down:=-3
Selection.FillDown
Rows("3:3").Select
Selection.AutoFilter
Columns("K:K").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveCell.SpecialCells(xlLastCell).Select
Range(Selection, Selection.End(xlUp)).Select
Range("K4:K9013").Select
Range("K9013").Activate
Selection.Copy
Range("C4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Columns("K:K").Select
Selection.Delete Shift:=xlToLeft


.ScreenUpdating = True
End With

MsgBox "Готово"
End Sub