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

Страницы: 1 2 След.
Отображение количества оставшегося товара после продажи
 
#
20.02.2016 23:06:32
Ничего не понятно.
 
Перейти    
Поиск и добавление данных в таблицу
 
#
19.02.2016 11:01:11
А можно копировать только значение строки без формул и формата ячеек?

Разобрался
.Cells(.Cells(i, 3).Row + 1, 1).PasteSpecial Paste:=xlPasteValues
 
Перейти    
Поиск и добавление данных в таблицу
 
#
19.02.2016 10:07:42
Огромнейшее спасибо!!!  Я бы над этим долго мучился.
 
Перейти    
Поиск и добавление данных в таблицу
 
#
18.02.2016 20:49:39
Строка 3 с листа "Внести" должна добавиться ниже найденой строки на листе "Данные" по трем  условиям  А3, В3, С3 с листа "Внести" или хотя бы по двум условиям.
 
Перейти    
Поиск и добавление данных в таблицу
 
#
18.02.2016 20:39:41
Пример как должно получиться
 
Перейти    
Поиск и добавление данных в таблицу
 
#
18.02.2016 19:44:28
Нужно хотя бы по двум столбцам "А" и "С", так как "В" и "С" могут быть одинаковыми для разных "А".
 
Перейти    
Поиск и добавление данных в таблицу
 
#
18.02.2016 19:31:57
Добрый день. Прошу помощи в решении для меня очень сложной задачи.
Ситуация в следующем:
- есть таблица с данными в нее нужно добавить еще данные но при этом нужно найти по первым трем колонкам совпадение и в конец найденного списка добавить строку с данными.
Пример файла во вложении.
 
Перейти    
Запрет редактирования (макрос)
 
#
17.12.2015 14:18:39
Цитата
The_Prist написал:
так цель запретить копировать данные?
Да, этот способ проще для реализации защиты от копирования, а также защита от изменений.
 
Перейти    
Запрет редактирования (макрос)
 
#
17.12.2015 14:15:02
ОГРОМНОЕ СПАСИБО
 
Перейти    
Запрет редактирования (макрос)
 
#
17.12.2015 14:07:00
Цитата
The_Prist написал:
По сути запретить изменять ячейки можно таким кодом в модуле книги:
Код супер но он запрещает изменение все ячеек, а как указать диапазон который нужно запретить?
 
Перейти    
Запрет редактирования (макрос)
 
#
17.12.2015 13:53:15
Цитата
The_Prist написал:
А если я отключу работу макросов - что делать будете?
Стоит двойная защита листа для пользователя, как макросом, макросы работаю но лист остается защищен и ручная защита стандартным способом. Если отключить работу макросов тогда пользователь ничего не сделает что от него требуется.
Изменено: Владимир С - 17.12.2015 14:19:19
 
Перейти    
Запрет редактирования (макрос)
 
#
17.12.2015 13:51:02
Есть определенный функционал(надстройка) который выполняет определенный действия ссылаясь на выделенную ячейку, запрещать стандартным способом изменения можно, но тогда остается возможность пользователю копировать все данные с листа, а это должно быть запрещено. Когда стоит запрет на выделение заблокированы ячеек тогда функционал не может работать так как не видит выделенные для него ячейки.
 
Перейти    
Запрет редактирования (макрос)
 
#
17.12.2015 13:13:13
Добрый день. Прошу помощи в реализации запрета на изменения данных в в ячейке или диапазоне ячеек. Данный запрет должен быть реализован только макросом. Стандартные методы не подходят.
 
Перейти    
Вставка данных в ячейку
 
#
16.12.2014 17:18:57
Огромное спасибо!!! Все работает, во втором тоже самое только указал нужный столбец.
 
Перейти    
Вставка данных в ячейку
 
