Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Как оставить только один из дублей?
 
Есть таблица. В ней колонка "Артикул" может иметь идентичные значения с другими строками. Я подсветил их цветов и могу отфильтровать.
Но как удалить строки с дублями так, чтобы остался только один уникальный артикул?

Это делается как-то средствами excel или нужен макрос?

Пример файла прикрепляю.
Как удалить строки ячейки которых содержат только буквы?
 
Есть таблица. В ней несколько колонок, но одна колонка - Артикулы.
Нужно удалить те строки, в которых артикулы состоят только из букв (то есть не существует таких артикулов, это скорее всего названия брендов).

Может есть какой готовый макрос для этого? Или подскажите как отфильтровать функцией?

Пример прикрепляю:
Изменено: lidolov - 13.03.2020 16:50:11
Разделить на строки ячейку
 
Ячейка заполнена построчно.
Необходимо раздели строчные данные из одной ячейки по нескольким.

Пример в excel прикладываю к сообщению.

Может быть уже есть готовые макросы на такое?
Изменено: lidolov - 19.02.2020 16:05:58
Как макросом в зависимости от значения в колонке [A] расположить данные из колонки [B] в строку в колонке [C]?
 
Ищу макрос, который: в зависимости от буквы в колонки [A] превратит данные в колонке [B] в строку в колонке [C].
Файл прикрепил.

Я сам программирую на PHP. Если еще направите где проще самому начать писать на VBA - буду благодарен.
Фиксация ячейки при автозаполнении. Как сделать?
 
Есть таблица:
0
12
23
34
45
50
Мне надо ее размножить. Но чтобы в первой ячейке всегда ноль получался.
Видел решение через ссылку на ячейку $A$B. Но мне не на что ее ставить))

Подскажите как быть?
Макрос сбора всех листов в один лист. Нужна коррекция
 
Код
Sub m()
    For i = 1 To Sheets.Count
        If Sheets(i).Name <> "Общий" Then
           myR_Total = Sheets("Общий").Range("A" & Sheets("Общий").Rows.Count).End(xlUp).Row
           myR_i = Sheets(i).Range("A" & Sheets(i).Rows.Count).End(xlUp).Row

           If i = 1 Then
            Sheets(i).Rows("1:" & myR_i).Copy Sheets("Общий").Range("A" & myR_Total)
           Else
            Sheets(i).Rows("2:" & myR_i).Copy Sheets("Общий").Range("A" & myR_Total)
           End If

        End If
    Next
End Sub

Макрос делает все что мне нужно, только копирует формулы, а мне нужны значения. Подскажите как его подкорректировать.

Искал решение в интернете, но в данный код нужное вставить не хватает знаний синтаксиса VBA. Подскажите пожалуйста.
Нужен макрос для добавления недостающих ячеек по эталонной колонке
 
Есть таблица состоящая из трех колонок.
Первая колонка - ID.
Вторая колонка - Буква.
Третья - значение.

Задача: у каждого ID должен быть полный набор букв.
А значения для недостающих букв должны формировать так:
Значение берется от предыдущей буквы. Если предыдущие буквы все пустые - нужно взять первое следующее значение.

Если такой макрос уже есть - подскажите пожалуйста где его можно взять.
Объединить все модифицированные цены по коду товара
 
Делаю из выгрузок 1С файл, для импорта в Интернет-Магазин.

Нужно сделать вот что: пока код товара (столбик 2) равен одному числу - нужно объединить все модифицированные цены (столбик 2) в одну строку.
И так далее. Каждый раз, когда код товара становится другим числом - должна появляться новая длинная строка.
Как это можно сделать, и с помощью чего? Спасибо.
Изменено: lidolov - 27.10.2015 20:40:29 (поправил сообщение согласно правилу 2.3)
Страницы: 1
Наверх