Добрый день уважаемые форумчане!!! Благодаря RAN, sboy, в теме (кросс: My WebPage) было достигнуто решение (которое честно сказать, для меня понимается все же с трудом и частично) но возникли трудности. после того как оператор вносит данные они сохраняются как нужно. Но когда оператор выбирает редактировать выбранную строку то после сохранения некоторые ячейки искажаются (((( 1. Время "Примечание = Время прибытия" почему то показывает в числах хотя формат ячеек стоит время. Но она также и на форме показывает не как было занесено а как числа ((( 2. Графа столбца "Погрешность материала в % к фактическому весу" там должна срабатывать формула
Код
=ЕСЛИ([@[Вес принятый к БУ по документам поставщика]]>[@[Вес материала на весовой, т.]];[@[Вес принятый к БУ по документам поставщика]]-[@[Вес материала на весовой, т.]];0)
и когда оператор вносит данные то она работает, но когда начинает редактировать то вся графа ЗНАЧ (((((( 3. Если пытаешься изменить завод РБУ-1 на РБУ-2 то при сохранении остаются данные теже самые которые были изначально ((((( Помогите решить данную проблему, спасибо вам сразу же огромное!!!
Добрый день уважаемые форумчане!!! Благодаря RAN, sboy, в теме (кросс: My WebPage) было достигнуто решение (которое честно сказать, для меня понимается все же с трудом и частично) но возникли трудности. после того как оператор вносит данные они сохраняются как нужно. Но когда оператор выбирает редактировать выбранную строку то после сохранения некоторые ячейки искажаются (((( 1. Время "Примечание = Время прибытия" почему то показывает в числах хотя формат ячеек стоит время. Но она также и на форме показывает не как было занесено а как числа ((( 2. Графа столбца "Погрешность материала в % к фактическому весу" там должна срабатывать формула
Код
=ЕСЛИ([@[Вес принятый к БУ по документам поставщика]]>[@[Вес материала на весовой, т.]];[@[Вес принятый к БУ по документам поставщика]]-[@[Вес материала на весовой, т.]];0)
и когда оператор вносит данные то она работает, но когда начинает редактировать то вся графа ЗНАЧ (((((( 3. Если пытаешься изменить завод РБУ-1 на РБУ-2 то при сохранении остаются данные теже самые которые были изначально ((((( Помогите решить данную проблему, спасибо вам сразу же огромное!!!lebensvoll
По п.3 Не надо использовать активацию формы. Надо прописать загрузку списков на инициализацию. Сейчас же постоянно при каждом чихе данные заново заносятся в форму с листа.
По п.3 Не надо использовать активацию формы. Надо прописать загрузку списков на инициализацию. Сейчас же постоянно при каждом чихе данные заново заносятся в форму с листа.wild_pig
Не надо использовать активацию формы. Надо прописать загрузку списков на инициализацию. Сейчас же постоянно при каждом чихе данные заново заносятся в форму с листа.
как я правильно понял нужно удалить данный код на форме 3 [vba]
Код
Private Sub UserForm_Activate() 'активация выпадающих списков на "UserForm3" при выборе "ComboBox" и "Календаря" Me.ComboBox1.RowSource = "Завод" Me.ComboBox2.RowSource = "Поставщик" Me.ComboBox3.RowSource = "Грузоперевозчик" Me.ComboBox4.RowSource = "ВидМатериала" Me.ComboBox5.RowSource = "Тара" Me.ComboBox6.RowSource = "Номенклатура" Me.ComboBox7.RowSource = "ВидЦемента" Me.ComboBox8.RowSource = "МашиныПривоза" Me.ComboBox9.RowSource = "МестоПриемки" Me.MonthView1.Visible = False 'активация календаря If Me.Tag = "red" Then Call UserForm_Ini 'активация кода для редактирования выбранной строки
End Sub
[/vba] Так получается (((( но мне кажется тогда не будут активны выпадающие списки!? СПАСИБО ВАМ ОГРОМНОЕ!!! Коды на дату срабатывают на ура
wild_pig, доброе утро!!!
Цитата
Не надо использовать активацию формы. Надо прописать загрузку списков на инициализацию. Сейчас же постоянно при каждом чихе данные заново заносятся в форму с листа.
как я правильно понял нужно удалить данный код на форме 3 [vba]
Код
Private Sub UserForm_Activate() 'активация выпадающих списков на "UserForm3" при выборе "ComboBox" и "Календаря" Me.ComboBox1.RowSource = "Завод" Me.ComboBox2.RowSource = "Поставщик" Me.ComboBox3.RowSource = "Грузоперевозчик" Me.ComboBox4.RowSource = "ВидМатериала" Me.ComboBox5.RowSource = "Тара" Me.ComboBox6.RowSource = "Номенклатура" Me.ComboBox7.RowSource = "ВидЦемента" Me.ComboBox8.RowSource = "МашиныПривоза" Me.ComboBox9.RowSource = "МестоПриемки" Me.MonthView1.Visible = False 'активация календаря If Me.Tag = "red" Then Call UserForm_Ini 'активация кода для редактирования выбранной строки
End Sub
[/vba] Так получается (((( но мне кажется тогда не будут активны выпадающие списки!? СПАСИБО ВАМ ОГРОМНОЕ!!! Коды на дату срабатывают на ура lebensvoll
Много уважаемые форумчане вы меня вообще запутали (((( С одной сторону то что мы с делали с Pelena, и предложено wild_pig, РАБОТАЕТ А вот правильно ли она или нет я этих то терминологий не понимаю ((((
Цитата
Не надо использовать активацию формы. Надо прописать загрузку списков на инициализацию. Сейчас же постоянно при каждом чихе данные заново заносятся в форму с листа.
Ну а тем более уж эти для меня вообще темный лес ((((
Цитата
Так с таким же успехом можно на каждый контрол и [vba]
Код
Call UserForm_Initialize
[/vba]
подвесить! hands yes Что я зачастую практикую (правда, только там, где надо, точнее, на тех контролах, где надо).
Ни чего ведь нет критического если я останусь на варианте где работает???
Много уважаемые форумчане вы меня вообще запутали (((( С одной сторону то что мы с делали с Pelena, и предложено wild_pig, РАБОТАЕТ А вот правильно ли она или нет я этих то терминологий не понимаю ((((
Цитата
Не надо использовать активацию формы. Надо прописать загрузку списков на инициализацию. Сейчас же постоянно при каждом чихе данные заново заносятся в форму с листа.
Ну а тем более уж эти для меня вообще темный лес ((((
Цитата
Так с таким же успехом можно на каждый контрол и [vba]
Код
Call UserForm_Initialize
[/vba]
подвесить! hands yes Что я зачастую практикую (правда, только там, где надо, точнее, на тех контролах, где надо).
Ни чего ведь нет критического если я останусь на варианте где работает???lebensvoll
lebensvoll, у Вас в процедуре активации прописано заполнение формы данными с листа. Эта процедура вызывалась при каждом изменении каждого поля. То есть Вы выбираете новое значение из списка, а оно тут же снова меняется на значение с листа. Поэтому я и предложила убрать эту строку с активацией
lebensvoll, у Вас в процедуре активации прописано заполнение формы данными с листа. Эта процедура вызывалась при каждом изменении каждого поля. То есть Вы выбираете новое значение из списка, а оно тут же снова меняется на значение с листа. Поэтому я и предложила убрать эту строку с активациейPelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Всем доброго утра!!! Pelena, ну и она работает и все меняется при редактировании строки и сохранении спасибо вам огромное за это. Но я так понял по вашим беседам что можно было также прийти к этому если бы я также на всех формах изменил бы [vba]
Код
Call UserForm_Activate
[/vba] на [vba]
Код
Call UserForm_Initialize
[/vba] процесс происходил бы также как поступили вы [vba]
Код
'Call UserForm_Activate
[/vba] Или я не правильно понял RAN, почему вы призываете
Цитата
Думалку иногда включать надо!
Всем доброго утра!!! Pelena, ну и она работает и все меняется при редактировании строки и сохранении спасибо вам огромное за это. Но я так понял по вашим беседам что можно было также прийти к этому если бы я также на всех формах изменил бы [vba]
Код
Call UserForm_Activate
[/vba] на [vba]
Код
Call UserForm_Initialize
[/vba] процесс происходил бы также как поступили вы [vba]
Код
'Call UserForm_Activate
[/vba] Или я не правильно понял RAN, почему вы призываете
Заполняйте контролы формы не в самой форме, а в коде, ее открывающем (в модуле листа, например), пепосредственно перед UserForm.Show Форма же после нажатия условной кнопки Ok проверяет правильность заполнения и вписывает новые значения в ячейки листа, а потом дает сама себе Hide.
Так будет и просто, и надежно
Заполняйте контролы формы не в самой форме, а в коде, ее открывающем (в модуле листа, например), пепосредственно перед UserForm.Show Форма же после нажатия условной кнопки Ok проверяет правильность заполнения и вписывает новые значения в ячейки листа, а потом дает сама себе Hide.