Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 265 След.
Копирование строк из одного файла и вставка в строку под данными в другой
 
мне все равно, а вам явно виднее
Код
Sub RowsCopy22()
  Const fn$ = "d:\2.xlsx"
  Dim wb1 As Workbook, wb2 As Workbook, r&
  Set wb2 = GetObject(fn)
  r = Worksheets(1).Cells(Rows.Count, 1).End(xlUp).Row
  If r > 1 Then
    Worksheets(1).Range("C2:Y" & r).Copy _
    wb2.Worksheets(1).Cells(Rows.Count, 1).End(xlUp).Offset(1,3)
    wb2.Save
  End If
  wb2.Close
End Sub
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Копирование строк из одного файла и вставка в строку под данными в другой
 
и 2-й вопрос: по каким колонкам в 1 и 2 определять последнюю строку может по С и там и там?
судя по всему колонка А в файле 2 может быть вообще не заполнена
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Копирование строк из одного файла и вставка в строку под данными в другой
 
и снова - удар в штангу!
копировать куда? в какую строку понятно, а в какой столбец это все пристроить? в А? в С? ваш вариант?
и чтобы 2 раза не вставать:
по каким каким колонкам в 1 и 2 определять последнюю строку?
Изменено: Ігор Гончаренко - 25 ноя 2020 17:03:10
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Создание таблицы с количеством столбцов, указанным в ячейке
 
поясните свою мысль, что должен сделать макрос?
какой смысл "создавать" ячейки, которые уже созданы?
что вы вкладываете в понятие "создать таблицу"?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Создание таблицы с количеством столбцов, указанным в ячейке
 
извините, а что ее создавать?
все ячейки на листе, на своих местах, пользуйтесь, что их создавать-то?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Копирование строк из одного файла и вставка в строку под данными в другой
 
добавьте в 1 модуль
положите в него этот макрос:
Код
Sub RowsCopy22()
  Const fn$ = "d:\2.xlsx"
  Dim wb1 As Workbook, wb2 As Workbook, r&
  Set wb2 = GetObject(fn)
  r = Worksheets(1).Cells(Rows.Count, 1).End(xlUp).Row
  If r > 1 Then
    Worksheets(1).Range("2:" & r).Copy _
    wb2.Worksheets(1).Cells(Rows.Count, 1).End(xlUp).Offset(1)
    wb2.Save
  End If
  wb2.Close
End Sub
и выполните его. обратите внимание на путь к 2
Изменено: Ігор Гончаренко - 25 ноя 2020 17:04:43
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Копирование строк из одного файла и вставка в строку под данными в другой
 
Петрович, извините, в файлах может быть много листов
с 1 с какого листа в 2 на  какой лист?
это не назойливость, это уточнение условий выполнения макроса  
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Преобразовать в количество минут текст формата "Д чч:мм:сс"
 
Код
Function MinCount#(v$)
  Dim p&, m#
  p = InStr(v, " ")
  If p > 1 Then m = Val(Left(v, p - 1)) * 1440: v = Right(v, Len(v) - p)
  MinCount = m + Hour(CDate(v)) * 60 + Minute(CDate(v))
End Function
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Копирование строк из одного файла и вставка в строку под данными в другой
 
Цитата
Максим Петрович написал:
необходимо все строки начиная со второй, скопировать и 1.xlsx в 2.xlsx
эта фраза не позволяет сесть и написать макрос, который выполнит указанное действие, потому что сформулирована вообще, а программирование это что-то очень конкретное
известно что у файлов одинаковые шапки таблиц
"из файла 1 все строки, начиная с второй в файл 2", отлично!
из этой фразы понимаем что шапка занимает одну первую строку (видимо и там и там)
а КУДА копировать в файл 2? КУДА????
1. в конец таблицы, за существующими строками?
2. сразу под шапку удалив все существующие?
это два очень разных действия, и если не написано что делать, результаты работы макроса могут быть от неожиданных или совершенно плачевных!

