Как выбрать файл я разобрался, думаю использовать в программе не будет сложно.
в прикрепленном файле есть отчеты по трем городам, нужно в новом документе сделать 3 листа с названием городов, и перенести в них всю информацию. Просто выделением ячеек не получится, так как каждый месяц их количество или сокращается или увеличивается
На новый документ а столбец А нужно перенести данные из документа январь из столбца В И в столбец В, нового документа, перенести данные столбца D (из документа январь)
Как выбрать файл я разобрался, думаю использовать в программе не будет сложно.
в прикрепленном файле есть отчеты по трем городам, нужно в новом документе сделать 3 листа с названием городов, и перенести в них всю информацию. Просто выделением ячеек не получится, так как каждый месяц их количество или сокращается или увеличивается
На новый документ а столбец А нужно перенести данные из документа январь из столбца В И в столбец В, нового документа, перенести данные столбца D (из документа январь)
Нашел Ваш форум по пути с гугла через дружественный.
Начальство попросило написать макрос для финансового директора, столкнулся со множеством проблем. Скажите пожалуйста.
1. Как можно с помощью макроса выделить столбец от ячейки с одной надписью, до ячейки с другой надписью. (в документе по одному городу - 4-8 тысяч строк, нужно в итоге сделать так. В новом документе вызвать макрос, который обращается к файлу "Январь" копирует из него данные столбца начиная с ячейки с надписью "Киев" заканчивая ячейкой "Харьков", при этом что бы лист, куда копируется информация автоматом назывался "Киев) (думаю с листами я разберусь сам) Основная проблема - как скопировать диапазон строк одного или двух столбцов от одного значения ячейки до другого, подскажите пожалуйста.
2. Несущественная проблема, но все же для себя хотелось бы знать, как при вызове макроса, сделать так, что бы можно было выбрать файл для обработки через проводник (тот же январь, февраль...) ?
Спасибо за понимание, заранее благодарен за всяческую помощь в решении проблемы. P/S: С макросами особо раньше не дружил, написал первый 2 недели назад по хотению начальства.
Здравствуйте.
Нашел Ваш форум по пути с гугла через дружественный.
Начальство попросило написать макрос для финансового директора, столкнулся со множеством проблем. Скажите пожалуйста.
1. Как можно с помощью макроса выделить столбец от ячейки с одной надписью, до ячейки с другой надписью. (в документе по одному городу - 4-8 тысяч строк, нужно в итоге сделать так. В новом документе вызвать макрос, который обращается к файлу "Январь" копирует из него данные столбца начиная с ячейки с надписью "Киев" заканчивая ячейкой "Харьков", при этом что бы лист, куда копируется информация автоматом назывался "Киев) (думаю с листами я разберусь сам) Основная проблема - как скопировать диапазон строк одного или двух столбцов от одного значения ячейки до другого, подскажите пожалуйста.
2. Несущественная проблема, но все же для себя хотелось бы знать, как при вызове макроса, сделать так, что бы можно было выбрать файл для обработки через проводник (тот же январь, февраль...) ?
Спасибо за понимание, заранее благодарен за всяческую помощь в решении проблемы. P/S: С макросами особо раньше не дружил, написал первый 2 недели назад по хотению начальства.JustXXX
1. Выделяете с помощью функции Intersect диапазон, находящийся на пересечении необходимых столбцов с необходимыми строками, копируете его и вставляете в нужное место нужного документа.
А какого ответа Вы ожидали на ТАК поставленный вопрос? Мало того, что в "Готовых раешениях" вообще и в данном топике в частности Ваш вопрос - явный оффтоп, так Вы ещё и не приложили примера, нарушив правила форума. Или Вы думаете, что кто-то за Вас придумает, заполнит и разложит в нужные Вам папки нужные Вам таблицы? Извините, но тут не форум телепатов.
2. Вам нужен пример выбора файла? Пожалуйста, нет проблем:[vba]
Code
Sub test_GetOpenFilename() Dim GetFileName GetFileName = Application.GetOpenFilename(Title:="Выбор файла", MultiSelect:=False) 'GetFileName = Application.GetOpenFilename(, , "Выбор файла", , False) If VarType(GetFileName) = vbBoolean Then Exit Sub ' если нажали "Отмена", то GetFileName = False Debug.Print GetFileName End Sub
[/vba]
В общем, внятно формулируйте вопрос, составляйте таблицы-примеры и открывайте соответствующий топик в ветке Вопросы по MS Excel
1. Выделяете с помощью функции Intersect диапазон, находящийся на пересечении необходимых столбцов с необходимыми строками, копируете его и вставляете в нужное место нужного документа.
А какого ответа Вы ожидали на ТАК поставленный вопрос? Мало того, что в "Готовых раешениях" вообще и в данном топике в частности Ваш вопрос - явный оффтоп, так Вы ещё и не приложили примера, нарушив правила форума. Или Вы думаете, что кто-то за Вас придумает, заполнит и разложит в нужные Вам папки нужные Вам таблицы? Извините, но тут не форум телепатов.
2. Вам нужен пример выбора файла? Пожалуйста, нет проблем:[vba]
Code
Sub test_GetOpenFilename() Dim GetFileName GetFileName = Application.GetOpenFilename(Title:="Выбор файла", MultiSelect:=False) 'GetFileName = Application.GetOpenFilename(, , "Выбор файла", , False) If VarType(GetFileName) = vbBoolean Then Exit Sub ' если нажали "Отмена", то GetFileName = False Debug.Print GetFileName End Sub
[/vba]
В общем, внятно формулируйте вопрос, составляйте таблицы-примеры и открывайте соответствующий топик в ветке Вопросы по MS ExcelAlex_ST