#
16.12.2014 17:00:36
Длобрый день. Боюсь повторится с вопросом, но ничего не смог найти то что мне нужно. Гуру, прошу Вашей помощи в правильности написания макроса, а именно есть макрос который ищет значение и при нахождении вставляет данные в ячейку находящуюся правее. Вопрос: Как написать что бы при нахождении заданного значения в двух столбцах данные заносились в столбец "О" в ячейку напротив найденных данных
Код
If KeyCode = vbKeyReturn Then
   Set R = Range("m5:n10000") 'Столбцы поиска данных
   Set FR = R.Find(TextBox1.Text)
   If Not FR Is Nothing Then
    Range(FR.Offset(0, 1), FR.Offset(0, 1)).Activate 'в какой столбец вставлять, нужно здесь что бы указывался фиксированный столбец "О" напротив найденного значения
      If CheckBox1 = False Then
     UserForm1.Fr1.Caption = TextBox1.Text
    UserForm1.L1.Caption = FR.Offset(0, - .Value. 'здесь указать фиксированный столбец с которой брать данные напротив найденного значения
    UserForm1.TB1.Text = "1"
    UserForm1.TB1.SelStart = 0
    UserForm1.TB1.SelLength = Len(TextBox1.Text)
    UserForm1.TB1.SetFocus
    UserForm1.Show
    Else: i = ActiveCell.Value
    ActiveCell.Value = i + 1
    End If
   Else:  Beep 1200, 300: Beep 1200, 300: Beep 1200, 1000:
    MsgBox "ОШИБКА"
    Beep 2000, 1000:
   End If
   TextBox1.Activate
   TextBox1.SelStart = 0
   TextBox1.SelLength = Len(TextBox1.Text)
   End If
End Sub
 
Перейти    
Вставка данных с добавлением строк
 
#
11.01.2014 20:07:36
Спасибо.
 
Перейти    
Вставка данных с добавлением строк
 
#
11.01.2014 19:59:31
Ура заработало. Затупил  :)
 
Перейти    
Вставка данных с добавлением строк
 
#
11.01.2014 19:57:15
Есть вопрос, сколько будет стоить создать определенный отчет, с одной таблицы  по нажатию кнопки создавалась другая с определенными текстовой преамбулой и реквезитами, затем с этой немного другая и третья. И к кому можно обратится за разработкой.
 
Перейти    
Вставка данных с добавлением строк
 
#
11.01.2014 19:53:22
Не могу понять что я не так делаю
 
Перейти    
Вставка данных с добавлением строк
 
#
11.01.2014 19:46:59
В файле "Пример"
 
Перейти    
Вставка данных с добавлением строк
 
#
11.01.2014 19:34:13
Спасибо. Но не могу определить причину почему не хочет работать.
 
Перейти    
Вставка данных с добавлением строк
 
#
11.01.2014 16:36:19
Добрый день. Добрые люди прошу у Вас помощи с решением вопроса по переносу данных с одного листа на другой. Суть в том что нужно по нажатию кнопки перенести или скопировать данные с листа "Лист1" на лист "Лист2"  так что бы данные вставлялись с добавлением нужного количества строк только так что бы на Листе2 первая и последние строки сохранялась.
 
Перейти    
Подсвечивание выделеной ячейки
 
#
29.11.2013 13:13:55
Спасибо. Прошу прощения писал с телефона, признаю свои ошибки.
 
Перейти    
Подсвечивание выделеной ячейки
 
#
29.11.2013 13:04:35
Добрый день. Помогите решить одну проблему, никак не получается.
Есть макрос
If Not FR Is Nothing Then
   Range(FR.Offset(0, -1), FR.Offset(0, 1)).Activate
выдиляет ячейки что и как добавить что бы они подсвечивались определенным цветом, а при переходе на другую цвет возвращался изначальный
 
Перейти    
Использование checkbox для открытия формы.
 
#
18.11.2013 13:15:36
БОЛЬШОЕ Спасибо всем. Нашел и подправил.

Else: i = ActiveCell.Value
ActiveCell.Value = i + 1
 
Перейти    
Использование checkbox для открытия формы.
 
#
18.11.2013 13:07:15
и не приплюсовывает, а ставит "1"
 
Перейти    
Использование checkbox для открытия формы.
 
#
18.11.2013 13:05:58
Спасибо добавляет но есть еще один момент, добавляет только раз при следующем вводе этого же кода не добавляет :(
 
Перейти    
Использование checkbox для открытия формы.
 
#
18.11.2013 10:39:11
Спасибо но количество по 1шт. не добавляет.
 
Перейти    
Использование checkbox для открытия формы.
 
#
15.11.2013 17:29:35
Добрый день! Помогите доработать макрос. Есть файл в котором по штрих коду ищется товар и при нахождении открывает форму для ввода количества, помогите сделать когда в checkbox стоит галочка то форма не открывалась, а автоматически добавлялось количество, когда снята то форма открывается.
Изменено: Владимир С - 15.11.2013 17:59:46
 
Перейти    
Выдиление значения в TextBox.
 
#
20.06.2013 11:33:03
СПАСИБО!!! Работает.
 
Перейти    
Страницы: 1 2 След.
Наверх