В ячейке 1 есть текст вида "112-12 Иванов И.И." Нужно, чтобы в ячейку 2 попали только первые несколько символов, конкретно, цифры "112-12".
В самом листе ввел в нужную ячейку нужную формулу - =ЛЕВСИМВ(A1;6) - получил то, что нужно. А как правильное тоже самое в код (в макрос) вставить?
вот фрагмент кода
===
r = Range("A65536").End(xlUp).Row + 1 'находим первую пустую строку
'выводим данные по файлу
For Each f1 In fc
Cells(r, 1) = f1.Name
r = r + 1
Next
===
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший