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

Страницы: 1 2 3 След.
Макрос не хочет удалять строки
 
#
16.12.2015 14:37:46
The_Prist,
Кыш из моей темы... Сказал слово - ДЕРЖИ! Или ты не мужик?
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 14:32:50
Цитата
The_Prist написал: И что? Он о чем-то сказал Вам? Нет.
Кстати, если бы Вы мне описали в чем проблема и что я не так написал, я бы разобрался в следующей строчке...
Я задал конкретный вопрос, на который ВЫ НЕ ответили, а решили за меня... А потом наехали за то что решили... Бред
Изменено: Dex - 16.12.2015 14:37:08
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 14:27:06
Цитата
vikttur написал: А макросы заказывайте у других.
Денег дашь? Закажу...
В теме одни модераторы... Вас чего, мой ник притягивает???
Вместо того чтобы одну строчку подсказать, развели ФЛУД... Модераторы блин... Смешно
Изменено: Dex - 16.12.2015 14:31:30
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 14:26:04
Цитата
Юрий М написал: Тогда так и будете по каждой мелочи на форум бегать ))
Да не, я с этой мелочью пол дня поковырялся, а потом уже на форум... Но не программист я...

Цитата
The_Prist написал: тогда до свидания.
Всего доброго!

Цитата
The_Prist написал:
Я в Ваши темы больше ни ногой. Мы здесь не для того, чтобы за Вас Ваши проблемы решать. Форумы как раз для того, чтобы помочь тем, кто хочет научиться. А не для решения Ваших проблем за Вас, если у Вас никакого желания понять почему не работает и не наступать на эти грабли во второй и третий раз.
Форумы созданы для обсуждения ЛЮБЫХ вопросов, определенной тематики. Свои проблемы я решаю сам, а вот вопросы по Excel иду к профессионалам, которые могут подсказать. А вот Вам видимо хочется показать свою значимость... Если бы была возможность, я бы Вас сам забанил на свои темы, несете один негатив. За решение прошлых вопросов спасибо!

Цитата
The_Prist написал: Я привел код, который точно будет работать.... И что? Он о чем-то сказал Вам? Нет.
А Вы бы у меня спросили. Я ответил бы: Да, хоть я и не программист. По аналогии пытаюсь понять как работает, сразу на кошках...

Цитата
The_Prist написал: Вы и дальше полезли совершать ту же ошибку. И что? Форум должен теперь Вам каждую строчку кода писать правильно, раз Вам так некогда потратить 5 минут на прочтение статьи?
Статью прочитал, она мне не помогла... Потому как в каждом коде есть нюансы, которые в статьях не прочтешь...

Цитата
The_Prist написал: Мое мнение: не хотите изучать - Вашим темам место в разделе Работа.
Я занимаюсь изучением, прочитал эту статью, но если не понятно? Я должен как баран ее перечитывать? Уж извините не Вам указывать что мне и как делать, я свободный и социальный человек и мне на много проще у профессионалов спросить совета. Если Вам тяжело подсказывать и решать, так чего Вы тут сидите??? Идите в раздел РАБОТА и зарабатывайте... Наслаждаясь собой...
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 13:28:52
Цитата
The_Prist написал: Программирование это не пылесосом по полу возить. если будете сначала
Это я согласен, тут все важно, до каждого символа.
Но я тут чтобы не программированию обучаться, а совета спросить... Если бы нужно было учиться, я бы не на форум полез, а на обучающие Вебинары, как минимум.

Вот небольшой например того, что я познал без чтива инструкций и успешно использую полученные практикой знания:
PC с 1995 года, DVR системы c 2009, Авто/мото с 2007, Параплан с 2010.

И если блин я по каждой строчке буду статьи читать, мне месяц потребуется на написание любого макроса...
Изменено: Dex - 16.12.2015 13:46:34
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 13:19:41
Блин, а следующая строчка тоже не пашет...
Тут то что? Тоже не удаляет...
Код
Sheets("ДУП (2)").Range(Cells(1, 1), Sheets("ДУП").iFindCell).EntireRow.Delete


и так не помогает...

