Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » Andrey A
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Копирование двух умных таблиц и создание третьей, не работает макрос под Mac
 
#
03.06.2018 08:06:37
Файл с макросом.

Из третьей умной таблицы, расположенной на листе Vspom2 создаются сводные таблицы
 
Перейти    
Копирование двух умных таблиц и создание третьей, не работает макрос под Mac
 
#
02.06.2018 21:02:51
Здравствуйте, участники форума. Сделал макрос, который работ на PC, но не работает на Маке.

Макрос копирует умные таблицы "Table01", "Table02" на листах "01", "02" и вставляет на третий лист "vspom2" и делает из объединенной таблицы умную с названием "AllTables".

На Маке выделяется первая строчка макроса желтым и появляется сообщение "Эта команда приведет к остановке отладчика". Не пойму в чем проблема

Код
Sub ForAllTables()
    
Dim XYZ As Long
Dim iLastRowXYZ As Long

Worksheets("Vspom2").Activate
Worksheets("Vspom2").Cells.Select
Selection.Delete Shift:=xlUp

ThisWorkbook.Worksheets("01").Select
ThisWorkbook.Worksheets("01").ListObjects("Table01").Range.Select
Selection.Copy

ThisWorkbook.Worksheets("Vspom2").Range("A1").PasteSpecial xlPasteValues
ThisWorkbook.Worksheets("Vspom2").Range("A1").PasteSpecial xlPasteColumnWidths
ThisWorkbook.Worksheets("Vspom2").Range("A1").PasteSpecial xlPasteFormats

ThisWorkbook.Worksheets("02").Select
ThisWorkbook.Worksheets("02").ListObjects("Table02").DataBodyRange.Select
Selection.Copy

iLastRowXYZ = Worksheets("Vspom2").Cells(Rows.Count, 2).End(xlUp).Row

ThisWorkbook.Worksheets("Vspom2").Cells(iLastRowXYZ + 2, 1).PasteSpecial xlPasteValues
ThisWorkbook.Worksheets("Vspom2").Cells(iLastRowXYZ + 2, 1).PasteSpecial xlPasteColumnWidths
ThisWorkbook.Worksheets("Vspom2").Cells(iLastRowXYZ + 2, 1).PasteSpecial xlPasteFormats

Worksheets("Vspom2").Activate
XYZ = Cells(Rows.Count, 1).End(xlUp).Row
ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$1:$P$" & XYZ), , xlYes).Name = "AllTables"

End Sub
 
Перейти    
Защита существующих данных в ячееках при возможности внесения новых данных
 
#
25.04.2018 19:26:59
Может быть, как вариант с помощью VBA сделать так, чтобы при создании новой строки, у вновь созданных ячеек галачка "защищенная ячейка" снималась, а при сохранении файла галочки ставились на всех ячейках листа? Такое возможно реализовать?
 
Перейти    
Защита существующих данных в ячееках при возможности внесения новых данных
 
#
23.04.2018 21:36:22
nastya2018,спасибо за совет!

к сожалению, когда вставляю строку, она копирует формат рядом расположенных ячеек и вносить данные в ячейки не получается :-/
 
Перейти    
Защита существующих данных в ячееках при возможности внесения новых данных
 
#
23.04.2018 20:45:07
govorun, да, не исключаю, что подход к проблеме не совсем верный. просто, кто работает с этой таблицей, использует ранее внесенные (текстовые, т.е. просто читает) данные
 
Перейти    
Защита существующих данных в ячееках при возможности внесения новых данных
 
#
23.04.2018 20:28:28
Спасибо большое за ответ!

Делал подобную защиту, но когда создаю новую строку, в нее уже не запишешь новые данные  
 
Перейти    
Защита существующих данных в ячееках при возможности внесения новых данных
 
#
23.04.2018 18:52:51
Прошу помощь в очередной раз. Не могу разобраться с защитой ячеек. Каким образом можно реализовать возможность пользователя вносить дополнительные данные в таблицу (новые строки в любом месте таблицы + заполнение ячеек), но чтобы пользователь не мог редактировать (и удалять) существующие  данные. (Видимо, после сохранения таблицы или прошествии времени, возможность редактирования вновь внесенных данных исключалась). Добавлять данные мог, а изменять (в т.ч. удалять) не мог. Возможно ли реализовать такое в принцbпе? Если правильно понимаю, стандартными средствами такое не сделать? Только макросы? Будут ли проблемы с автофильтром и группировкой?
 
