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

Страницы: 1
Форма VBA Выпадающий список
 
День добрый товарищи где то видел такую вещь  
обыкновенный бутон(кнопка) на листе  
если её нажать то вылезает выпадающий список  
так вот если на значение списка нажать то будет выполнятся макрос! подскажите как такое реализовать!
Запуск книги только 30 раз
 
Подскажите вот в надстройке plex реализовано запуск тока 500 раз! подскажите как это реализовано!
Хранение переменных в реестре
 
Подскажите есть ли какойнибуть способ записывать удалать, знаячения в реестре: при запуске книги    
Проверить существует ли на существования  
 
[HKEY_LOCAL_MACHINE\SOFTWARE\CalcPot]
"Id"="45445871"  
если его не существует то записать на его место
Выделить текст в textbox
 
День добрый товарищи! подскажите как сделать чтобы по нажатию на nextbox выделялся весь текст записанный в нём если такой имеется!
не работаю формулы
 
Вообщем объясню по порядку.  
есть лист образец с забитыми формами.  
далее с помошью макросов  
копирую лист в вожу с помощью вба формы изменения в лист, но формы которые были забиты не считают.  
считает только тогда когда я снова введу в ячейку форму.как пример  
a1 =3    
a2 =4  
a3 =a1+a2  
если я забиваю информация в ячейку а1 и а2 с помощью вба формы то а3 не считает.  
если я перейду в ячейку а3 и введу формулу то она будет считать.  
т.е получается как бы не обновляется информация. как это можно исправить.  
мой способ решения в форме вба по нажатии кнопки ОК происходит следующее  
а1 = textbox1  
a2 = textbox2  
a3 = a1+a2  
в таком случае всё работает. Но извините у меня сотни таких формул! как быть?
Как через макросы записать формула
 
такой вопрос    
есть код  
ActiveCell.FormulaR1C1 = "='Имя листа'!R[-2]C[-6]"
вопрос в следующем как записать не с помощью относительных ссылок! а напрямую ='Имя Листа'!H28
Excel и Mysql
 
Подскажите возможно ли реализовать данную связку? если да то ткните пальцем в статью или опишите синтаксис как передать в базу sql запрос!
Подскажите Алгоритм выполнения действия на определённых листах
 
Ещё раз всем здраствуйче о гуру.  
подскажите такую вещь. нужно перебрать все листы название которых начинается на @.  
и выполнить на этих листах определённое действий(не важно какое)  
т.е примерно:  
 
добавляем в массив все листы  
отбираем из массива только листы начинающие на @  
создаем цикл.  
Действие  
 
простите меня просто я програмлю на php. освоение нового даётся с трудом.
Макрос На Удаление Всех Листов кроме указанных
 
В файле кнопка на листе1    
как удалить листы все кроме лист1,Лист4,Лист2
Запуск макроса при определённый условиях
 
есть макрос    
Sub skidka1()  
skidka.Show  
End Sub  
 
Подскажите как его подправить чтобы он запускался только на листах в названии которых в начале стоит восклицательный знак
Выделение ячейки по цвету
 
Вообщем суть такая рабочая область окрашена в белый ячейки(без заливки).  
Фоновая область окрашена в чёрный цвет, на ней распологаються кнопки Ит.д.    
рабочая область постоянно меняет свой диапазон может быть и шире и выше.    
 
задача такая    
найти все белые ячейки(не закрашенные).  
выделить из в диапазон с которым можно в дальнейшем работать.  
 
 
вообще по иди это надо для печати!
Защита документа
 
Вопрос обстоит в следующем как разрешить выполнение всех макросов только на компьютерах с именем buh, buh2, buh3.  
Но только макросов!
Относительное выделение
 
Приветствую форумчане  вот такой макрос получился при записи.  
 
Cells.Find(What:="Населенный пункт", After:=ActiveCell, LookIn:= _  
       xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _  
       xlNext, MatchCase:=False, SearchFormat:=False).Activate  
 
Данный макрос ищет на листе ячейку в котором равно значение "Населенный пункт".  
вопрос в следующем как выделить ячейку левей на два значения.
Сбор информации с разных листов, и вывод на дургой
 
Дано:  
несколько листов от 1 до 1000 у них есть одно общее, их название начинается на восклицательный знак.  
в каждом листе есть итоговая ячейка B1 с суммой.  
Есть лист название ИТОГ на нём должно собираться информация все листы начинающие со знака восклицательный знак. и сумма итоговая с етого листа B1.  
И всё ето должно считаться.  
Пример в файле
Сократить макрос
 
вообщем есть диапозон e26:e67  
есть макрос выполняемые по нажатие кнопки в форме  
 
вот кусок макроса который меня интересует  
 
Range("e26").Select  
   If Range("e26") = "" Then  
   Rows("26:26").Select  
   Selection.EntireRow.Hidden = True  
   Else  
   Rows("26:26").Select  
   Selection.EntireRow.Hidden = False  
   End If  
 
собственно вопрос если я буду писать для каждой строчки в такой код то он станет огромный при том условии что диапазон может растянуться до 1000 строк  
 
можно ли както сократить его указав только диапозон!!  
 
на всякий случай объясню макрос проверяет если в ячейке e26="" то строка 26 скрывается. в противном случае наоборот отображается.    
 
ещёраз к сути как сделать так чтобы не писать для каждой строчки такой код а сократить его! пусть даже с потерей производительностью!
СЧЕТЗ считает как заполненную ячейку
 
собственно скачал пример вот поетой ссылке http://www.planetaexcel.ru/docs/Numbering.xls  
там формула =ЕСЛИ(ЕПУСТО(B1);"";СЧЁТЗ($B$1:B1))  
собственно проблема в том если ячейка b1="" то он считает её как не пустой!! хотелось бы чтобы считал как пустую и не считал! и желательно без макросов!
Автоматическое добавление строк и сдвиг формулы
 
В прикрепленном файле образец, на одном листе форма счёта, на другом база с забитыми параметрами!    
Суть такая  если в таблице на листе 2! количество > 0 то добавляем строчку в счёт(лист1) и сдвигаем формулу суммы! если 0 или " " то не чего не делаем!
Определить листы начинающиеся с определенного знака
 
Вот собственно в чём вопрос.  
к примру есть листы !кухня, !ванна, !комната, !Прихожая, кп, счёт, калькулятор.  
 
в форме vba есть выпадающий список как мне в него поместить листы которые начинаются с восклицательного знака.
Страницы: 1
Наверх