Решаем проблемы с компьютером

Kenz
А если делать не сохранение, а экспорт? Ощущение что ты что-то очень простое упускаешь из виду. должно работать

Enott
Комп нужен под рабочие задачи.Работа в Офис 19 (стоял 2003 устал от несовместимости при работе в сохранении ) пдф, корче стандартный набор задач. Что по максимуму хочу использовать это объемные хл файлы и автокад.

Enott:

А кто-нить пользуется встроенным защитником в в Вин10? А что читаю, пишут, что прям хорошим хорошим уже стал...

Я пользуюсь уже давно, еще с семерки. У меня нареканий нет - на флешках вирусы ловит, на сайты иногда ругается, кряки считает вредоностнми программами. Скрипты пропускает (не знаю справляется ли с ними другие). Шифровальщика один раз пропустил, но это тоже скрипт и запущен был мною же вручную. Лечение от скриптов приходилось проводить другими антивирусами, опять же не знаю - поймали бы они их "на лету" и смогли бы очистить без применениях их же с загрузочным диском. В общем, считаю, что обычному юзеру - его за глаза, главное самому голову иметь.

Anikiy:

На работе хранишь? Это ты ловко придумал.

aludov
поковыряюсь, может найду в чем дело. вобщем может быть что угодно, может тупо на сетевой диск не хочет сохранять поэтому пишет объект не найдет. ща попробую если прямо на компе сохранит или нет.

upd
не сработало. ковыряюсь дальше.

Ну вобщем вот так это происходит. (Макрос назначил на кнопку и добавил на панель быстрого доступа) Макрос сохранён и в этой книге и в книге макросов тоже.
http://www.youtube.com/watch?v=QF-zHIAgWP4

Лист копируется в новый файл а дальше при сохранении ошибка, причем если самому выбрать "Сохранить как", то всё нормально.

Kenz
А попробуй все то же самое сделать в AutоIt? Чтобы макрос был не в Экселе, а на стороне, ощущение что проблема в этом. Или в настройках выполнения макросов и безопасности. Антивирь точно не гадит сюда? Переборку вкладок правда хз как там делать, разве что кликом со смещением... Давно его не пользовал.

aludov
Попробую у себя на домашнем компе сделать, может на самом деле политика безопасности не позволяет, но это уже никак не исправлю, и антивирус отключить не смогу, доступ закрыт айтишниками.

Kenz
Обязательно попробуй дома с autoit. Там можно его в отдельный файл сохранить и уговорить их добавить его в доверенные. А с экселевским макросом нет, там или все или ничего.

Если с локальным не получится, возможно, косяк в том, что когда делается сохранить, как - макрос выполняется в одном файле, а управление уже передано другому и в связи с этим возникает косяк. Допустим он пытается сделать сохранить как для текущего файла, а ты в этот же момент сохраняешь другой.

Antonov_YS
Возможно и так, тогда перед сохранением не хватает команды ActiveBook или ThisWorkBook, надо попробовать прописать

uRRY_001
Vortex
В общем, просто для справки. То что сетевая карта не горит на выключенном компьютере, окажывается, ни о чем не говорит. Сегодня поменял сетевую карту - старая моргала, новая - нет. Работает нормально.

Antonov_YS:

uRRY_001 Vortex В общем, просто для справки. То что сетевая карта не горит на выключенном компьютере, окажывается, ни о чем не говорит. Сегодня поменял сетевую карту - старая моргала, новая - нет. Работает нормально.

В общем, это было понятно, решали другую проблему.

Я тут впервые разрешил обновиться 10 Винде. Ну устал откладывать ей разрешение на обновления! А выкорчевывать сервис было лень. Больше часа трудилась! Как результат отвалились все сетевые интерфейсы!
Поржал, снёс kb4579311, и только после этого смог выбрать правильный сетевой адаптер вместо хрени установленной каким-то чудом командой Билла...
Потрачено впустую времени - 3 часа. Получена толпа обновлений для офиса и визио, ценность которых ещё нужно проверить, одно неудаляемое обновление и так, по мелочам. )))

