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

Страницы: 1
Запуск приложений из excel
 
с этим разобрался .WebBrowser1.Navigate "https://maps.google.ru/maps?q=Санкт-Петербург,+Зимний+дворец"

http://www.gdeetotdom.ru/map а на этом сайте, к сожалению, в строку поиска не знаю как вставить текст.
Запуск приложений из excel
 
Спасибо, все получилось
Запуск приложений из excel
 
Цитата
Юрий М пишет:  Было с картой (см. файл)
как в строку поиска вставить данные из ячеийки и нажать энтер?
пытаюсь с помощью SendKeys, но к сожалению не получается  :(
в форме нажатие CommandButton1 по событию ComboBox2_Change()
 
Спасибо  :D
в форме нажатие CommandButton1 по событию ComboBox2_Change()
 
Возможно ли нажатие  CommandButton1 по событию ComboBox2_Change() и если возможно, то как записать?

или необходимо код из кнопки куда-то перенести и запускать его по событию ComboBox2_Change()  и CommandButton1 _Click()
Записать в массив данные с листа
 
Спасибо
Записать в массив данные с листа
 
Worksheets(2).Activate

LastRow = Worksheets(1).Cells(Rows.Count, 1).End(xlUp).Row
' Worksheets(1).Activate    при отключении данной строки код не хочет работать.
mas = Worksheets(1).Range(Cells(2, 1), Cells(LastRow, 8))

вопрос если данные на разных листах, сначала нужно активировать требуемый лист и потом загонять нужное в массив?
как указать ширину и высоту ячейки в миллиметрах?
 
делайте таблицу в автокаде и ему подобных программах.  
а дальше связывайте данные с экселем
ВПР. задать искомое значение в столбце имеющий пустые строки
 
Спасибо.
ВПР. задать искомое значение в столбце имеющий пустые строки
 
нужно чтобы впр ссылался на ячейку столбца "А" этой же строки, но если она пуста то на верхнею не пустую в столбце "А".
Небольшой макрос(наверное)
 
смотрите на листе модуль    
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)  
 
я это с форума брал.    
вот похожая тема  
http://www.planetaexcel.ru/tip.php?aid=36  
 
X = Split(ActiveCell.Address(), "$") '***  
Rng = "b" & X(2) & ":" & "m" & X(2) '*** X(2)-номер строки    
' Rng -диапазон раскрашиваемых столбцов в строке X(2)  
Range(Rng).Interior.ColorIndex = 34 '*** раскрашиваем диапазон Rng  
 
Target.Font.Name = "Marlett" ' устанавливаем шрифт чтобы "a" отображалось как галочка.
If Then в чем ошибка?
 
а не кого не смущает что в обоих случаях    
Range("A1") = "2"
Заполнение именованного диапазона датами.
 
=ДАТА(ГОД(СЕГОДНЯ());МЕСЯЦ(СЕГОДНЯ());1)  
постоянно будет текущий месяц.
Заполнение именованного диапазона датами.
 
либо    
=ДАТА(ГОД($A$3);МЕСЯЦ($A$3);1) это в ячейку А4  
в ячейку А5 записать  
=A4+1 и далее протянуть формулу  
в форматировании ячейки выставляете формат даты
Заполнение именованного диапазона датами.
 
=ДАТА(ГОД($A$3);МЕСЯЦ($A$3);1)  
=ДАТА(ГОД($A$3);МЕСЯЦ($A$3);2)  
 
и т.д.
Небольшой макрос(наверное)
 
если что-то непонятно спрашивайте с удовольствием отвечу.  
 
рекомндую кнопку записи на другой лист оставить одну    
которая будет запускать цикл проверяющий условия, что позицию можно записывать и одновременно что эта позиция еще не была записана.  
нужно только добавить столбец с информацией записана позиция или нет.
Небольшой макрос(наверное)
 
или так?
запуск второй формы из первой (первая должна становиться невидимой)
 
Сейчас я так и делаю. К сожалению у меня в форме более 20 полей и такая форма записи здорово раздрожает. Хочется получить более универсальный код через циклы.  
 
я никак не пойму как запустить цикл, чтобы он искал текстбоксы.
запуск второй формы из первой (первая должна становиться невидимой)
 
Так вот оно и наступило.  
(продолжаю изчучать правила)
запуск второй формы из первой (первая должна становиться невидимой)
 
Дядя простите засранца. был неправ, в будущем обязательно исправлюсь.
запуск второй формы из первой (первая должна становиться невидимой)
 
я понимаю что надо искать всех текстбоксы через For Each  и далее проверять каждый бокс, но не могу написать корректно первую строчку  
 
For Each .......
запуск второй формы из первой (первая должна становиться невидимой)
 
отлично:)в примере все заработало, а основм файле не пашет, пошел искать ошибку.  
 
еще бы ссылку или пример как проверить заполненность текстбоксов (всех кроме одного исключения)
запуск второй формы из первой (первая должна становиться невидимой)
 
требуется чтобы после активации UserForm2  
UserForm1 становилась невидимой,    
а после завершения работы  в UserForm2  
UserForm1 становилась видимой  
 
 
а так же перед закрытием UserForm2 выполнялась проверка на заполненности  всех TextBox кроме TextBox2.
поиск строки по уникальному значению ячейки с помощью макроса
 
прошу прощения, а для чего нужна эта пустая строка.
поиск строки по уникальному значению ячейки с помощью макроса
 
огромное спасибо Юриий М. То что нужно :)  
немного непонял  
   
       что делаеет эта строка:      
.AddItem ""  
 
       и что обозначает эта запись.  
.List(x, 0)
поиск строки по уникальному значению ячейки с помощью макроса
 
имеется большая таблица с данными  
с помощью макроса (по условиям) из этой таблицы отбираются значения и загоняются в comboBox  
затем в нем выбирается значение  
и теперь надо определить в какой строке таблицы находится выбранное значение.(необходимо для изменения некоторых ячеек в данной строке).
как закрыть все неиспользуемые строки и столбцы.
 
никак не могу вспомнить как закрыть все ячики синим фоном, как на примере.  
 
а так же как как группировать строки и делать их видимыми или скрытыми по нажатии одной кнопи(рядом с номерами строк появлялись дополнительные цифры которые открывали либо закрывали группу строк.)
Страницы: 1
Наверх