Pozdravljeni,
zanima me kako bi Private Sub prožil tudi preko makroja v modulu.
Imam: Private Sub ComboBox1_LostFocus()
proži se mi samo, ko zapustim ComboBox1.
Želel bi, da bi ga lahko zagnal tudi preko makroja v modulu.
Hvala za pomoč in LP
Bostjan
Proženje Privat Sub preko makroja v modulu
Če prav razumem problem, je rešitev več.
Najbolje je, če napišete tisti želeni makro pod enim imenom - npr.sub Moj_makro v modulu.
Tega preprosto sprožate v modulu, iz tabele pa pod makro z dogodkom Private Sub ComboBox1_LostFocus() enostavno napišete ukaz za izvršitev podprograma - makra, enostavno ime tistega makra - torej Moj_makro, pa seveda End sub.
Private Sub ComboBox1_LostFocus() - v vaši tabeli
Moj_makro
End Sub
sub Moj_makro - v modulu
ukazi
End Sub
Druga možnost je, da v modulu napišete makro s katerim simulirate dogodek LostFokus
Sub Makro_v_modulu()
List1.ComboBox1.Activate
List1.Range("a1").Select - ali pa izberite kaj drugega
End Sub
Pazite samo na ime tabele v katerem imate kombinirano polje.
Mora funkcionirati in LP Alan
Najbolje je, če napišete tisti želeni makro pod enim imenom - npr.sub Moj_makro v modulu.
Tega preprosto sprožate v modulu, iz tabele pa pod makro z dogodkom Private Sub ComboBox1_LostFocus() enostavno napišete ukaz za izvršitev podprograma - makra, enostavno ime tistega makra - torej Moj_makro, pa seveda End sub.
Private Sub ComboBox1_LostFocus() - v vaši tabeli
Moj_makro
End Sub
sub Moj_makro - v modulu
ukazi
End Sub
Druga možnost je, da v modulu napišete makro s katerim simulirate dogodek LostFokus
Sub Makro_v_modulu()
List1.ComboBox1.Activate
List1.Range("a1").Select - ali pa izberite kaj drugega
End Sub
Pazite samo na ime tabele v katerem imate kombinirano polje.
Mora funkcionirati in LP Alan