Перейти    
Обойти ограничение по количеству 255 символов в ячейке сводной таблицы
 
#
17.04.2018 21:14:23
Обрубается только в случае если редактировать текст сводной таблице или менять высоту строки. Есть какие-нибудь идеи как решить вопрос?
 
Перейти    
Обойти ограничение по количеству 255 символов в ячейке сводной таблицы
 
#
16.04.2018 21:12:49
Пока формировал таблицы для форума, заметил, что когда сводная таблица формируется, то текст помещается в нее полностью и только потом обрубается.

Зачем: в двух файлах работают два человека и оставляют в нем комментарии. Третий файл является сводным отчетом о проделанной работе.
 
Перейти    
Обойти ограничение по количеству 255 символов в ячейке сводной таблицы
 
#
16.04.2018 18:43:55
Столкнулся с проблемой.

Есть три файла: два файла с таблицами и третий с двумя сводными таблицами, которые построены на основе первых двух файлов. Структура первых двух файлов и сводных таблиц одинакова. Проблема в том, что в одна сводная таблица ставит ограничение на количество символов в ячейке (255 символов и просто обрубает оставшиеся символы). Во второй же сводной таблице все корректно. Форматы ячеек "общие" в обоих случаях. Как обойти ограничение в 255 символов в первой таблице?
 
Перейти    
Скрытие ячеек при возрастающем количестве новых строк
 
#
13.04.2018 18:43:58
Спасибо большое за помощь!!! Искренне благодарен вам!!! Все работает!!!
 
Перейти    
Скрытие ячеек при возрастающем количестве новых строк
 
#
09.04.2018 12:26:33
Здравствуйте участники форума!

Поскольку давно не занимался с VBA, и надо восстанавливать знания, то обращаюсь к вам.

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

Файл в приложении. В таблице есть небольшие комментарии. Количество столбцов урезано.

Вижу это следующим образом: цикл, в котором сначала проверяются количество количество одинаковых нескрытых ячеек в столбце "Предприятие". Если одинаковых ячеек больше 3, то верхние ячейки скрываются. Дальше происходит переход на следующие Предприятие.

Как это реализовать пока возникают некоторые сложности. Прошу помощи
 
Перейти    
редактирование таблицы
 
#
27.11.2009 14:04:47
Спасибо большое вам и этому сайту и форуму  
очень выручаете второй раз  
пасибо большое!  
очень признателен!!!
 
Перейти    
редактирование таблицы
 
#
26.11.2009 19:09:50
сказали что условное форматирование не принципиально, поэтому убрал  
соотв, просто должны выполняться 3 ограничения  
а из полученных значений мне необходимо взять 5 строк с минимальной площадью
 
Перейти    
редактирование таблицы
 
#
26.11.2009 18:56:10
ну в экселе конечно, а не в фотошопе )  
стормозил с файлом, прикладываю экселевский
 
Перейти    
редактирование таблицы
 
#
26.11.2009 18:39:33
в приложение есть таблица  
с помощью условного форматирования сделал так, чтобы строки удовлетворяющие ограничениям, сделались желтым цветом.  
вопрос в следующем:  
как мне сделать так чтобы у меня была либо новая таблица, только с желтыми строками; либо были скомпонованы по цвету (не принципиально). в дальнейшем необходимо будет выстроить строки так, чтобы в начале у меня были строки с минимальной площадью (столбец A (см^2))
 
Перейти    
из двоичного кода в столбец
 
#
18.11.2009 15:34:00
{quote}{login=vikttur}{date=18.11.2009 02:54}{thema=}{post}Так, наверное:  
=ПСТР($A$1;СТРОКА(1:1);1){/post}{/quote}  
 
спасибо большое!!!! то что надо!!!!
 
Перейти    
из двоичного кода в столбец
 
#
18.11.2009 15:33:32
{quote}{login=The_Prist}{date=18.11.2009 02:54}{thema=}{post}Как вариант:  
Данные-Текст по столбцам-Фиксированной ширины  
а затем транспонируем по строкам{/post}{/quote}  
 
нее это пробывал - не понравилось
 
Перейти    
из двоичного кода в столбец
 
#
18.11.2009 14:52:08
вопрос в следующем:  
есть число в двоичном коде записанное в одной ячейке. например 11001  
мне надо его записать так, чтобы каждая цифра была в отдельной ячейке, расположенной в столбце, т.е.  
1  
1  
0  
0  
1  
никак не могу понять как это реализовать  
и вообще возможно ли?
 
Перейти    
Страницы: 1
Наверх