[ОТВЕТИТЬ]
Опции темы
22.07.2013 17:25  
Aleksandr H.
Цитата:
Сообщение от Aleksandr H.
Что хочу сделать?
автоматизировать участок работы, который делаю вручную :
Код:
пока на arkusz2 есть заполненные строки
  начало
    увеличить значение ползунка на 1
    нажать кнопку печать
  конец
конец
в ячейке R1 вычислаем количество непустых строк с Arkusz2 (=СЧЁТЗ(arkusz2!A2:A27))

Код:
Sub AutoPrint()
    Dim n As Integer
    Dim i As Integer
    n = Range("R1").Value ' запоминаем количество непустых строк
    Range("R2").Value = 1  ' начальное значение "ползунка"
    For i = 1 To n 
        Range("R2").Value = i ' увеличить значение "ползунка" на 1
        fastPrint ' UDF отвечающая за быструю печать
    Next
End Sub
Код:
Sub fastPrint()
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
End Sub
 
01.08.2013 21:12  
Закупщик56160
Добрый день, коллеги, у меня вопрос про гиперссылки. Есть фаил-шаблон, в левом верхнем углу есть гиперссылки на номера ворот, их 15, поэтому необходимо быстро переключаться между ними. Проблема в том, что лист 1 нужно копировать и переименовывать (2 ср, 3 чт и тд.), при этом гиперссылки на вновь созданных переименованных листах ссылаются на ячейки на листе 1. Можно ли быстро сделать так, чтобы гиперссылки на новом переименованном листе сразу ссылались на ячеёки на этом же листе. Фаил во вложении. Спасибо.
Вложения
Тип файла: xlsx шаблон.xlsx (129.5 Кб, 117 просмотров)
 
01.08.2013 23:03  
Aleksandr H.
Цитата:
Сообщение от Пётр
Добрый день, коллеги, у меня вопрос про гиперссылки. Есть фаил-шаблон, в левом верхнем углу есть гиперссылки на номера ворот, их 15, поэтому необходимо быстро переключаться между ними. Проблема в том, что лист 1 нужно копировать и переименовывать (2 ср, 3 чт и тд.), при этом гиперссылки на вновь созданных переименованных листах ссылаются на ячейки на листе 1. Можно ли быстро сделать так, чтобы гиперссылки на новом переименованном листе сразу ссылались на ячеёки на этом же листе. Фаил во вложении. Спасибо.
чёй-то не пускает меня офис по ссылкам, пишет типа "наложенные ограничения" :(
А если использовать формулу
Код:
=ГИПЕРССЫЛКА(AO2;"Клик чтобы перейти")
? Будет работать?
 
02.08.2013 06:58  
Закупщик56160
Пробовал так, но пишет "Не удаётся открыть указанный фаил".
 
02.08.2013 22:53  
tgm
Добрый вечер,Пётр. Попробуйте,сделал для первого столбца.
Вложения
Тип файла: xls шаблон.xls (236.5 Кб, 159 просмотров)
 
03.08.2013 14:27  
Закупщик56160
Да, спасибо, это то что нужно. Скажите, а что обозначает "#" перед диапазоном?
 
04.08.2013 22:27  
tgm
Честно говоря,и сам не знаю. :oops: Когда-то тоже возник подобный вопрос,нашел в инете такое решение.. Вот теперь делюсь чем могу :)
 
18.08.2013 20:12  
Закупщик56160
Добрый день, коллеги, можно с помощью функций, из диапазона G8:G27 выхватить крайнюю дату окончания приёмки заказа с типом «т», во вложении пример, я хочу чтобы у меня в ячейке P5 было время 16:05:00 - как время окончания приёма последнего заказа с типом «т». Спасибо.
Вложения
Тип файла: xlsx Шаблон с коридорами НОВЫЙ.xlsx (151.3 Кб, 114 просмотров)
 
18.08.2013 23:39  
tgm
Добрый вечер,Пётр.Попробуйте формулу массива:
Код:
=НАИБОЛЬШИЙ(ЕСЛИ($K$8:$K$27="Т";$G$8:$G$27;"");1)
Ну и на всякий случай прикладываю файл.
Вложения
Тип файла: xlsx Шаблон с коридорами НОВЫЙ.xlsx (150.3 Кб, 256 просмотров)
 
19.08.2013 23:10  
Aleksandr H.
Как сделать выделение повторяющихся ячеек разными цветами? Без сортировки и ручного выделения.
В файле: в столбце А - УФ на количество повторов. А хочу что-бы было как в столбце С
Вложения
Тип файла: xlsx Книга1.xlsx (9.9 Кб, 127 просмотров)
 
 


Опции темы



Часовой пояс GMT +3, время: 18:25.

Все в прочитанное - Календарь - RSS - - Карта - Вверх 👫 Яндекс.Метрика
Форум сделан на основе vBulletin®
Copyright ©2000 - 2016, Jelsoft Enterprises Ltd. Перевод: zCarot и OlegON
В случае заимствования информации гипертекстовая индексируемая ссылка на Форум обязательна.