Добрый день. Ребята я наверное достал вас со своими вопросами, блин ну всегда обращаюсь только по крайней необходимости. Сегодня готовил отчетную ведомость вышло около 2000 строк. После чего мне нужно было удалить автоматически формулы и оставить их значения со всей книги, я воспользовался макросом, который находится в примере, он удалил формулы и оставил их значения, но вот в чем проблема, в формуле по условию получалось значение "3.1", а после выполнения макросом получилось "3,1". Ребята помогите, как быть. Плиззз!!!
Макрос на удаление формул
25.06.2013 18:36:47
|
|
|
|
25.06.2013 19:06:27
Если в ячейках с формулами установить текстовый формат - то работает.
В макросах не понимаю - почему не знаю. |
|
|
|
25.06.2013 19:10:23
В этом то и проблема формул больше 1000
|
|
|
|
25.06.2013 19:28:37
Ну хоть кто-нибудь
|
|
|
|
25.06.2013 20:00:56
Файл не смотрел, но, если у Вас там используется .value - попробуйте .text
|
|
|
|
25.06.2013 20:12:27
Не подскажите, в чем разница между моим макросом(я его записал макрорекордером), и вашим, чисто из любопытства
Sub Макрос4() Sheets(Array("Лист1", "Лист2", "Лист3")).Select Sheets("Лист1").Activate Cells.Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A1").Select ActiveSheet.Paste Application.CutCopyMode = False Sheets("Лист1").Select Range("A1").Select End Sub |
|
|
|
25.06.2013 20:13:19
А так огромнейшее спасибо за помощь. Я думал вся моя работа пойдет под хвост.
Изменено: |
|
|
|
25.06.2013 20:21:29
Разница - во всём. Это два совершенно разных макроса. Что именно Вы хотите услышать в ответ на Ваш вопрос? |
|||
|
|
25.06.2013 20:24:25
Каким лучше пользоваться, какой быстрее.
|
|
|
|
25.06.2013 20:37:10
Лучше, быстрее, универсальнее и правильнее All_Formulas_To_Values_In_All_Sheets
|
|
|
|
25.06.2013 20:38:58
Всё спасибо, значит буду пользоваться ей.
|
|
|
|
25.06.2013 20:42:27
|
|||
|
|
25.06.2013 20:44:37
Будем надеится
|
|
|
|
25.06.2013 20:55:12
Испытал макрос, работает отлично. Но теперь возникла другая проблема. В рассчетах цифры получались например 82,6, а после выполнения макросом 82,5588001734408.
|
|
|
|
25.06.2013 20:56:27
Ну округлите их
|
|
|
|
25.06.2013 20:59:44
Вручную, их слишком много. А макросом незнаю как,наверно никак.
|
|
|
|
25.06.2013 21:09:50
Не могу не отметить тот факт, что коды взяты с моего сайта :-)
Чтобы округлить сначала определитесь, что важнее - точное совпадение вычислений на листе или округление. Ведь если тупо округлить значения, то какие-то ячейки, участвующие ранее в вычислениях будут давать неверный результат. Лучше просто примените формат к ячейкам и до, и после:
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
|
|||
|
|
25.06.2013 21:12:26
|
|||
|
|
25.06.2013 21:21:29
Хотел как быстрее и лучше сделать работу. Но надобыло на начальной стадии задаться этим вопросом. просто получается у меня выводит формулы значения "формат общий", а какието числовой число десятичных знаков либо 1, либо2. А может мне сделать так, попробывать макрос записанный макрорекордером, он у меня выводит значения, а потом воспользоваться вашим макросом не много переделанным Serge 007.
|
|
|
|
25.06.2013 21:26:10
|
|||||||
|
|
25.06.2013 22:02:40
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
|
|||
|
|
25.06.2013 22:06:48
Кому интересно. Вообщем, нашел решение, записал макрос (выделил все листы в книги кнопкой shift, выделил весь лист1, соответственно выделились так же другие листы, копировать, спец. вставка вставить зачения, убрал выделение с листов, остановил запись. И вот, что получилось:
Вроде работает. |
|||
|
|
25.06.2013 22:07:54
Если есть другие придложения или замечания, с радостью прочитаю. А так спосибо всем, за то что обратили на мою тему, было очень приятно.
Изменено: |
|
|
|
25.06.2013 22:37:11
Есть прИдложение: в сообщении оформляйте код соответствующим тэгом (кнопочка над полем для сообщения)
|
||||
|
|
|||