Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » dx48
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 3 След.
VBA Сохранить лист в pdf формате
 
#
02.11.2014 12:54:56
Цель у меня все та же, получить ответ на мой вопрос в виде решения.
 
Перейти    
VBA Сохранить лист в pdf формате
 
#
02.11.2014 00:50:17
Интересно и к чему тогда весь этот цирк...
 
Перейти    
VBA Сохранить лист в pdf формате
 
#
02.11.2014 00:33:26
Какие претензии у вас к моему русскому языку? На счет арифметики, вы наверное, забыли пересчитать, сколько сообщений у меня в одной теме на excelworld.ru так что не совсем так получается (здесь - 63 сообщения, на excelworld.ru - 67)
 
Перейти    
VBA Сохранить лист в pdf формате
 
#
01.11.2014 23:38:12
Если честно я в основном пользуюсь вашим сайтом он у вас просто суперский  самый  информативный и удобный !
 
Перейти    
VBA Сохранить лист в pdf формате
 
#
01.11.2014 23:19:57
Пардон вы были правы! Нашел косяк. 4.1. Создавать одинаковые темы или сообщения в разных форумах (cross-posting). Публикуя один и тот же вопрос в разных форумах и на дружественных сайтах вы заставляете сразу нескольких людей параллельно думать над вашей задачей и обесцениваете усилия тех, кто даст ответ вторым-третьим и т.д.
 
Перейти    
VBA Сохранить лист в pdf формате
 
#
01.11.2014 22:49:18
Я не получил адекватного ответа с этого ресурса. К чему это вы на писали не понятно?
 
Перейти    
VBA Сохранить лист в pdf формате
 
