Как вставить строку по значению ячейки в excel

doc-insert-row-based-on-value-1

Предположим, у вас есть диапазон данных, и вы хотите автоматически вставлять пустые строки выше или ниже определенного значения в Excel, например, автоматически вставлять строки ниже нулевого значения, как показано ниже. В Excel нет прямого способа решить эту задачу, но я могу ввести код макроса для автоматической вставки строк на основе определенного значения в Excel.
Вставить строку ниже на основе значения ячейки с помощью VBA

Вставьте строку выше на основе значения ячейки с помощью Kutools for Excel хорошая идея3


Чтобы вставить строку на основе значения ячейки, запустив VBA, выполните следующие действия:

1. Нажмите Alt + F11 одновременно, а Microsoft Visual Basic для приложений окно выскакивает.

2. Нажмите Вставить > Модули, затем вставьте ниже код VBA во всплывающий Модули окно.

VBA: вставьте строку ниже на основе значения ячейки.

Sub BlankLine()
	'Updateby20150203
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId                   = "KutoolsforExcel"
	Set WorkRng                = Application.Selection
	Set WorkRng                = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	Set WorkRng                = WorkRng.Columns(1)
	xLastRow                   = WorkRng.Rows.Count
	Application.ScreenUpdating = False
	For xRowIndex = xLastRow To 1 Step - 1
		Set Rng                   = WorkRng.Range("A" & xRowIndex)
		If Rng.Value = "0" Then
			Rng.Offset(1, 0).EntireRow.Insert Shift: = xlDown
		End If
	Next
	Application.ScreenUpdating = True
End Sub

3. Нажмите F5 ключа или Run нажмите кнопку, появится диалоговое окно и выберите столбец, содержащий ноль. Смотрите скриншот:
doc-insert-row-based-on-value-2

4. Нажмите OK. Тогда пустые строки будут вставлены ниже нулевого значения.
doc-insert-row-based-on-value-3

Функции:

1. Если вы хотите вставить строки на основе другого значения, вы можете изменить 0 на любое значение, которое вы хотите в VBA: Если Rng.Value = «0», то.

2. Если вы хотите вставить строки выше нуля или другого значения, вы можете использовать приведенный ниже код vba.

VBA: вставить строку выше нулевого значения:

Sub BlankLine()
	'Updateby20150203
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId                   = "KutoolsforExcel"
	Set WorkRng                = Application.Selection
	Set WorkRng                = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	Set WorkRng                = WorkRng.Columns(1)
	xLastRow                   = WorkRng.Rows.Count
	Application.ScreenUpdating = False
	For xRowIndex = xLastRow To 1 Step - 1
		Set Rng                   = WorkRng.Range("A" & xRowIndex)
		If Rng.Value = "0" Then
			Rng.EntireRow.Insert Shift: = xlDown
		End If
	Next
	Application.ScreenUpdating = True
End Sub

doc-insert-row-based-on-value-4


Если вы не знакомы с VBA, вы можете попробовать Kutools for Excel‘s Выбрать определенные ячейки утилита, а затем вставьте строки выше.

После установки Kutools for Excel, пожалуйста, сделайте следующее:(Бесплатная загрузка Kutools for Excel Сейчас!)

1. Выберите список, из которого вы хотите найти определенные ячейки, и нажмите Кутулс > Выберите > Выбрать определенные ячейки. Смотрите скриншот:
doc вставить строку на основе значения 9

2. В появившемся диалоговом окне отметьте Весь ряд вариант, а затем перейдите, чтобы выбрать Равно от Конкретный тип список, а затем введите значение, которое вы хотите найти, в правом текстовом поле. Смотрите скриншот:
doc вставить строку на основе значения 6

3. Нажмите Ok, и появится диалоговое окно, напоминающее количество выбранных строк, просто закройте его.

4. Поместите курсор в одну выбранную строку и щелкните правой кнопкой мыши, чтобы выбрать Вставить из контекстного меню. Смотрите скриншот:
doc вставить строку на основе значения 7

Теперь строки вставляются выше на основе определенного значения.
doc вставить строку на основе значения 8


Относительные статьи:

  • Вставить пустые строки в Excel

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

Комментарии (43)


Оценок пока нет. Оцените первым!

Предположим, есть ячейка C3 со значением:

123

И есть ячейка D3 со значением:

789.15

Необходимо в ячейке A3 получить строку:

Количество 123, Цена 789.15 руб.

Решение:

В Excel прописать составную строку в ячейку можно только через формулу. Поэтому в ячейке A3 первым символом должен идти знак равенства =.

