TRN

Благодаря ти много.А има ли вариянт при цъкването на календара от формата да излиза под юзер формата?

В SF_DatePick ред 209 определя къде да се визуализира формата

SF_DatePick.Top = UserForm1.Top

Например така SF_DatePick.Top = UserForm1.Top + UserForm1.Height

ще се появи под формата

Здравейте!

Намерих си един файл в който искам да променя кода, но не се получава това което искам.Ще прикача оригиналния файл, за да не объркам някой.Искам да променя да не търси в колона "С" в комбобокса в юзерформата, а да търси в колона "Е".

По принцип променям в комбобокса да не ми показва колона "С" а да ми покаже колоната която искам но като натисна бутона за репорт и в листбокса не ми показва нищо.

Благовя предварително.

Поправката е в ред 32 на UserForm1

CStr(ara.Offset(0, 3).Value) = CStr(ComboBox1.Text) Then

Прилагам и файла с поправките