Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Унаследовать данные с одного листа на другой в определенном диапазоне или поечеечно, нужно простое решение без макросов и т.д.
 
Добрый день.

Снова нужна ваша помощь

Все круто с вашей первой идеей. Работает все идеально.
Но всегда есть НО

Прошу вас подсказать как наследовать ячейки из повторяющихся таблиц по вашему методу но уже в разные места разных ячеек?
Никак не могу понять и подобрать местоположение как у вас устроен индекс.
Относительно первой ячейки в одинаковых табличках все работает. А вот как надо разные ячейки - не могу понять.

Лист 2. Ячейка D16 место выбора


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

это все скопировать в макрос?

или что значит часть (Желательно в стандартный модуль)  Это куда вставить?
Эту часть оторвать и вставить куда-то в другое место?

то как у вас, разом вставить в МАКРОСЫ - не сохраняет историю. Вернуть что-то назад - нельзя почему-то.
видимо я что-то не так делаю.
Изменено: Profan007 - 18.01.2025 00:40:57
Как сделать изменение текста в ячейке через диалог (как в обычной программе) чтобы избежать случайного изменения или стирания
 
Огромное спасибо

пс: Заметил такую особенность, при использовании такого скрипта, эксель не помнит что было в этой ячеке до изменения.
Т.е. мы не можем изменить три раза на что-то одну и ту же ячейку через диалог, и потом стрелочками назад отменить 2 раза исправления. Первое значение не появится !!!
Эксель просто оставит пустую клетку.
Кто будет использовать это скрипт - имейте ввиду.

Вопрос к Автору скрипта, Это нормально? как запомнить значения? или это нереально?
Изменено: Profan007 - 15.01.2025 18:06:01
Как сделать изменение текста в ячейке через диалог (как в обычной программе) чтобы избежать случайного изменения или стирания
 
Цитата
написал:
Private Sub Worksheet_Change(ByVal Target As Range)
   If Intersect(Target, Range("A1:B2")) Is Nothing Then Exit Sub
   Dim vv As Variant
   vv = Target.Cells(1, 1).Value
   Application.EnableEvents = False
   Application.Undo
   Application.EnableEvents = True
   vv = InputBox("Введите значение " & Target.Address(0, 0, xlA1), "окошко доп диалога", vv)
   If vv = "" Then vv = Empty
   Application.EnableEvents = False
   Target.Value = vv
   Application.EnableEvents = True
End Sub


Прошу прощения, простым докопированием строки     If Intersect(Target, Range("A5:B9")) Is Nothing Then Exit Sub
ничего не работает. все разрушилось.

Как сделать чтобы можно было разные диапазоны в разных местах сделать?
Изменено: Profan007 - 15.01.2025 16:56:22
Как сделать изменение текста в ячейке через диалог (как в обычной программе) чтобы избежать случайного изменения или стирания
 
МатросНаЗебре, это просто супер.

А может можно сделать ввод данных через такое чудо-окошко только в те ячейки где это необходимо?
а все другие пусть как будут.
Или, как идея, на листе указать в вашем коде какую-то верхнюю часть листа или область (лучше область с и по) где все ячейки меняются по такому принципу, а все остальное как всегда?

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

Весь лист это идеально, но это через-чур :)))
Изменено: Profan007 - 15.01.2025 16:37:07
Унаследовать данные с одного листа на другой в определенном диапазоне или поечеечно, нужно простое решение без макросов и т.д.
 
Благодарю. Сейчас буду изучать.

пс: это просто гениально. Спасибо вам.
Изменено: Profan007 - 15.01.2025 13:58:42
Унаследовать данные с одного листа на другой в определенном диапазоне или поечеечно, нужно простое решение без макросов и т.д.
 
gling, можете добавить в свою формулу унаследование в соседних колонках? Голубые ячейки.

Я никак не могу сообразить.
Изменено: Profan007 - 15.01.2025 00:34:47
Как сделать изменение текста в ячейке через диалог (как в обычной программе) чтобы избежать случайного изменения или стирания
 
Приветствую и прошу помощи у специалистов с большой буквы.

Есть эксель любая таблица.
Надо придумать решение чтобы в стандартную ячейку можно вписать текст только через окошко доп диалога. Либо пишем в одну ячейку, жмем что-то, происходит записывание того что вписали куда-то рядом, и это до момента пока опять не исправим и не перенажмём Записать.

А если ячейка еще пустая пока, то вписывать просто как обычно, сразу. Но это уже как получится.
Кто что знает?


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

Красота особо не играет роли. В таблице можно ставить правее любые кнопки. она не ограничена ничем.

Для внутренних нужд.
Унаследовать данные с одного листа на другой в определенном диапазоне или поечеечно, нужно простое решение без макросов и т.д.
 
Спасибо всем огромное. вы настоящие умельцы.
Унаследовать данные с одного листа на другой в определенном диапазоне или поечеечно, нужно простое решение без макросов и т.д.
 
Прошу помощи в решении задачи:
Есть на листе 1 список повторяющихся табличек в колонку. Они решают какие-то внутренние задачи, вводятся данные в течение дня подсчеты и т.д.

но, на листе 2 (это отчет за день) необходимо как то из списка всех табличек с листа 1 ввести (унаследовать без копирования руками копи ц копи в) только данные одной таблички с листа 1.
Какая табличка подлежит копированию на лист 2, автор может выбрать цифрой например, вводя ее на листе 2 в какое-то поле и вот после ввода цифры формула должна смотреть на это поле и искать в списке табличек с листа 1 такое же число в определенной колонке например и переносить на лист 2 либо диапазон который как-то указан, либо поечеечно данные с полей где это указано. (полей унаследовать надо немного, можно и поечеечно)

на листе 1 у каждой таблички присвоен номер. номер индивидуален от 1 до 100 например.
Страницы: 1
Наверх