Weber
Сертификатик бы глянуть.
nipТверской вагоностроительный завод, скоро отправят заказчику
чет уже вроде знакомые лица
Олегин
а планшеты у тебя есть?
Серега177
а заднюю дверь как открыть?
Kenz
2 ноября 2020
1
Kpok
Лучше не надо.
К сожалению не знаю как и в каких МРЭО это организовано. Там где я был, при выдаче талончика на терминале надо было забить номер VIN, по талончику попадаешь в очередь, сотрудник гаи забил этот номер VIN с ошибкой в одном символе, я потом ходил по кабинетам чтобы они это исправили у себя свою же ошибку!! Выснилось это на этапе выдаче СТС, сотрудник позвал к окошку и сказал документы выдать не могу, идите к начальнику в кабинет № такой то, я в недоумении зачем и почему, а оказалось их косяк и я там доказывал какой VIN правильный и что в талончик его вбивал сам сотрудник ГАИ а не я!
Kpok
попробуй записаться, если прокатит, этот гемор отвалится! две недели назад свободных дат по всей Москве не было и записи ни в одно МРЭО не было.
Kenz
2 ноября 2020
Kpok
г. Москва? если да, можешь оставить затею с госуслугами и сразу ехать занимать живую очередь, чем раньше тем лучше и быть готовым приехать в 4 утра на перекличку, потом придти к открытию к 8 утра и обнаружить что вчера перед тобой было 20 человек, а теперь 60 (их привели дармоеды из контор по оказанию платных услуг помощи в регистрации авто и расположены они рядом с МРЭО), поэтому быть готовым что, даже если занял очередь, всёравно с первого раза талончика не достанется и придется занимать очередь и второй и третий раз. Есть вариант заплатить 6-10 тыс дармоедам. Есть шансы в 10 дневный срок не успеть, поэтому повторюсь чем раньше пойдёшь занимать очередь, тем лучше. можно даже щас, к тому времени машину из салона заберешь.
Брал быстрый кварц от Shine Systems и квик детейлер от них же. Очень хороший результат, по цене дешевле коха.
XXmaxx:
|
-SSID- 7 стояла, отвалился интернет, обновления длям7 теперь же нет. Связываю с этим. |
на ноуте вылазили предупреждения что прекращается поддержка и Вин7 больше работать не будет. В настройках отключил обновление и еще какие-то службы выключил в реестре. Пока продолжает работать.
Kenz
26 октября 2020
andel:
|
а что у тебя есть: wb.Path и s.Name? |
я к сожалению не профи в этом s.name это SaveName
wb WorkBook
Но я нашел уже другой код, который работает как надо, чуть чуть подредактировал его. Убрал в конце команду закрывать файл после сохранения.
Опять же в коде не профи, поэтому некоторые обозначения или команды не могу объяснить зачем нужны. Опять же здесь к примеру первым делом идут команды диалога Сохранить как, и присвоить имя файлу, а уже потом команды Скопировать активный лист, для меня это пока не ясно. Но код работат как и хотел. Единственное, вместо "\" пытался прописать путь куда сохранять, но тогда ошибка.
цитата: |
Sub Save_as() With Application.FileDialog(msoFileDialogSaveAs) .InitialFileName = ThisWorkbook.Path & "\" & ThisWorkbook.ActiveSheet.Name If .Show = 0 Then Exit Sub ThisWorkbook.ActiveSheet.Copy Application.DisplayAlerts = False .Execute Application.DisplayAlerts = True End With здесь было закрытие книги после сохранения. End Sub |
Kenz
25 октября 2020
Antonov_YS
Возможно и так, тогда перед сохранением не хватает команды ActiveBook или ThisWorkBook, надо попробовать прописать
aludov
Попробую у себя на домашнем компе сделать, может на самом деле политика безопасности не позволяет, но это уже никак не исправлю, и антивирус отключить не смогу, доступ закрыт айтишниками.
Kenz
25 октября 2020
Ну вобщем вот так это происходит. (Макрос назначил на кнопку и добавил на панель быстрого доступа) Макрос сохранён и в этой книге и в книге макросов тоже.
http://www.youtube.com/watch?v=QF-zHIAgWP4Лист копируется в новый файл а дальше при сохранении ошибка, причем если самому выбрать "Сохранить как", то всё нормально.
Kenz
25 октября 2020
3
Anikiy:
|
На работе хранишь? Это ты ловко придумал. |
aludovпоковыряюсь, может найду в чем дело. вобщем может быть что угодно, может тупо на сетевой диск не хочет сохранять поэтому пишет объект не найдет. ща попробую если прямо на компе сохранит или нет.
upd
не сработало. ковыряюсь дальше.
aludov:
|
Ей нужен пустой файл с нужным именем чтобы него писать? вот у тебя файл основной к примеру "Анализ.xls", а писать ты хочешь в "Анализ123.xls". Создай его предварительно в скрипте или руками, права на запись-редактирование, видимость и все такое. Но это так, из опыта написания батников в лохматых годах, может тут так же работает... |
Не, когда сохраняю файл причем уже создан и имеет имя с которым и пытаюсь сохранить.
Но пробовал и как новый сохранить всеравно ошибка.
Может быть он хочет сохранить только с автоматически присвоенным именем? Анализ123.
Ща приеду на работу, попробую.
Вся суть в том что у меня книга эксель, в ней листов 50, по итогам работы надо каждый лист сохранить в отдельный файл. В ручную щелкать надоело и много времени уходит на одинаковые операции.
Макрос прописал чтобы активный лист копируется в новую книгу, дальше выходит стандартный запрос «Сохранить как» и вот на этапе выбрал путь и имя, нажимаю сохранить и облом.
Папка создана и путь выбираю туда где находится исходный файл
ДОбрый день!
Подскажите по Экселю, код в конце выдает ошибку, На этапе выбираю имя файла и нажимаю сохранить вылазит Object required
Сам код:
Sub Macros01()
'1 Сохраняем лист и отправляем в новую книгу
ThisWorkbook.ActiveSheet.Copy Before:=Workbooks.Add.Worksheets(1)
Dim fName As Variant
'~~> Offer user to Save the file at a particular location
fName = Application.GetSaveAsFilename & wb.Path & "\" & s.Name & ".xlsb"
End Sub