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

Страницы: 1
Выбор нужного листа в выпадающем списке и переход на него
 
Цитата
написал:
Может надстройка подойдет:  Список листов книги
Спросил у чата GPT. Выдал ту концепцию,что мне нужна(но с ошибками,кончено).
А так всем спасибо за науку
Выбор нужного листа в выпадающем списке и переход на него
 
Цитата
написал:
Может надстройка подойдет:  Список листов книги  
Согласен, что подойдет)
Выбор нужного листа в выпадающем списке и переход на него
 
Цитата
Изменено: OTK76 - 27.01.2026 14:05:54
Выбор нужного листа в выпадающем списке и переход на него
 
Цитата
написал:
OTK76 , по клику в ячейку A1 выводит список листов с возможностью перехода
Не работает,увы
Выбор нужного листа в выпадающем списке и переход на него
 
Цитата
написал:
Нет, не дерзко, просто с таким подходом Вам сюда - раздел  Работа , платно
На "Доску позора"?)))
Спасибо
Выбор нужного листа в выпадающем списке и переход на него
 
Цитата
написал:
В смысле 'Задача'? Кому?
Форуму "Планета Эксель"
Или это слишком дерзко?
Цитата
написал:
Сами то что сделали?
Сделал 30 кнопок с наименованиями листов по которым на эти сами листы и осуществляется переход.
Как бы задача выполнена и пользователь не видит, и не листает все эти "вкладочки",а тыкает в "кнопочки"

Но нет предела совершенству. Из предложенного ничего не понял
Изменено: OTK76 - 27.01.2026 08:46:08
Выбор нужного листа в выпадающем списке и переход на него
 
Задача:
-В одной ячейке создать выпадающий список с наименованиями листов
-По нажатию кнопки переход на лист, который выбран из выпадающего списка
Автоматическое формирование гиперссылки на файл Vol.2
 
Цитата
написал:
For Each vFolder In Array("C:\tmp\", "C:\temp\")
Перечислять папки можно до бесконечности?
Автоматическое формирование гиперссылки на файл Vol.2
 
Добрый день.Уже был вопрос и оказанная помощь по нему https://www.planetaexcel.ru/forum/?PAGE_NAME=message&FID=1&TID=174994&TITLE_....
Задача усложнилась,теперь нужно контролировать несколько папок,чтобы гиперссылка автоматически формировалась на нужный файл в нужной папке.Это возможно? Спасибо
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Column <> 9 Then Exit Sub
   
                 If Target.Row < 2 Then Exit Sub
   
                            If Target.Count > 1 Then Exit Sub
 
                                    If Len(Target) = 0 Then Exit Sub
     
      Dim s$
   
                   s = "C:\tmp\" & Target.Value & ".pdf"
 
                             Application.EnableEvents = 0
   
                                    Me.Hyperlinks.Add Anchor:=Target, Address:=s, TextToDisplay:=CStr(Target.Value)
 
                                              Application.EnableEvents = 1
End Sub
Изменено: OTK76 - 15.12.2025 16:30:08
Скрытие нужных строк по условию
 
Цитата
написал:
Не, не забыл. Сознательно не сделал   Сделал как в ТЗ, и написал что задание лучше дополнить. Мало ли, может так и надо было.
Так и надо было)
Скрытие нужных строк по условию
 
Цитата
написал:
Выглядит, будто в задании написано не всё. Ни слова нет о том, когда строки отображаются.
Благодарю.Попробую этот макрос поковырять под себя. Просто оригинальный файл строго для служебного пользования)
Там бы,конечно, все наглядней было
Скрытие нужных строк по условию
 
Цитата
написал:
Если не хотите макросом,
А можно записать макрос,который будет опрашивать в цикле ячейку с искомыми значениями и скрывать нужные без кнопки?
Я всегда все к кнопкам привязывал.
Скрытие нужных строк по условию
 
Добрый день.Созрел вопрос.
Можно-ли скрыть нужные мне строчки по условию в ячейке.Например, в ячейке А1 значение X,то ячейка А2 скрывается,но если в A1 значение Y,то ячейка А2 не трогается. Я прекрасно понимаю и могу записать макрос и привязать его к кнопке,но не хочется городить на листе лишнего.
Есть возможность решить такой вопрос ?
Изменено: OTK76 - 12.12.2025 13:28:11
Автоматическое формирование гиперссылки на файл
 
Дмитрий(The_Prist) Щербаков, извините,а вы не могли бы написать комментарии,что значит и что делает каждая операнда?
Мне на будущее. Спасибо
Автоматическое формирование гиперссылки на файл
 