Код
Sheets("ДУП (2)").Range(Cells(1, 1), iFindCell).EntireRow.Delete
Изменено: Dex - 16.12.2015 13:20:59
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 13:12:11
Понял, иными словами, учи мат. часть.
Просто я практик... Сначала делаю, потом инструкцию читаю... Иногда мешает по жизни, иногда помогает...
Изменено: Dex - 16.12.2015 13:45:55
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 13:09:21
Цитата
Казанский написал: EntireRow
Чем от Rows отличается?

Цитата
The_Prist написал: Алексей, поправь код:
А можете объяснить почему именно так?
Код
Sheets("ДУП").Range(iFindCell, Sheets("ДУП").Cells(LRow, 30)).EntireRow.Delete

Почему ссылаетесь на лист в диапазоне?
Изменено: Dex - 16.12.2015 13:45:33
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 13:07:41
Цитата
Казанский написал: EntireRow
Чем от Rows отличается?
Изменено: Dex - 16.12.2015 13:45:04
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 13:05:08
Цитата
The_Prist написал: Как обратиться к диапазону из VBA
Спасибо!
Код
Sheets("ДУП").Range("A" & iFindCell.Row & ":R" & LRow).Rows.Delete

Так работает... Это я по статье сделал ))) Правда на скорую руку...
Изменено: Dex - 16.12.2015 13:44:53
 
Перейти    
Макрос не хочет удалять строки
 
#
16.12.2015 12:32:20
Помогите разобраться, не удаляет строки или не ищет... не могу понять

Код
Dim LRow As Long: LRow = Sheets("ДУП").Cells(Rows.Count, 1).End(xlUp).Row + 1
Dim iFindCell
Set iFindCell = Sheets("ДУП").Range("H4:H1000").Find _
    (What:="ДДУ", LookIn:=xlValues, LookAt:=xlWhole).Row
Sheets("ДУП").Range(Cells(iFindCell, 1), Cells(LRow, 30)).Rows.Delete


Остановка происходит на последней строке
Изменено: Dex - 16.12.2015 12:33:08
 
Перейти    
Заменить форму inputbox на textbox, Помогите с кодом
 
#
09.12.2015 12:46:42
Цитата
CAHO написал:
Создаёте форму с TextBox делаете кнопочку Ок и Отмена. И в Ок вставляете вот это
Спасибо!
 
Перейти    
Заменить форму inputbox на textbox, Помогите с кодом
 
#
09.12.2015 11:11:55
Юрий М, Извините, не так выразился... Удалите пожалуйста старую тему
 
Перейти    
Заменить форму inputbox на textbox, Помогите с кодом
 
#
09.12.2015 11:10:09
Цитата
Юрий М написал:
Оригинальный Вы выбрали способ, чтобы обратить внимание на свою тему. 10% штрафа.

Цитата
Dex написал:
Реакции нет, может не так сформулировал...
Старую можно удалить
Изменено: Dex - 09.12.2015 11:10:40
 
Перейти    
Заменить форму inputbox на textbox, Помогите с кодом
 
#
09.12.2015 11:07:56
Цитата
CAHO написал:
А смысл?
Поле ввода маленькое, сотрудники не видят что набрали, а редактирование "запрещено". Тоесть они вносят данные на скрытый лист через ЮзерФорму
Изменено: Dex - 09.12.2015 11:08:45
 
Перейти    
Заменить форму inputbox на textbox, Помогите с кодом
 
#
09.12.2015 11:06:53
Цитата
Юрий М написал:
А зачем создали тему-дубликат?
Реакции нет, может не так сформулировал...
Старую можно удалить
 
Перейти    
Заменить форму inputbox на textbox, Помогите с кодом
 
#
09.12.2015 10:28:00
Нужно заменить inputbox на textbox, без потери функционала.
Я так понимаю нужна еще одна форма для ввода, а вот как ее прописать.

