Visual Basic, чтобы открыть папку с окном в определенном месте? - PullRequest
0 голосов
/ 15 ноября 2018

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

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

Есть ли способ при отправке команды открыть окно, чтобы я мог указать размеры или расположение открываемого окна? Таким образом, я мог сделать одну кнопку, чтобы открыть обе папки, по одной на каждой стороне экрана.

Все компьютеры, использующие эту систему, будут иметь два монитора, поэтому команда «Развернуть это окно для монитора 1» и «Развернуть это окно для монитора 2» также будет работать.

Текущий код, который я использую

If Len(Dir(CurrentProject.path & "\" & "RecordFiles" & "\" & ID, vbDirectory)) = 0 Then
   MkDir CurrentProject.path & "\" & "RecordFiles" & "\" & ID
End If
Dim path As String
path = CurrentProject.path & "\" & "RecordFiles" & "\" & ID & "\"
Shell "cmd /C start """" /max """ & path & """", vbHide

1 Ответ

0 голосов
/ 04 декабря 2018

Упрощенное описание инструмента, который я разработал и использую ежедневно в качестве решения для аналогичной задачи: в электронной таблице в пути A3 к начальной папке, в целевой папке B3.Щелкните правой кнопкой мыши в первой строке список всех имен файлов ниже A3, которые в данный момент находятся по этому пути.Щелчок правой кнопкой мыши в соответствующей ячейке ниже B3 перемещает файлы от A3 до B3 и переходит к следующему файлу в следующей строке, что дает предварительный просмотр, открывая Проводник.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...