-SSID-
Возможно, не во время. Только на прошлой неделе краем глаза на тв зацепил сюжет, где сетовали, что после последнего обновления у людей синий экран начал выскакивать, майкрософт тогда еще молчала...

-SSID-:

Moonwalker Тогда дублировать фото нужно на скалах в пещере - точно на тысячелетия сохранятся. С видео сложнее...

Видео можно покадрово, а вот со звуком к видео проблема

Kenz:

ДОбрый день! Подскажите по Экселю, код в конце выдает ошибку, На этапе выбираю имя файла и нажимаю сохранить вылазит 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

а что у тебя есть: wb.Path и s.Name?

цитата:

FileName = "Te" & UserNum & ".xlsx" Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") If (Not fso.FolderExists(Path)) Then fso.CreateFolder Path End If FullFileName = Path & "\" & FileName ThisWorkbook.Worksheets.Copy With ActiveWorkbook .SaveAs FullFileName, xlOpenXMLWorkbook .Close 0 End With

Вот так точно работает - но тут сразу все листы копировались...
И при копировании лист должен быть как минимум видимым

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

Antonov_YS:

Возможно, не во время. Только на прошлой неделе краем глаза на тв зацепил сюжет, где сетовали, что после последнего обновления у людей синий экран начал выскакивать, майкрософт тогда еще молчала...

О, синего тоже ждал, но видимо не в этот раз!

XXmaxx:

-SSID- 7 стояла, отвалился интернет, обновления длям7 теперь же нет. Связываю с этим.

на ноуте вылазили предупреждения что прекращается поддержка и Вин7 больше работать не будет. В настройках отключил обновление и еще какие-то службы выключил в реестре. Пока продолжает работать.

Kenz
Мои семёрки даже не знают что поддержка закончилась - им давно запрещено получать новости от Билла )))

-SSID-
Ностальгия по синему экрану?)

M Moonwalker:

Ностальгия по синему экрану?)

Скорее любознательность и стремление познать всю глубину мелкомягких глубин.

-SSID-
мсье знает толк в извращениях!

Dreamweaver
Мсье отключил после сегодня службу обновления Windows и разрешил её запуск с правами гостя без пароля. Посмотрим что теперь она сможет установить )))
Ну достала!

-SSID-
у мну на втором компе такая ... была... с синим как море экраном... как лечил не помню. помню только, что пиво точно помогло) и комп заработал))

Dreamweaver:

-SSID- у мну на втором компе такая была... с синим как море экраном... как лечил не помню. помню только, что пиво точно помогло) и комп заработал))

Кстати метод реально рабочий. У меня несколько раз так было. Наутро не помнишь что делал, но комп пашет аки новый

Anikiy
Пиво - наше всё!

-SSID-:

Anikiy Пиво - наше всё!

Пиво – необходимое, но не достаточное условие для стабильно-положительного результата

цитата:

Мужики, помогите, реально компьютерная проблема!! Был, у меня значит, давно у меня usb-диск. Однажды он упал с системника в момент записи (то что это прорезиненный противоударный Трансценд - не помогло) и у него запортился логический диск(был разбит на два), на который шла запись. Я потом оставшейся половиной пользовался норм. А года два назад необходимость в нем пропала и я убрал его куда-то до лучших времен. Суть вопроса. Два дня уже ищу, не могу найти куда убрал!!! Помогите, а?

Мужики, радость, радость пришла в мой дом!
Не прошло и полгода, как при заборке старого шкафа нашелся, нашелся, родимый!!! А современный софт даже с полпинка оживил запоротую половину!

Хочу использовать его под файлопомойку, посоветуйте софтину которая сделает полный формат с качественной пометкой всех бэдблоков чтобы они не мешались дальше. Или любой не быстрый формат подойдет?