Vba form
17 отговора
359 прегледа
Re: Vba form
До колкото ми е известно не може да стане. Може да се реализира псевдо минимизиране - при натискане на даден бутон да променяш размера на формата. При по-високите версии на Excel може да дефинираш вида на формата (модален и нещо си друго), т.е. да можеш да излизаш от нея без да я затваряш, но ще дава грешки при работа с Excel 97.
Re: Vba form
Обясни как се прави, защото докато тази форма е активна не може да
се активира друг отворен Excel файл.
се активира друг отворен Excel файл.
Re: Vba form
Всъщност най-важният въпрос беше да ли ти си правиш програмката или ползваш готова, но ако ти си я пишеш в Properties на UserForm->ShowModal му задай False. Това ще ти позволи при кликване извън формата да можеш да работиш в Excel.
Re: Vba form
аз си я правя и много не разбирам от тези неща, но това за
ShowModal го видях и го направих, до тук добре.
А сега ако предложиш вариант за "минимизиране" или скриване на
формата без да се губят данните и съответно "максимизиране" много ще ми
помогнеш.
Благодаря!
ShowModal го видях и го направих, до тук добре.
А сега ако предложиш вариант за "минимизиране" или скриване на
формата без да се губят данните и съответно "максимизиране" много ще ми
помогнеш.
Благодаря!
Re: Vba form
не съм много сигурне, но си мисля, че това което искаш не може да стане
Go Install Analysis Toolpack!
Go Install Analysis Toolpack!
Re: Vba form
Това, което мога да ти предложа е следното. При натискане на един бутон да му зададеш Height=20 (примерно) на UserForm, а при натискане на друг да възстановява оригиналния си размер.
Re: Vba form
За "минимизиране" не мога да ти помогна
За скриване със запазване на данните по контролите:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Cancel = 1
Hide
End Sub
За скриване със запазване на данните по контролите:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Cancel = 1
Hide
End Sub
не е по темата ...
но докато търсих нещо по темата ето какво намерих
[линк]
по точно FaceIT
то вие сигурно си ги знаете тези неща.



[линк]
по точно FaceIT
то вие сигурно си ги знаете тези неща.
Re: Vba form
Благодаря ти!
Получава се, а също така пробвах и това
Private Sub UserForm_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If UserForm1.Height = 414.75 Then
UserForm1.Height = 25
Else
UserForm1.Height = 25
UserForm1.Height = 414.75
End If
End Sub
но трябва да остане видима малка част от формата (не става въпрос за
заглавната лента), за да се кликне върху нея за да я възстанови.

Получава се, а също така пробвах и това
Private Sub UserForm_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If UserForm1.Height = 414.75 Then
UserForm1.Height = 25
Else
UserForm1.Height = 25
UserForm1.Height = 414.75
End If
End Sub
но трябва да остане видима малка част от формата (не става въпрос за
заглавната лента), за да се кликне върху нея за да я възстанови.
Редактирано от cveti_m на