Дмитрий(The_Prist) Щербаков, а какой параметр в коде изменить,чтобы при вводе некорректного номера протокола,программа не тупо в ошибку выходила и переставала работать вообще,а выводила сообщение "неправильный номер".
Сейчас я ввожу любое число без точки и программа выходит в ошибку здесь:
Цитата
написал:
Me.Hyperlinks.Add Anchor:=Target, Address:=s, TextToDisplay:=Target.Value
И перестает работать, в принципе.Приходится перезагружать
Автоматическое формирование гиперссылки на файл
 
Всем спасибо,все работает!
Автоматическое формирование гиперссылки на файл
 
Цитата
написал:
В модуль листа:
Это куда?
Цитата
написал:
Private Const sFOLDER = "C:\tmp\"
Я так понимаю здесь должен мой путь лежать?
Автоматическое формирование гиперссылки на файл
 
Цитата
написал:
тогда только макросомно проще заранее вписать формулы по все ячейки столбцаможно завернуть в другую для проверки ошибки или непустой исходной ячейки
Дико извиняюсь за наглость, а можно макрос? :)  
Автоматическое формирование гиперссылки на файл
 
Цитата
написал:
=ГИПЕРССЫЛКА("C:\tmp\"&I2&".txt")
Не спорю.Скорей всего я не корректно выразил проблематику.
Как только я напишу в столбце "номер протокола проверки" номер протокола,гиперссылка сформируется автоматически. Файл(формат ПДФ),на который будем ссылаться, уже содержит этот номер в своем названии.
Пишу этот файл для сотрудников.Конечно,можно их научить каждый раз формировать эту гиперссылку,но файлов может быть до нескольких сотен.
Автоматическое формирование гиперссылки на файл
 
Добрый день. Возникла потребность,чтобы при вводе номера протокола в столбце "номер протокола поверки" на него формировалась гиперссылка(например,в соседней ячейке)
Сам протокол находится на сервере в известной директории. Возможно-ли это достичь средствами MS Excel?
Спасибо
Изменено: OTK76 - 20.11.2025 09:16:18
Переход на скрытый лист по макросу
 
Цитата
написал:
Sub Макрос1()    Sheets("Меню выбора модели").Select    Sheets("ИСМ-0,01").Visible = True    Sheets("ИСМ-0,01").Activate    ActiveSheet.Range("B2").SelectEnd Sub

Всем спасибо за науку!
Переход на скрытый лист по макросу
 
Цитата
написал:
1ActiveSheet.Range("B2").Select
Куда в этом коде конкретно вставить эту строчку? При добавлении этой строки у меня на стартовой странице просто выбирается ячейка В2
Код
Sub Макрос1()
'
' Макрос1 Макрос
'

'
    Sheets("Меню выбора модели").Select
    Sheets("ИСМ-0,01").Visible = True
End Sub
Переход на скрытый лист по макросу
 
Добрый день.Встала задача сделать главное меню выбора нужного листа. Листы предварительно скрыты.
Макрос для отображения листа по кнопке сделал(тупо записал). Но как сделать,чтобы после нажатия кнопки лист отобразился и стал активным(т.е я могу сразу в нем работать,не кликая в открывшуюся вкладочку листа внизу? Не каждый пользователь видит эти вкладки).
Спасибо
[ Закрыто] "Парящая" таблица
 
Цитата
написал:
Скоро запросы будут на перемещений таблиц усилием мысли  
Развитие не стоит на месте же)
[ Закрыто] "Парящая" таблица
 
Хочу сделать таблицу в некой форме,которая будучи на каком-нибудь листе могла быть перемещаемой мышкой и печатаемой в дальнейшем.
Изменение числа десятичных знаков в ячейках при изменения параметра в ячейке
 
Цитата
написал:
Установить формат числовой с двумя знаками после запятой.Условное форматирование-Управление правилами-Создать правило-Использовать формулу-Формат-Число-Числовой-Число десятичных знаков:-2
О, сколько нам открытий чудных...... :D  
Изменение числа десятичных знаков в ячейках при изменения параметра в ячейке
 
Например, при выборе из выпадающего списка в ячейке А2 параметра А, в А7-А9 будет два знака после запятой.При выборе параметра В -три.
итд. Прошу помощи
Почему условие выполняется не корректно?
 
Всем спаибо!
Почему условие выполняется не корректно?
 
Цитата
написал:
Кто виноват?Знак равенства для действительных чисел лучше не применять из-за ограничения точности вычислений.
Тобишь проблема решалась тупо функцией округления? Сколько работаю уже с подобными формулами(на примитивном уровне) с такой проблемой столкнулся впервые
Почему условие выполняется не корректно?
 
Условие выполняется некорректно и возвращает "ЛОЖЬ", вместо "ИСТИНЫ",хотя условие выполняется


=ЕСЛИ(И(ABS(E69)<=ABS(H69);ABS(F69)<=ABS(H69));"+";"Б")

В прикрепленном файле строка 69
Изменено: OTK76 - 18.06.2025 13:16:15
Страницы: 1
Наверх