Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/удалить указанные файлы из подпапок - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » удалить указанные файлы из подпапок (Макросы/Sub)
удалить указанные файлы из подпапок
micholap_denis Дата: Воскресенье, 06.03.2022, 20:47 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 339
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
что добавить в макрос что бы искал файлы в подпапках папки где расположен сам файл с макросом
файлы для удаления без указания полного пути
[vba]
Код
Sub Primer1()
  On Error Resume Next
Kill ThisWorkbook.Path & "\1.xlsb"
Kill ThisWorkbook.Path & "\2.xlsb"
End Sub
[/vba]


Сообщение отредактировал micholap_denis - Воскресенье, 06.03.2022, 20:49
 
Ответить
Сообщениечто добавить в макрос что бы искал файлы в подпапках папки где расположен сам файл с макросом
файлы для удаления без указания полного пути
[vba]
Код
Sub Primer1()
  On Error Resume Next
Kill ThisWorkbook.Path & "\1.xlsb"
Kill ThisWorkbook.Path & "\2.xlsb"
End Sub
[/vba]

Автор - micholap_denis
Дата добавления - 06.03.2022 в 20:47
micholap_denis Дата: Понедельник, 07.03.2022, 13:10 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 339
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
Никто не поможет?
 
Ответить
СообщениеНикто не поможет?

Автор - micholap_denis
Дата добавления - 07.03.2022 в 13:10
RAN Дата: Понедельник, 07.03.2022, 15:29 | Сообщение № 3
Группа: Друзья
Ранг: Экселист
Сообщений: 5638
Репутация: 1144 ±
Замечаний: 0% ±

2010


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеFilenamesCollection

Автор - RAN
Дата добавления - 07.03.2022 в 15:29
micholap_denis Дата: Понедельник, 07.03.2022, 16:06 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 339
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
RAN, спасибо конечно, лазил уже там...но учитывая что ничего в VBA практически не шарю, не знаю что и куда оттуда взять и прописать в макрос
 
Ответить
СообщениеRAN, спасибо конечно, лазил уже там...но учитывая что ничего в VBA практически не шарю, не знаю что и куда оттуда взять и прописать в макрос

Автор - micholap_denis
Дата добавления - 07.03.2022 в 16:06
doober Дата: Вторник, 08.03.2022, 00:21 | Сообщение № 5
Группа: Друзья
Ранг: Ветеран
Сообщений: 901
Репутация: 314 ±
Замечаний: 0% ±

Excel 2010
Вот злые мартовские коты




Сообщение отредактировал doober - Вторник, 08.03.2022, 00:22
 
Ответить
СообщениеВот злые мартовские коты

Автор - doober
Дата добавления - 08.03.2022 в 00:21
micholap_denis Дата: Вторник, 08.03.2022, 00:46 | Сообщение № 6
Группа: Проверенные
Ранг: Обитатель
Сообщений: 339
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
doober, возможно я неправильно задачу поставил....
попробую пояснить..
в организации работаем через облачное хранение dropbox
соответственно пути хранения файла с которого запускается макрос у каждого компа свои...типа
C:\Users\Сергей\....C:\Users\Вася\
иногда приходиться работать с разных компов, вот и подумал к
как обойти разные пути ... то есть что бы файлы удалялись с папки или подпапок в папке где расположен файл с которого запускается макрос
макрос с сообщ 1 работает и удаляет файлы из папки....но не из подпапок...
ваш макрос работает и удаляет из папки и подпапок но путь прописывать нужно

как решить?


Сообщение отредактировал micholap_denis - Вторник, 08.03.2022, 00:51
 
Ответить
Сообщениеdoober, возможно я неправильно задачу поставил....
попробую пояснить..
в организации работаем через облачное хранение dropbox
соответственно пути хранения файла с которого запускается макрос у каждого компа свои...типа
C:\Users\Сергей\....C:\Users\Вася\
иногда приходиться работать с разных компов, вот и подумал к
как обойти разные пути ... то есть что бы файлы удалялись с папки или подпапок в папке где расположен файл с которого запускается макрос
макрос с сообщ 1 работает и удаляет файлы из папки....но не из подпапок...
ваш макрос работает и удаляет из папки и подпапок но путь прописывать нужно

как решить?

Автор - micholap_denis
Дата добавления - 08.03.2022 в 00:46
doober Дата: Вторник, 08.03.2022, 07:07 | Сообщение № 7
Группа: Друзья
Ранг: Ветеран
Сообщений: 901
Репутация: 314 ±
Замечаний: 0% ±

Excel 2010
Path = "C:\Users\Сергей\Downloads"
Трудно прописать путь так ThisWorkbook.Path


 
Ответить
Сообщение
Path = "C:\Users\Сергей\Downloads"
Трудно прописать путь так ThisWorkbook.Path

Автор - doober
Дата добавления - 08.03.2022 в 07:07
micholap_denis Дата: Вторник, 08.03.2022, 08:56 | Сообщение № 8
Группа: Проверенные
Ранг: Обитатель
Сообщений: 339
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
Так у каждого компьютера свое имя и путь разный...юзер отличается
 
Ответить
СообщениеТак у каждого компьютера свое имя и путь разный...юзер отличается

Автор - micholap_denis
Дата добавления - 08.03.2022 в 08:56
micholap_denis Дата: Вторник, 08.03.2022, 08:57 | Сообщение № 9
Группа: Проверенные
Ранг: Обитатель
Сообщений: 339
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
Если бы не это то и полный путь к файлам не проблема прописать
 
Ответить
СообщениеЕсли бы не это то и полный путь к файлам не проблема прописать

Автор - micholap_denis
Дата добавления - 08.03.2022 в 08:57
RAN Дата: Вторник, 08.03.2022, 10:30 | Сообщение № 10
Группа: Друзья
Ранг: Экселист
Сообщений: 5638
Репутация: 1144 ±
Замечаний: 0% ±

2010
Цитата micholap_denis, 08.03.2022 в 08:56, в сообщении № 8 ()
у каждого компьютера свое имя и путь разный

Зато [vba]
Код
ThisWorkbook.Path
[/vba] всегда одинаковый.
Это путь к
Цитата micholap_denis, 08.03.2022 в 00:46, в сообщении № 6 ()
папке где расположен файл с которого запускается макрос


Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение
Цитата micholap_denis, 08.03.2022 в 08:56, в сообщении № 8 ()
у каждого компьютера свое имя и путь разный

Зато [vba]
Код
ThisWorkbook.Path
[/vba] всегда одинаковый.
Это путь к
Цитата micholap_denis, 08.03.2022 в 00:46, в сообщении № 6 ()
папке где расположен файл с которого запускается макрос

Автор - RAN
Дата добавления - 08.03.2022 в 10:30
micholap_denis Дата: Вторник, 08.03.2022, 12:24 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 339
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
doober, RAN, извиняюсь,затупил . Спасибо
 
Ответить
Сообщениеdoober, RAN, извиняюсь,затупил . Спасибо

Автор - micholap_denis
Дата добавления - 08.03.2022 в 12:24
bmv98rus Дата: Вторник, 08.03.2022, 17:21 | Сообщение № 12
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3953
Репутация: 732 ±
Замечаний: 0% ±

Excel 2013/2016
проще шелл вызвать и DEL /s 1.xlsb


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщениепроще шелл вызвать и DEL /s 1.xlsb

Автор - bmv98rus
Дата добавления - 08.03.2022 в 17:21
Мир MS Excel » Вопросы и решения » Вопросы по VBA » удалить указанные файлы из подпапок (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2022 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!