Код
Sub AddComent()
Application.ScreenUpdating = False
Dim iLastCol As Integer
Dim AR
AR = ActiveCell.Row
With Sheets("Комменты")
iLastCol = Sheets("Комменты").Cells(AR, Columns.Count).End(xlToLeft).Column
Format(Now, "hh:MM") & ")"
Application.DisplayAlerts = False
ap = Application.InputBox("Введите комментарий для клиента:", "Комментарий")
If ap = False Then Exit Sub
Sheets("Комменты").Cells(AR, iLastCol + 1) = Format(Now, "DD.MM.YY") & " " & ap & " (" & Application.UserName & " " & Format(Now, "hh:MM") & ")"
End With
Application.ScreenUpdating = True
End Sub
Изменено: Dex - 09.12.2015 10:28:50
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
08.12.2015 10:16:27
Цитата
ZVI написал:
В модуле формы Юрия (пример из сообщение #29) код для ListBox1_Click такой:
Спасибо большое!

Всем огромное спасибо!
А именно:
Юрий М, V, The_Prist, ZVI

P.S. Все ответы были полезны, я их применил в разных моментах. СПАСИБО ВСЕМ!
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 18:14:49
ListBox1_Change()
Мне в помощь...
Нет... не хочет...
Изменено: Dex - 07.12.2015 18:22:04
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 18:10:28
Цитата
Юрий М написал: Выбор из ЛистБокс см. в файле.
Он выбирает только при первом клике... :(((
Можно файл не присылать, куска кода достаточно)))
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 18:09:03
Цитата
Юрий М написал: я же не могу постоянно переделывать под Ваши необъявленные желания...
Прошу прощения, но я сам это только увидел после внедрения к себе в файл. В любом случае ОГРОМНОЕ спасибо!
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 18:02:53
Цитата
Юрий М написал: Лучше бы Вы показали в файле
Пример комментария:
06.03.15 Клиент не может определённо сказать ни да ни нет. Обещал позвонить и озвучить решение на следующей неделе, на крайний случай просил ему позвонить самим если он забудет связаться

Подскажите как мне вывести выбор из ListBox в TextBox, на вашем же примере, чтобы в нижнем TextBox отображал, было бы супер!
Изменено: Dex - 07.12.2015 18:05:54
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 17:53:21
Цитата
Юрий М написал: Увеличьте ширину столбца.
Да я уже и шрифт и величину... Блин...
А как мне сделать в этой же форме, чтобы он при выборе из ListBox1 выдавал в TextBox1 выбранное, в одной и той же форме?
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 17:34:04
Ваш код почему то так и не заработал, у Юрий_М - все ок. Но теперь проблема текст по длине не влезает в одну строку ListBox и теперь придется опять все переделывать... На TextBox наверное
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 17:23:17
Цитата
Юрий М написал: Второй вариант.
Рабочий! Спасибо, но см. пост выше...
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 17:21:20
Ребята, неожиданная проблема, некоторый текст не влезает в строчку, никак... Выходит за пределы формы, теперь получается что ListBox не подходит.
Как альтернатива TextBox, он умеет строки переносить?
Просто у нас куча комментариев по клиенту, некоторые очень длинные, я хотел их разделить лист боксом, чтобы можно было построчно выделять, отдельный комментарий... Чтобы хоть какая то разбивка была, и они не сливались в один текст... Может будут идеи?
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 17:12:23
Цитата
V написал: скорей всего Find не нашел соответствия.
Он что то не там ищет... То ли не то, то ли не там... У меня Лист Клиенты столбец 3 = Лист Комменты столбец 1, они ссылаются друг на друга...
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 16:51:52
V, код от 7 Дек 2015 15:56:58
Пишет: Run-time error 91
Object variable or With block variable not set
Изменено: Dex - 07.12.2015 17:24:22
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 16:48:51
У меня данные записаны в строку, а отобразить их нужно в столбец.

Цитата
V написал: Cells(ActiveCell.Row, 3) - слово из активной строки 3 столбца т.е. искомое имя.
Все доступно, но он зараза не хочет, хотя изучая код, я понимаю что все правильно, но что то не так. Я вызываю макросом UserForm.Show - в этом может быть проблема?
Он выдает ошибку... Хочется именно Ваш вариант, он прост...  
Изменено: Dex - 07.12.2015 17:23:00
 
Перейти    
Вставить динамический диапазон в ListBox
 
#
07.12.2015 16:22:37
V, Ваш код самый идеальный по размеру, не получается его интегрировать к себе... Поясните мальца:
Код
LR = .Range("A1:A1000").Find(Cells(ActiveCell.Row, 3)).Row
Это что за диапазон?
 
Перейти    
Страницы: 1 2 3 След.
Наверх