Далее просто пишутся строковые константы в кавычках, и объединяются (конкатенируются) со значениями из других ячеек через знак &:

=»Количество » & C3 & «, Цена » & C4 & » руб.»

Если необходимо сделать перевод строки, можно воспользоваться функцией СИМВОЛ(10), вот так:

=»Количество » & C3 & «, » & СИМВОЛ(10) & «Цена » & C4 & » руб.»

На чтение 3 мин. Просмотров 69 Опубликовано 21.05.2021

Предположим, у вас есть диапазон данных, и вы хотите автоматически вставлять пустые строки выше или ниже определенного значения в Excel, например, автоматически вставлять строки ниже нулевого значения, как показано ниже. В Excel нет прямого способа решить эту задачу, но я могу ввести код макроса для автоматической вставки строк на основе определенного значения в Excel.
Вставить строку ниже на основе ячейки значение с VBA

Вставить строку выше на основе значения ячейки с помощью Kutools for Excel


Содержание

  1. Вставить строку ниже на основе значения ячейки с помощью VBA
  2. Вставить строку выше на основе значение ячейки с помощью Kutools for Excel
  3. Вставить строки сверху на основе значения ячейки
  4. Относительные статьи:

Вставить строку ниже на основе значения ячейки с помощью VBA

Чтобы вставить строку на основе значения ячейки с помощью VBA, выполните следующие действия:

1. Одновременно нажмите клавиши Alt + F11 , и появится окно Microsoft Visual Basic для приложений .

2. Нажмите Вставить > Module , затем вставьте ниже код VBA в всплывающее окно Module .

VBA: вставьте строку ниже на основе значения ячейки.

3. Нажмите клавишу F5 или Выполнить , появится диалоговое окно и выберите столбец, содержащий ноль. См. Снимок экрана:

4. Нажмите ОК . Затем пустые строки будут вставлены ниже нулевого значения.

Совет :

1. Если вы хотите вставить строки на основе другого значения, вы можете изменить 0 на любое значение в VBA: If Rng.Value = “0” Then.

2. Если вы хотите вставить строки с нулевым значением или другим значением, вы можете использовать приведенный ниже код vba.

VBA: Вставить строку с нулевым значением:


Вставить строку выше на основе значение ячейки с помощью Kutools for Excel

Если вы не знакомы с VBA, вы можете попробовать Kutools for Excel Выбрать Определенные ячейки , а затем вставьте строки выше.

Kutools for Excel , с более чем 300 удобными функциями, облегчит вашу работу.

Бесплатная загрузка
Бесплатная полнофункциональная 30-дневная

После установки Kutools for Excel, сделайте следующее: (Загрузите Kutools for Excel бесплатно прямо сейчас! )

1. Выберите список, из которого вы хотите найти определенные ячейки, и нажмите Kutools > Выбрать > Выбрать определенные ячейки . См. Снимок экрана:

2. В появившемся диалоговом окне установите флажок Вся строка , затем выберите Равно из списка Определенный тип , а затем введите значение, которое вы хотите найти, в правом текстовом поле. См. Снимок экрана:

3. Нажмите Ok , и появится диалоговое окно с напоминанием о количестве выбранных строк, просто закройте его.

4. Поместите курсор в одну выбранную строку и щелкните правой кнопкой мыши, чтобы выбрать Вставить из контекстного меню. См. Снимок экрана:

Теперь строки вставляются выше на основе определенного значения.

Вставить строки сверху на основе значения ячейки

Kutools для Excel: 300 + функции, которые вам необходимы в Excel, 30-дневная бесплатная пробная версия отсюда


Относительные статьи:

  • Вставьте пустые строки в Excel

Пункты меню «Вставить»

  1. Выделите ячейки с данными и атрибутами, которые требуется скопировать.

  2. На вкладке Главная нажмите кнопку Копировать  Значок "Копировать".

  3. Щелкните первую ячейку в области, куда требуется вставить скопированное содержимое.

  4. На вкладке Главная щелкните стрелку рядом с кнопкой Вироватьи сделайте следующее. Содержимое меню Вставить зависит от типа данных в выбранных ячейках.

    На вкладке "Главная" выберите "Вставка"

Пункт меню

Что вставляется

Вставить

Все содержимое и формат ячеек, включая связанные данные.

Формулы

Только формулы.

Формулы и форматы чисел

Только формулы и форматы чисел.

Сохранить исходное форматирование

Все содержимое и формат ячеек.

Без рамок

Все содержимое и формат ячеек, кроме границ ячеек.

Сохранить ширину столбцов оригинала

Только атрибуты ширины столбцов.

Транспонировать

Вставка содержимого скопированных ячеек с изменением ориентации. Данные строк будут вставлены в столбцы, и наоборот.

Вставить значения

Только значения в том виде, как они отображаются в ячейках.

Значения и форматы чисел

Только значения и форматы чисел.

Значения и исходное форматирование

Только значения, цвет и размер шрифта.

Форматирование

Все атрибуты форматирования ячеек, включая форматы чисел и исходное форматирование.

Вставить связь

Вставляемые значения связываются с исходными. При вставке связи в копируемые данные Excel вводит абсолютную ссылку на копируемую ячейку или диапазон ячеек в новом месте.

Вставить как рисунок

Скопированные данные как изображение.

Связанный рисунок

Скопированные данные как изображение со ссылкой на исходные ячейки (изменения, внесенные в исходных ячейках, отражаются и в ячейках, куда вставлено изображение).

ширины столбцов

Вставка ширины столбца или диапазона столбцов в другой столбец или диапазон столбцов.

Объединить условное форматирование

Условное форматирование из скопированных ячеек объединяется с условным форматированием в области вставки.

Параметры специальной вставки

  1. Выделите ячейки с данными и атрибутами, которые требуется скопировать.

  2. На вкладке Главная нажмите кнопку Копировать  Значок "Копировать".

  3. Щелкните первую ячейку в области, куда требуется вставить скопированное содержимое.

  4. На вкладке Главная щелкните стрелку рядом с кнопкой В таблицуи выберите специальную ветвь.

    На вкладке "Главная" выберите "Вставка"

  5. Выберите нужные параметры.

    Поле "Специальная вставка"

Параметры вставки

Пункт меню

Что вставляется

Все

Все содержимое и формат ячеек, включая связанные данные.

Формулы

Только формулы.

значения

Вставка только значений в том виде, как они отображаются в ячейках.

форматы

Содержимое и формат ячеек.

примечания

Вставка только примечаний к ячейкам.

проверка

Только правила проверки данных.

с исходной темой

Все содержимое и форматирование ячеек с использованием темы, примененной к исходным данным.

без рамки

Содержимое и формат ячеек, кроме границ ячеек.

ширины столбцов

Атрибуты ширины столбца или диапазона столбцов в другой столбец или диапазон столбцов.

формулы и форматы чисел

Только формулы и форматы чисел.

значения и форматы чисел

Только значения и форматы чисел из выделенных ячеек.

все, объединить условное форматирование

Условное форматирование из скопированных ячеек объединяется с условным форматированием в области вставки.

Параметры операций

Параметры операций позволяют выполнить математические действия со значениями из областей копирования и вставки.

Параметр

Результат

Нет

Вставка содержимого скопированной области без математического действия.

сложить

Добавление значений из области копирования к значениям в области вставки.

вычесть

Вычитание значений из области копирования из значений в области вставки.

умножить

Умножение значений из области вставки на значения из области копирования.

разделить

Деление значений из области вставки на значения из области копирования.

Доступны и другие параметры:

Параметр

Результат

Пропускать пустые ячейки

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

Транспонировать

Вставка содержимого скопированных ячеек с изменением ориентации. Данные строк будут вставлены в столбцы, и наоборот.

Вставить связь

Если данные представляют собой рисунок, он связывается с исходным рисунком. В случае изменения исходного рисунка вставленный также меняется.

Совет: Некоторые параметры доступны как в меню В paste, так и в диалоговом окне Специальная ветвь. Их названия могут слегка различаться, но результат оказывается одинаковым.

  1. Выделите ячейки с данными и атрибутами, которые требуется скопировать.

  2. На панели инструментов Стандартная нажмите кнопку Копировать Кнопка "Копировать".

  3. Щелкните первую ячейку в области, куда требуется вставить скопированное содержимое.

  4. На вкладке Главная в области Правканажмите кнопку В таблицуи выберите специальную ветвь.

    Вкладка "Главная", группа "Изменить"

  5. В диалоговом окке Специальная ветвь в области Ветвьсделайте следующее:

    Команда

    Действие

    Все

    В этом формате включаем все содержимое и формат ячейки, включая связанные данные.

    Формулы

    Вставка только формул в том виде, как они вводятся в строку формул.

    Значения

    В этом окте можно вировать только значения, отображаемые в ячейках.

    форматы

    В этом формате можно в нее в форматировать только ячейки.

    Примечания

    Вставка только примечаний к ячейкам.

    Проверка

    В этой области можно вировать правила проверки данных для скопированные ячейки.

    с исходной темой

    В этом формате можно в виде темы, примененной к исходным данным, в виде вложенного содержимого и форматирования ячейки.

    без рамки

    В этом формате можно в нее в форматировать все содержимое и содержимое ячейки, кроме границ ячеев.

    ширины столбцов

    Вставка ширины столбца или диапазона столбцов в другой столбец или диапазон столбцов.

    формулы и форматы чисел

    В этом формате можно вировать только формулы и параметры форматирования для выбранных ячеек.

    значения и форматы чисел

    В этом формате можно вировать только значения и параметры форматирования из выбранных ячеек.

    Объединить условное форматирование

    Условное форматирование из скопированных ячеек объединяется с условным форматированием в области вставки.

    Чтобы математически объединить значения между областями копирования и вжатия, в диалоговом окне Специальная вация в области Операция выберите математическую операцию, которую вы хотите применить к скопированные данные.

    Команда

    Результат

    Нет

    Вставка содержимого скопированной области без математического действия.

    сложить

    Добавление значений из области копирования к значениям в области вставки.

    вычесть

    Вычитание значений из области копирования из значений в области вставки.

    умножить

    Умножение значений из области вставки на значения из области копирования.

    разделить

    Деление значений из области вставки на значения из области копирования.

    Дополнительные параметры определяют, как будут обрабатываться пустые ячейки при вклеии, как в них вся скопированная информация, как строки или столбцы, и связывание скопированные данные.

    Команда

    Действие

    Пропуск пустых страниц

    Избегайте замены значений в области в области в виде висячего в том случае, если пустые ячейки встречаются в области копирования.

    Транспонировать

    Измените столбцы скопированные данные на строки и наоборот.

    Вставить связь

    Вставляемые значения связываются с исходными. При вставке связи в копируемые данные Excel вводит абсолютную ссылку на копируемую ячейку или диапазон ячеек в новом месте.

    Примечание: Этот параметр доступен только при выборе параметра Все или Все, кроме границ в диалоговом окне «Специальная ветвь»

Вставка или Ctrl+V, пожалуй, самый эффективный инструмент доступный нам. Но как хорошо вы владеете им? Знаете ли вы, что есть как минимум 14 различных способов вставки данных в листах Ecxel? Удивлены? Тогда читаем этот пост, чтобы стать пэйст-мастером.

Данный пост состоит из 2 частей:

— Основные приемы вставки

— Вставка с помощью обработки данных

1. Вставить значения

Вставить значения ExcelЕсли вы хотите просто вставить значения с  ячеек, последовательно нажимайте клавиши Я, М и З, удерживая при этом клавишу Alt, и в конце нажмите клавишу ввода. Это бывает необходимо, когда вам нужно избавиться от форматирования и работать только с данными.

Начиная с Excel 2010, функция вставки значений отображается во всплывающем меню при нажатии правой клавишей мыши

Вставить значения правой кнопкой Excel

 2. Вставить форматы

Вставить форматы ExcelНравиться этот чудный формат, который сделал ваш коллега? Но у вас нет времени, чтобы так же оформить свою таблицу. Не беспокойтесь, вы можете вставить форматы (включая условное форматирование) из любой скопированной ячейки. Удерживая клавишу Alt, последовательно нажимайте Я, М, Ф, Ф, Ф и в конце нажмите клавишу Ввода.

Те же самые действия можно произвести с помощью меньшего количества операций, воспользовавшись меню, которое выпадает при нажатии правой кнопки мыши (начиная с Excel 2010).

3. Вставить формулы

Иногда возникает необходимость скопировать несколько формул в новый диапазон. Для этого, удерживая клавишу Alt, последовательно нажимаем Я, М, Ф и в конце нажмите клавишу Ввода. Вы можете достичь того же эффекта, путем перетаскивания ячейки, содержащей формулу, в новый диапазон, если диапазон находится рядом.

4. Вставить проверку данных

Вставка проверки данных ExcelХотите скопировать только проверку значений, без содержимого и форматов ячейки. Для этого копируете ячейку, в котором присутствует проверка условий, щелкаете правой кнопкой мыши на ячейку, куда хотите скопировать данные. Выбираете Специальная вставка -> Условия на значения.

Условия на значения Excel

5. Скопировать ширину столбцов с других ячеек

Вашему боссу понравилась, созданная вами, табличка по отслеживанию покупок и он попросил создать еще одну, для отслеживания продаж. В новой таблице вы хотите сохранить ширину столбцов. Для этого вам нет необходимости измерять каждый столбец первой таблицы, а просто скопировать их и с помощью специальной вставки задать «Ширина столбцов».

6. Берем комментарии и вставляем в другом месте

Чтобы сократить количество перепечатываний, комментарии тоже можно вставлять копипейстом. Для этого необходимо воспользоваться специальной вставкой и указать «Вставить примечания»

7. И конечно, вставляем все подряд

В этом нам помогут сочетания клавиш Ctrl+V или Alt+Я+М или клавиша вставки на панели инструментов.

Вставка с помощью обработки данных

8. Вставка с дополнительной математической операцией

Вставка с дополнительной математической операцией ExcelК примеру, у вас имеется строка 1 со значениями 1, 2, 3, и строка 2 со значениями 4, 5, 6. И вам необходимо сложить обе строки, чтобы получить 5, 7, 9. Для этого копируем первую строку, жмем правой кнопкой мыши по строке 2, выбираем Специальная вставка, ставим переключатель на «Сложить» и жмем ОК.

Те же самые операции необходимо будет проделать, если вам требуется вычесть, умножить или разделить данные. Отличием будет, установка переключателя на нужной нам операции.

Вставка с дополнительными опреациами Excel

9. Вставка с учетом пустых ячеек

Если у вас имеется диапазон ячеек, в котором присутствуют пустые ячейки и необходимо вставить их другой диапазон, но при этом, чтобы пустые ячейки были проигнорированы.

Вставка с учетом пустых строк Excel

В диалоговом окне «Специальная вставка» установите галку «Пропускать пустые ячейки»

10. Транспонированная вставка

транспониированная вставка ExcelК примеру, у вас имеется колонка со списком значений, и вам требуется переместить (скопировать) данные в строку (т.е. вставить их поперек). Как бы вы это сделали? Ну конечно, вам следует воспользоваться специальной вставкой и в диалоговом окне установить галку «Транспонировать». Либо воспользоваться сочетанием клавиш Alt+Я, М и А.

Эта операция позволит транспонировать скопированные значения прежде, чем вставит. Таким образом, Excel преобразует строки в столбцы и, наоборот, столбцы в строки.

11. Вставить ссылку на оригинальную ячейку

Если вы хотите создать ссылки на оригинальные ячейки, вместо копипэйстинга значений, этот вариант, то, что вам нужно. Воспользуйтесь специальной вставкой, как примерах выше, и вместо кнопки «ОК» , нажмите «Вставить связь». Либо воспользуйтесь сочетанием клавиш Alt+Я, М и Ь, что создаст автоматическую ссылку на скопированный диапазон ячеек.

12. Вставить текст с разбивкой по столбцам

Эта опция полезна, когда вы вставляете данные извне. Например, если вы хотите вставить несколько строчек этого блога на лист Excel, но при этом каждое слово было в отдельном столбце. Для этого копируем текст (Ctrl+C), переходим на лист Excel и вставляем данные (Ctrl+V). У меня, по умолчанию, программа вставила строку с текстом в одну ячейку. Теперь необходимо проделать небольшой финт ушами. Идем во вкладку «Данные» -> «Текст по столбцам» и настраиваем мастер текстов. На первом шаге указываем формат данных – «с разделителями», жмем «Далее», устанавливаем символ-разделитель —  «Пробел» и «Готово». Текст, который, мы вставили в одну ячейку разбился по столбцам. Таким образом мы указали программе, как бы мы хотели воспринимать текстовые данные.

91-paste-text-import-wizard

Теперь, во время последующих вставок текста, кликаем правой кнопкой по ячейке, куда вы хотите вставить текст, выбираем «Специальная вставка» -> «Текст» -> «ОК». Excel разбил нашу строку на столбцы, что нам и требовалось.

92-paste-text-import-wizard

13. Импорт данных из интернета

Если вы хотите импортировать данные с интернета в реальном времени, вы можете воспользоваться веб-запросами Excel. Это мощный инструмент, который позволяет извлекать данные из сети (или сетевых ресурсов) и отображает их в виде электронной таблицы. Узнать больше об импорте данных вы можете прочитав статью о веб запросах Excel.

14. Какой ваш любимый способ вставки?

Есть еще много других скрытых способов вставки, таких как вставка XML-данных, изображений, объектов, файлов и т.д. Но мне интересно, какими интересными приемами вставки пользуетесь вы. Напишите, какой ваш любимый способ вставки?

Понравилась статья? Поделить с друзьями:

А вот еще интересные статьи:

  • Как вставить строку или столбец в таблицу word
  • Как вставить строку или столбец в таблицу excel
  • Как вставить строку для подписи в word
  • Как вставить строку в умную таблицу excel
  • Как вставить строку в таблицу word между строками

  • 0 0 голоса
    Рейтинг статьи
    Подписаться
    Уведомить о
    guest

    0 комментариев
    Старые
    Новые Популярные
    Межтекстовые Отзывы
    Посмотреть все комментарии