Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 55 След.
Анекдот дня, Постим сюда понравившиеся:)
 
Изменено: Alemox - 13 Июн 2019 10:52:54
Никаких врагов, зато и никаких друзей.
Парсинг данных в Эксель_?
 
Можно, но муторно разбираться сейчас.
Никаких врагов, зато и никаких друзей.
Парсинг данных в Эксель_?
 
Самый простой способ это просто выделить все лайкающих, скопировать, и вставить. Можно различными способами.
Никаких врагов, зато и никаких друзей.
HB
 
Поздравляю gling, с днём рождения. Всего наилучшего.
Никаких врагов, зато и никаких друзей.
Делимся..., разным
 
Microsoft добавила в Excel отслеживание финансовых данных в реальном времени
"Финансовые вложения являются одними из наиболее важных вещей, которые мы должны отслеживать в повседневной жизни, и миллионы людей выбирают Excel для управления своими бюджетами и активами. Сегодня мы рады объявить, что работаем с Nasdaq и Refinitiv, чтобы получать текущую финансовую информацию по всему спектру акций на бирже США ... прямо в Excel", - сообщили в Microsoft.
Инструмент доступен пользователям Office 365. Нововведение позволяет в реальном времени отслеживать последние цены на акции, объем торгов и другую финансовую информацию, не выходя из Excel для поиска во внешних источниках. Инструмент "Акции" дает доступ, в частности, к данным о стоимости, минимуме и максимуме, капитализации и другим индексам, поддерживает курс биткойна, облигации, валюты, информацию о деятельности компании, паевые инвестиционные фонды.
В Microsoft отметили, что это только начало и вскоре пользователи смогут просматривать исторические данные, а также цены будут автоматически обновляться каждые несколько минут.
Никаких врагов, зато и никаких друзей.
Событие Workbook_BeforeSave отрабатывает при сохранении макроса
 
Перед сохранением книги поставьте точечку стоп. Макрос остановится на этом месте. Нажимаете Ctrl+S и останавливаете макрос.
Никаких врагов, зато и никаких друзей.
Как макросом определить что текст не помещается в ТextBox?
 
Как вариант отталкиваться от количества символов вмещающихся в видимую часть.
Никаких врагов, зато и никаких друзей.
Анекдот дня, Постим сюда понравившиеся:)
 
- Уважаемые пассажиры. Наш самолет начинает посадку. Просьба всем пристегнуть ремни.
- Девушка, а если не пристегнуть?
- Значит будет как в прошлый раз.
- А как было в прошлый раз?
- Тех, кто не пристегнулся, размазало по салону. А те, кто пристегнулся, выглядели как живые.
Никаких врагов, зато и никаких друзей.
Анекдот дня, Постим сюда понравившиеся:)
 
На гугл карты сегодня зашёл, а он меня спрашивает. И как бы без вариантов получается. Владельцем стал по ходу.
Никаких врагов, зато и никаких друзей.
Можно ли в Excel 2003 получить зеркально-отраженный текст?
 
Макрос
Код
ПЕРЕВЕРТЫШ = StrReverse(str)

Пример во вложении
Никаких врагов, зато и никаких друзей.
Печать UserForm полностью
 
sokol92, Согласен полностью. Есть такая проблема с NumLock, сам пару раз наталкивался. Но вдруг.
Никаких врагов, зато и никаких друзей.
Печать UserForm полностью
 
Тот же самый PrintScreen можно сделать без подключения библиотеки.
Код
Application.SendKeys "(%{1068})"
DoEvents

Далее можно создать временный лист вставить картинку распечатать и удалить. Можно склеить с кодом, который предложил sokol92.
Никаких врагов, зато и никаких друзей.
Запуск макроса поворотом колеса мыши вниз и вверх
 
Как такового прямого кода нет. Но можно извратиться, например, с помощь этого
Никаких врагов, зато и никаких друзей.
Печать UserForm полностью
 
У меня 15 дюймов. Я про монитор  :D
Никаких врагов, зато и никаких друзей.
Печать UserForm полностью
 
Если вы хотите просто распечатать Userform, то можно воспользоваться этой командой
Код
Userform1.PrintForm

P.S.: Для каких мониторов созданы такие формы? Это вообще жесть какая-то. Я вообще ничего не смог на них увидеть и нажать.
Никаких врагов, зато и никаких друзей.
object required ошибка, ошибка при инициализации формы
 
У вас используется объект Progressbar. Насколько я помню он есть только в системах х86 и офисах х86.
Если у вас установлен и система и офис х64, то его нет. Можете проверить в контролах. Могу ошибаться.
Никаких врагов, зато и никаких друзей.
Диалог выбора файла, если все условия соблюдены
 
