Prikazi cijelu temu
05.06.2017 15:47
05.06.2017 15:47
Predmet:Re: Query od vise tabela
Nisam nasao tvoju pretragu.
Moras malo pomoci.
Dim BrojSelektovanih As Integer
Dim Selektovani As Integer
BrojSelektovanih = Me.List0.ItemsSelected.Count
If BrojSelektovanih > 2 Then
Selektovani = Me.List0.ListIndex
Me.List0.Selected(Selektovani) = False
End If
End Sub
Nisam nasao tvoju pretragu.
Moras malo pomoci.
Citat:
Private Sub List0_Click()I treco pitajne kako selektirati samo 2 redova u listbox.
Dim BrojSelektovanih As Integer
Dim Selektovani As Integer
BrojSelektovanih = Me.List0.ItemsSelected.Count
If BrojSelektovanih > 2 Then
Selektovani = Me.List0.ListIndex
Me.List0.Selected(Selektovani) = False
End If
End Sub
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.