и это только начало:
1. файл2 где искать? (знаем только имя и ничего более)
2. скопировали. что делаем с файлом приемником? сохранили и закрыли, оставили как есть (пользователь будет закрывать Excel увидит окно-предупреждение: файл 2.xlsx не сохранен, Сохранить, Не Сохранять, Отмена? не дочитает его толком, не вникая что за 2.xlsx, нажмет не сохранять и все что вы копировали - коту под хвост!
программирование это наличие четкой и понятной (во всех деталях) задачи, а макрос - это точное выполнение все, что в нем написано

когда задача ни о чем, точно такой же получится и макрос - ни какой!
Изменено: Ігор Гончаренко - 25 ноя 2020 15:29:32
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Преобразовать килограммы в минуты, Формула для преобразования Кг в Минуты.
 
у нас на курсах трактористов, после каждого практического занятия - руки по локти были в вакууме!
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Копирование строк из одного файла и вставка в строку под данными в другой
 
Цитата
Максим Петрович написал:
да мне вообще нужно чисто строки копировать
а копируете ячейку А2
Код
....Range("A2").Copy
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Копирование строк из одного файла и вставка в строку под данными в другой
 
ерунда написана, поэтому и ошибка
Код
Workbooks("1.xlsx").Worksheets("Sheet1").Range("A2").Copy Workbooks("2.xlsx").Worksheets("Sheet1").Cells(LastRow+1, А в какую колонку?)
и вы уверены, что LastRow определилась в том, файле, листе, колонке, которые вам нужны???
Изменено: Ігор Гончаренко - 25 ноя 2020 14:44:49
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Преобразовать килограммы в минуты, Формула для преобразования Кг в Минуты.
 
Цитата
Дмитрий Копас написал:
Он загружает разные ингридиенты, с разным временем загрузки. Поэтому он в конце дня приносит информацию сколько чего он загрузил, я ввожу и вижу сколько реального времени ему понадобилось на это.
где-то должен быть справочник норм времени. есть такие документы для разных отраслей человеческой деятельности называются ЕНиР
в сфере приготовления пищи такой то же должен быть
например:
очистка картофеля - 9 кг/час
лепка пельменей - 120 шт./час
из которого легко вычислить если человек слепил 1000 пельменей, значит он затратил на это 8 часов 20 минут
Изменено: Ігор Гончаренко - 25 ноя 2020 14:59:27
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Преобразовать килограммы в минуты, Формула для преобразования Кг в Минуты.
 
Цитата
Дмитрий Копас написал:
В целом мне нужно видеть производительность в минутах
производительность не бывает в минутах
производительность это количество Единиц за указанное Время
разве что, у вас есть машина времени, которая за минуту производит 3 минуты времени, вот у нее будет производительность будет в минутах - 3 минуты в минуту!
таким образом, при постоянной эксплуатации этой машины, в сутках у вас будет 72 часа, вы будете все успевать, но жутко не высыпаться.

у вас где-то должен храниться справочник производительности приведенный к какой-то одной (удобной вам единице времени)
на основании этого справочника вы можете вычислить:
- сколько будет произведено продукции за указанное время
или
- сколько времени уйдет на производство определенного количества продукции
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Автоматическое изменение даты, согласно указанного времени суток
 
вместо формата текст выберите общий, поставьте курсор в ячейку нажмите Enter
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
ВПР или как подогнать одно значение под другое
 
подгоняйте пока не совпадут
Изменено: Ігор Гончаренко - 25 ноя 2020 01:34:39
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Как в VBA пройтись и заменить слово
 
вот так
можно меню Edit команда Replace (там напротив нее не Ctrl+H случайно написано)
Изменено: Ігор Гончаренко - 24 ноя 2020 08:09:26
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Как в VBA пройтись и заменить слово
 
значит вам попался бракованные Excel
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Как в VBA пройтись и заменить слово
 
Ctrl+H
что на что
Область замены выбрать Проект
Ок
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Поиск первого и последнего значения из списка по дате
 
срочно прикрывайте эту торговлю - у вас розничные цены меньше закупочных
у меня то же  сначала получилось среднее, а потом ничего, вроде вырулила
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Ранжирование данных при нескольких заданных условиях
 
Сtrl+Shift+Enter - и формула снова массивная
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Как вернуть при сохранении к 100% масштаб отображения?
 
Цитата
Сергей Жуков написал:
Вобще весь смысл потерялся.Спасибо!
жизнеутверждающе (как для 30-го сообщения в теме)
28 предыдущих сообщений - в яблочко! (1 сообщение - это был вопрос от автора темы)
Изменено: Ігор Гончаренко - 23 ноя 2020 00:44:06
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Оставить данные между первым и вторым повторяющимся символом
 
Цитата
georgmann написал:
Разве это формула?
а вы полагаете это случайный набор символов)))
разве в первом сообщение есть файл-пример, в который каждый косолапый может поместить ту формулу, что написал?
отсутствие файла-примера подсказывает всем , что вы побрезговали возможностью получить ответ в файле (на своем примере) и вам достаточно подсказки как решается ваша задача
вам подсказали, а теперь - внедряйте!, удачи))
Изменено: Ігор Гончаренко - 22 ноя 2020 22:02:30
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Вычислить дату отгрузки по условию
 
см.вложение
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Отгадывание числа с процентной вероятностью в таблице
 
с некоторой долей уверенности могу утверждать, что там будет 1 или 2
прочитал сообщение
Код
="1(р=" & СЧЁТЕСЛИ(R[-14]C[-6]:R[-1]C;1)/98 & " )     2(p=" & СЧЁТЕСЛИ(R[-14]C[-6]:R[-1]C;2)/98 &")"
Изменено: Ігор Гончаренко - 22 ноя 2020 15:24:52
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Нужно сделать График работы, график работы сотрудников.
 
давайте постараюсь вникнуть
пойму задачу - сделаю
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Вставить пустые столбцы перед каждым столбцом из массива столбцов
 
используйте INSERT
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
VBA. Удалить столбцы по списку
 
судя по количеству ответов в теме - тема "удалить столбцвы по списку", не исчерпаема вглубь, как атом
(этот ответ прошу не учитывать), не претендую на раскрытие темы, я х/з как удалять столбцы "по списку" пока не определено что из себя представляет список, в котором  собраны кандидаты на удаление))
Изменено: Ігор Гончаренко - 22 ноя 2020 00:01:42
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Сравнить по условию искомое значение с несколькими повторяющимися значениями в диапазоне
 
какой смысл сравнивать со всеми повторяющимися?
если равно первому, то равно всем повторяющимся
а если не равно, то сколько не сравнивай (с повторяющимися) равенства уже не добьешься
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Возврат текущего URL в ячейку
 
вот это поворот....
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 265 След.
Наверх