Article View: pl.comp.lang.vbasic
Article #104929Re: excel vba combobox 2 kolumny
From: Wojciech Malinowski
Date: Thu, 08 Nov 2012 19:30
Date: Thu, 08 Nov 2012 19:30
69 lines
2646 bytes
2646 bytes
W dniu czwartek, 8 listopada 2012 16:22:58 UTC+1 użytkownik IDKrzych napisał: > W dniu 2012-11-08 08:22, Wojciech Malinowski pisze: > > > Witam mam problem z odpowiednim wyďż˝wietleniem danych w okienku combobox. > > > Chciaďż˝bym ďż˝eby byďż˝ jednakowy tabulator, czyli kolumna pod kolumnďż˝. > > > > > > Pobieram dane z bazy i wyďż˝wietlam je z comboboxie. > > > > > > .AddItem rst![Kategoria] & rst![Typ, nr katalogowy] > > > rst.MoveNext > > > > > > Wiem ďż˝e moďż˝na to podzieliďż˝ BoundColumn. > > > Ale nie wiem jak zrobiďż˝ ďż˝eby byďż˝a kolumna pod kolumnďż˝. > > > > Zobacz tak: > > 'ustaw kolumny > > TwojCombo.ColumnCount = 2 > > > > 'w jakiejďż˝ pďż˝tli wypeďż˝ni rekordami > > TwojCombo.AddItem rst![Kategoria] > > TwojCombo.List(TwojCombo.ListCount - 1, 1) = rst![Typ, nr katalogowy] > > > > Pozdrawiam > > -- > > IDKrzych > > > > "Jakkolwiek bďż˝dzie - bďż˝dzie inaczej, aniďż˝eli sobie wyobraďż˝amy > > - poniewaďż˝ miďż˝dzy Dobrem a Zďż˝em znajdujemy siďż˝ w ďż˝yciu i w ďż˝wiecie > > wielowymiarowym, > > w ktďż˝rym dokumentnie pomieszane jest Przypadkowe z Nieuchronnym." > > (S. Lem 1999) With ActiveSheet.ComboBox1 .Clear Do .AddItem rst![Kategoria] .List(ComboBox1.ListCount - 1, 1) = rst![Typ, nr katalogowy] rst.MoveNext Loop Until rst.EOF Mam coś takiego i tutaj pojawia się błąd: .List(ComboBox1.ListCount - 1, 1) = rst![Typ, nr katalogowy]
Technical Details
Message-ID:
<6caad6da-bb27-4056-9e28-e0c8fdf38b9d@googlegroups.com>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!news.cyf-kr.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!news.glorb.com!kt20no37377859pbb.1!news-out.google.com!6ni68539pbd.1!nntp.google.com!kr7no37565064pbb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mailReferences:
<7602a5f5-d45c-4a24-a948-4a51b72e12d4@googlegroups.com> <509bce51$0$1298$65785112@news.neostrada.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!news.cyf-kr.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!news.glorb.com!kt20no37377859pbb.1!news-out.google.com!6ni68539pbd.1!nntp.google.com!kr7no37565064pbb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail Newsgroups: pl.comp.lang.vbasic Date: Thu, 8 Nov 2012 11:30:49 -0800 (PST) In-Reply-To: <509bce51$0$1298$65785112@news.neostrada.pl> Complaints-To: groups-abuse@google.com Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=89.230.210.87; posting-account=mi5SHAkAAADQXfC54TeFmznXegfRuEDP NNTP-Posting-Host: 89.230.210.87 References: <7602a5f5-d45c-4a24-a948-4a51b72e12d4@googlegroups.com> <509bce51$0$1298$65785112@news.neostrada.pl> User-Agent: G2/1.0 MIME-Version: 1.0 Message-ID: <6caad6da-bb27-4056-9e28-e0c8fdf38b9d@googlegroups.com> Subject: Re: excel vba combobox 2 kolumny From: Wojciech Malinowski <wmalinowski1@gmail.com> Injection-Date: Thu, 08 Nov 2012 19:30:49 +0000 Lines: 75 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit