Не разрываются связи с внешним источником

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Не разрываются связи с внешним источником (Макросы/Sub)

Anis625

Дата: Воскресенье, 04.02.2018, 15:38 | Сообщение № 1

Группа: Заблокированные

Ранг: Ветеран

Сообщений: 674

Репутация: 31 ±

Замечаний: 20% ±

Excel 2013

Доброго дня всем.

Знаю, что тема не нова. Но перепробовав все (штук 7 точно) макросы на различных форумах по разрыву связей увы не дали результат.

Во вложении "чистая" книга с непонятными связями. Есть "лекарство" (макрос) для данного случая?

К сообщению приложен файл: 6731758.xlsx (10.9 Kb)

Ответить

bmv98rus

Дата: Воскресенье, 04.02.2018, 16:26 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4149

Репутация: 772 ±

Замечаний: 0% ±

Excel 2013/2016

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

~~Замечательный~~ Временно просто медведь ~~, процентов на 20~~.

Ответить

Anis625

Дата: Воскресенье, 04.02.2018, 16:29 | Сообщение № 3

Группа: Заблокированные

Ранг: Ветеран

Сообщений: 674

Репутация: 31 ±

Замечаний: 20% ±

Excel 2013

Все что можно удалил. Даже скрытые имена.
Единственное что помогает (но не решает задачу) - это выделить все ячейки листа и удалить. Значит где то спрятана эта связь.

Сообщение отредактировал Anis625 - Воскресенье, 04.02.2018, 16:29

Ответить

Karataev

Дата: Воскресенье, 04.02.2018, 17:32 | Сообщение № 4

Группа: Проверенные

Ранг: Старожил

Сообщений: 1336

Репутация: 533 ±

Замечаний: 0% ±

Excel

Anis625, куда Вы нажимаете, чтобы увидеть связи, о которых Вы пишите?

Ответить

Anis625

Дата: Понедельник, 05.02.2018, 07:41 | Сообщение № 5

Группа: Заблокированные

Ранг: Ветеран

Сообщений: 674

Репутация: 31 ±

Замечаний: 20% ±

Excel 2013

Цитата Karataev, 04.02.2018 в 17:32, в сообщении № 4 ()

Karataev

были связи. Утром сегодня смотрю, же нет. Как так? bmv98rus тоже ведь видел

Ответить

bmv98rus

Дата: Понедельник, 05.02.2018, 07:53 | Сообщение № 6

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4149

Репутация: 772 ±

Замечаний: 0% ±

Excel 2013/2016

Цитата Anis625, 04.02.2018 в 16:29, в сообщении № 3 ()

то есть не понятно где они

это я о том что не видел. :-) вы не правильно поняли моего юморка.

~~Замечательный~~ Временно просто медведь ~~, процентов на 20~~.

Ответить

Anis625

Дата: Понедельник, 05.02.2018, 13:06 | Сообщение № 7

Группа: Заблокированные

Ранг: Ветеран

Сообщений: 674

Репутация: 31 ±

Замечаний: 20% ±

Excel 2013

Добавляю файл (тоже пустой), но в этот раз я не удалял ячейки и строки - только зачистил данные.

К сообщению приложен файл: 6676452.xlsx (15.6 Kb)

Ответить

SLAVICK

Дата: Понедельник, 05.02.2018, 13:20 | Сообщение № 8

Группа: Модераторы

Ранг: Старожил

Сообщений: 2290

Репутация: 766 ±

Замечаний: 0% ±

2019

1. Главная -- Условное форматирование -- удалить все правила с текущего листа...
2. Сохранить файл -- закрыть файл -- открыть файл -- радуемся

.
Можно удалить не все правила, а только со ссылками на др. листы - потом сделать пункт 2

Добавлено.
Макрос из заначки для удаления УФ с ошибочными ссылками:
[vba]

Код

Sub ConditionWithErrorKill()
    Dim X As Worksheet
        For Each X In ActiveWorkbook.Worksheets
        t = X.Cells.FormatConditions.Count
            Do While t >= 1
            Set xf = X.Cells.FormatConditions(t)
            If InStr(1, xf.Formula1, "#ССЫЛКА!") Then xf.Delete
            t = t - 1
            Loop
        Next X
End Sub

[/vba]
можно запустить макрос, - потом сделать пункт 2

Иногда все проще чем кажется с первого взгляда.

Сообщение отредактировал SLAVICK - Понедельник, 05.02.2018, 13:33

Ответить

Anis625

Дата: Понедельник, 05.02.2018, 14:01 | Сообщение № 9

Группа: Заблокированные

Ранг: Ветеран

Сообщений: 674

Репутация: 31 ±

Замечаний: 20% ±

Excel 2013

Сработало =) крутяк =) Сохраняю в свою копилку. Благодарю Вас =)

Ответить

Не разрываются связи с внешним источником (Макросы/Sub)

Страница 1 из 1
1