#
01.11.2014 22:35:10
Здравствуйте!
Есть макрос который сохраняет лист в TXT формате в свое время мне его написал Boroda за что я ему благодарен! Но теперь возникла потребность сохранять лист в PDF формате. Возможно ли как то его переделать?
Код
For Each Sh_ In ActiveWorkbook.Sheets
If Sh_.Name = "Лист1" Then
Application.DisplayAlerts = 0
p_ = "C:\Users\Администратор\Desktop\Заказы\"
Sh_.Select
A:
Shn_ = InputBox("Введи номер", "Как сохранять будем?", "заказ_№_"
On Error Resume Next
gg_ = Dir(p_ & Shn_ & ".txt", vbNormal)
If gg_ <> "" Then MsgBox "Такой файл уже есть": GoTo A
ActiveWorkbook.SaveAs Filename:=p_ & Shn_ & ".txt", FileFormat:=xlTxt
If Err.Number <> 0 Then MsgBox "Нет пути " & p_
On Error GoTo 0
ActiveSheet.Name = "Лист1"
Application.DisplayAlerts = 1
End If
Next
'
End Sub
 
Перейти    
VBA Копировать только значения
 
#
22.10.2014 17:22:59
Спасибо! Помогло!
 
Перейти    
VBA Копировать только значения
 
#
22.10.2014 17:03:58
А если точней перед ка-кой строкой вписывать ваш код?
 
Перейти    
VBA Копировать только значения
 
#
22.10.2014 17:00:51
Эта конструкция "B" & lr & "D" & lr + 0 пропустил одну буковку "D"  указывает в как-ой диапазон копировать  
 
Перейти    
VBA Копировать только значения
 
#
22.10.2014 16:18:00
Доброго дня!
Столкнулся с такой проблемой.
Макрос копирует с листа на лист данные  с формулами подскажите как его заставить копировать только значения.
Код
Dim lr As Long
 With Application
 .ScreenUpdating = 0
 lr = Sheets("Лист3".Cells(Rows.Count, 2).End(xlUp).Row + 1
 Sheets("Лист2".[C84:E84].Copy
 Sheets("Лист3".Range("B" & lr & "" & lr + 0).PasteSpecial
 .ScreenUpdating = 0
 
 End With
End Sub
 
Перейти    
[ Закрыто] Макрос! Количество оставшихся дней до дня рождения.
 
#
20.09.2014 23:18:53
Да уважаемый именно так Спасибо огромное вам!!!  
 
Перейти    
[ Закрыто] Макрос! Количество оставшихся дней до дня рождения.
 
#
20.09.2014 23:02:28
Здравствуйте!
Нашел макрос который при открытии книги отображает в сплывающем окне остаток дней до дня рождения.
Что нужно сделать чтобы поставить ограничения на остаток дней до рождения интересует от 1 до 3 дней.
 
Перейти    
Напоминание о не заполненной ячейке
 
#
13.09.2014 21:13:25
Спасибо! То что надо, ВЫРУЧИЛИ  :)
 
Перейти    
Напоминание о не заполненной ячейке
 
#
13.09.2014 19:56:15
Здравствуйте. Возникла такая потребность.
Есть таблица с данными куда вводится дата, наименование и сумма.
Обычно пишется  по порядку дата, наименование и сумма.
Но один не хороший человек забывает прописывать дату, начинает с наименования и заканчивает суммой.
Возможно ли сделать напоминалку в виде  подсказки всплывающего окна например, при вводе данных в столбец  наименования ячейка б блокировалась с сообщением  "введите дату"
 
Перейти    
Скрыть (или удалить) строки с нулевым значением
 
#
28.08.2014 20:09:59
Юрий М, Спасибо выручили!  
 
Перейти    
Скрыть (или удалить) строки с нулевым значением
 
#
28.08.2014 19:50:37
В ответе V эта строка прописана только его код скрывает пустые ячейки тоже а мне надо что бы скрывало только с значением с ноль.
 
Перейти    
Скрыть (или удалить) строки с нулевым значением
 
#
28.08.2014 19:21:24
Sanja, Ваш код тоже скрывает пустые строки а нужно только с нулевым значением  
 
Перейти    
Скрыть (или удалить) строки с нулевым значением
 
#
28.08.2014 19:09:36
Цитата
V пишет: п.с. пустые тоже спрячет.
Подскажите а как сделать так что бы пустые не скрывало?
 
Перейти    
Скрыть (или удалить) строки с нулевым значением
 
#
28.08.2014 12:12:07
Правда говоря я в excel  новичок. Если вас не затруднит не могли бы выложить полную версию переделанного кода для моего случая.
 
Перейти    
Скрыть (или удалить) строки с нулевым значением
 
#
28.08.2014 11:49:33
Здравствуйте! Нашел макрос  который скрывает  строки.
Макрос скрывает  те строки в которых пустые ячейки в столбце F.
Уважаемые подскажите что нужно сделать что бы макрос работал не по условию пустых ячеек а по условию нулевого  значения в ячейках.
Код
Dim cell As Range: Application.ScreenUpdating = False
For Each cell In [F2:F25].Cells
If cell.Find("*", , xlValues, xlPart) Is Nothing Then
cell.EntireRow.Hidden = True
End If
Next cell
 
Перейти    
Скрытие строк по условию
 
#
26.08.2014 13:33:05
Можно этот диапазон исключить если это упростит задачу
 
Перейти    
Скрытие строк по условию
 
#
26.08.2014 09:23:07
Если ячейка b3=0 при активации макроса строчка должна скрыться  
 
Перейти    
Скрытие строк по условию
 
#
25.08.2014 17:12:05
Спасибо за ссылку но этот код не для моего случая. Вся фишка в том что условие должно распространятся для определенных ячеек ("b3,b4,b6,d3,d4,d6")  
 
Перейти    
Скрытие строк по условию
 
#
25.08.2014 16:32:48
Добрый день.
Нашел макрос который скрывает строки по условию если ячейка пустая.
Подскажите что нужно сделать что бы макрос работал по условию не пустых ячеек а по условию скрывал строки с значением (0)
Код
Dim rng As Range 
Set rng = Range("b3,b4,b6,d3,d4,d6")
rng.EntireRow.Hidden = False 
rng.SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True 
rng.SpecialCells(xlCellTypeConstants, 1).EntireRow.Hidden = False
кнопка оформления кода   [МОДЕРАТОР]
 
Перейти    
Проверка не заполненных строк
 
#
31.05.2014 20:24:22
Разобрался спасибо!
 
Перейти    
Проверка не заполненных строк
 
#
31.05.2014 19:34:10
Ну рас вы не против. Такой вопрос где и что поменять в коде что бы заменить столбец А с проверкой на столбец например F Возникнет со временем вопрос со смещением копирования содержимого в другой диапазон.
 
Перейти    
Проверка не заполненных строк
 
#
31.05.2014 18:55:14
Именно так!
 
Перейти    
Проверка не заполненных строк
 
#
31.05.2014 18:45:06
Все устраивает за исключением этого нюанса. Уверяю больше вопросами не буду мучать.
 
Перейти    
Проверка не заполненных строк
 
#
31.05.2014 18:30:50
Все отлично работает! Но есть один нюанс попробуйте проставить значение в столбце А перед активацией макроса после активации содержимое ложится сверху тойсть не проверяет в таком случае
 
Перейти    
Страницы: 1 2 3 След.
Наверх