Max.il, А вы пробовали отписываться в своих темах? Люди делают, помогают, время тратят, а оно в никуда всё.
Ссылка 1
Ссылка 2
Ссылка 3
Ссылка 4
Ссылка 5
Ссылка 6
Ссылка 7
Никаких врагов, зато и никаких друзей.
Вставить картинку в определенный диапазон
 
Код
Sub Kartinka()
Dim LVU As Range
Dim PNU As Range
Set LVU = Cells(10, 5) 'Левый верхний угол
Set PNU = Cells(20, 10) 'Правый нижний угол
ActiveSheet.Shapes.AddPicture Cells(1, 1).Value, _
        False, _
        True, _
        LVU.Left, _
        LVU.Top, _
        Range(LVU, PNU).Width, _
        Range(LVU, PNU).Height
End Sub

Пример во вложении
Никаких врагов, зато и никаких друзей.
Как скрыть/отоброзить строку с данными по выбору выпадающего списка
 
Думаю, что угадал.
Но вариант с макросами, так что не забываем включать их.
Никаких врагов, зато и никаких друзей.
Как закрепить автофигуру в определенной области
 
Ну или картинку на форме расположить. Опять же макросы.
Никаких врагов, зато и никаких друзей.
Какие страны сейчас делают свои процессоры?
 
На сколько я знаю это англия, япония и корея. Это основные лидеры по изготовлению электроники.
Американцы по моему тоже особо не делают. А закупают в англии. Таже ARM корпорация, которая является лидером. И на которой работают все современные телефоны и планшеты, и хуавею запретили использовать такие процессоры так как они запатентованы.
Процессоры делают многие страны. На потоке мало кто делает. И смотря для чего процессоры опять же. К телевизору или к телефону или к компьютеру или к кофемашине вопрос большой.
Изменено: Alemox - 26 Май 2019 21:12:34
Никаких врагов, зато и никаких друзей.
Парсер по ИНН, Поиск готового решения
 
У вас там кнопка красным обведена получить выписку, поэтому я решил, что надо с этой кнопки PDF загрузить.
Никаких врагов, зато и никаких друзей.
Парсер по ИНН, Поиск готового решения
 
artyrH, во вложении файл с макросом выгрузки выписки с сайта egrul.nalog.ru по ИНН.
Вводите ИНН, указываете папку для сохранения файла.
Полную защиту от дурака и всяких сбоев я не стал делать. Думаю сами докумекаете.
Протестировал вроде стабильно у меня работает. Может какие-то ошибки будут выползать по времени ожидания ответа, но на это я не рассчитывал, так как у меня норамльно отрабатывает.
Никаких врагов, зато и никаких друзей.
Вставить фото из папки по условиям, регулярный фотоотчет по шаблону в excel
 
Цитата
Sting написал:
один клик
Пока что я не обладаю таким шаманством, чтобы в одном клике нести информацию о разных картинках, и местах их расположения в файле. Нужно больше информации.
Никаких врагов, зато и никаких друзей.
Вставить фото из папки по условиям, регулярный фотоотчет по шаблону в excel
 
Двойной клик по ячейке где должна быть картинка
Скрытый текст
Никаких врагов, зато и никаких друзей.
Как восстановить данные в файле
 
Так вы не открывайте файл проблемный вообще. И желательно брать оригинал проблемного файла. Ручками написали формулу и тяните. Вылезет окно, в котором просто указать файл надо. Потом растягивайте формулу. А вдруг получится. А ещё лучше выложить его сюда. Вдруг починим.
Изменено: Alemox - 24 Май 2019 14:19:10
Никаких врагов, зато и никаких друзей.
Как восстановить данные в файле
 
А я думал вы девушка. Ан нет.
А формулой пробовали вытягивать?
Код
='[Файл.xls]Лист'!$A$1
Никаких врагов, зато и никаких друзей.
Как в VBA присвоить объектной переменной файл?
 
Код
Sub Makros()
Dim FSO As Object
Dim File As String
File = "C:\Users\Александр\Downloads\qbittorrent_4.1.6_x64_setup.exe"
Set FSO = CreateObject("Scripting.FileSystemObject").GetFile(File)
MsgBox FSO.Size & vbNewLine & FSO.Name
End Sub
Никаких врагов, зато и никаких друзей.
Мониторинг цен. Макрос не со всех сайтов получает цену
 
Цитата
landtwist написал:
помимо "сайта" других аргументов не вводить
Так вы и так ничего не вводите
Цитата
landtwist написал:
чтоб не воспринимало, как ошибку формулы
Вообще не понял. Кто воспринимало? Какой формулы?
Никаких врагов, зато и никаких друзей.
Парсер по ИНН, Поиск готового решения
 
Насколько мне не изменяет память, тут уже много раз таких парсеров обсуждалось. И по моему даже по этим сайтам. Попробуйте поиском поискать, коли нет, то дальше думать будем.
Никаких врагов, зато и никаких друзей.
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 55 След.
Наверх