Ошибка при выделении пустых ячеек

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

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

20.12.2011 16:10:43

Добрый день

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

Заранее спасибо

Прикрепленные файлы

post_290179.xlsx (9.6 КБ)

KuklP Пользователь Сообщений: 14868 Регистрация: 21.12.2012 E-mail и реквизиты в профиле.	#2 20.12.2011 16:16:51 Автофильтром. Я сам - дурнее всякого примера! ...

Guest Гость	#3 20.12.2011 16:17:05 Какой-то глюк. Но если в пустых ячейках нажать Delete (т.е. удалить содержимое), то потом спокойно можно их выделить через F5 (Ctrl+G)

Владимир

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

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

20.12.2011 16:22:42

Прогнал вот этот макрос и заработало:

Sub Replace_from_Format()
Dim rCell As Range
Application.ScreenUpdating = False
For Each rCell In Range("A2:A" & Cells(Rows.Count, 1).End(xlUp).Row)
rCell.Value = Format(rCell, rCell.NumberFormat)
rCell.NumberFormat = "# ??/??"
Next rCell
Application.ScreenUpdating = True
End Sub

"..Сладку ягоду рвали вместе, горьку ягоду я одна."

Adelora Пользователь Сообщений: 12 Регистрация: 01.01.1970	#5 20.12.2011 16:24:49 спасибо огромное. Тоже delete вылечилось :) глюк, может потому, что из сводной копировалось...

GIG_ant Пользователь Сообщений: 3102 Регистрация: 24.12.2012	#6 20.12.2011 16:28:11 Попробуйте выполнить вот этот макрос на проблемном листе. Sub test() Dim r As Range For Each r In Me.UsedRange.SpecialCells(xlCellTypeConstants, 2) r.Value = r.Value Next r End Sub Редко но метко ...

Читают тему