NCHN (Автор тем)

Добавление текста в сводную таблицу, Как добавить определенный текст в сводную таблицу

Пользователь

Сообщений: 6 Регистрация: 24.07.2019

08.08.2019 22:20:30

Добрый вечер.
Из Лист1 делается сводная таблица(Лист2).
Как сделать что бы вместо цифр в сводной таблице было перечисление названий задач
например У Миши, нужно чтобы вместо цифры "2" в ячейке было написано:

1. Отправить товар в Москву
2. Созвониться с контрагентами

И на других цифрах тоже

Можете посоветовать как это реализовать в сводной таблице?
EXCEL 2013

Перейти

Как сохранить в массив только первые 4 символа ячейки

NCHN

Пользователь

Сообщений: 6 Регистрация: 24.07.2019

25.07.2019 09:14:25

Добрый день.
Есть столбец,в нем записаны тексты. В данном моменте мы записываем в массив таблицу А и Выводим массив в таблицу Сю
Я хочу через макрос VBA сохранить в массив только первые 4 символа.Используя массив
Я не знаю как реализовать.
Прикладываю код и файл.

Код

Sub Макрос1()
'
' Макрос1 Макрос
'
' Сочетание клавиш: Ctrl+й
'
   Columns("A:A").Select
   Dim a As Variant
   a = Range("A:A").Value
   
   Dim i As Long
   For i = 1 To 20
   Cells(i, 3).Value = a(i, 1)
   Next
End Sub

Посоветуйте каким методом можно реализовать эту функцию.
Нужен только макрос. Т,К Этот макрос будет использоваться в других макросах.
Спасибо

Перейти