Thread View: pl.comp.lang.vbasic
8 messages
8 total messages
Started by Wojciech Malinowski
Thu, 08 Nov 2012 07:22
excel vba combobox 2 kolumny
Author: Wojciech Malinowski
Date: Thu, 08 Nov 2012 07:22
Date: Thu, 08 Nov 2012 07:22
12 lines
1559 bytes
1559 bytes
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ą. Nie wiem czy zrozumiale napisałem
Re: excel vba combobox 2 kolumny
Author: Marzena
Date: Thu, 08 Nov 2012 08:00
Date: Thu, 08 Nov 2012 08:00
18 lines
1563 bytes
1563 bytes
Użytkownik "Wojciech Malinowski" <wmalinowski1@gmail.com> napisał w wiadomości news:7602a5f5-d45c-4a24-a948-4a51b72e12d4@googlegroups.com... Wiem że można to podzielić BoundColumn. Ale nie wiem jak zrobić żeby była kolumna pod kolumną. Nie wiem czy zrozumiale napisałem (...) Kolumna pod kolumą? Ale przeciez w ten spsoóśb są wyświetlane wiersze poszczegółnych kolumn - jeden pod drugim. Kolumny sa wyświetane obok siebie. Chyba, ze źle Cię jednak zrozumiałam i nie o to Ci chodzi. marzatela --------------------- http://www.szultaset.pl
Re: excel vba combobox 2 kolumny
Author: Wojciech Malinowski
Date: Thu, 08 Nov 2012 08:21
Date: Thu, 08 Nov 2012 08:21
44 lines
2502 bytes
2502 bytes
W dniu czwartek, 8 listopada 2012 09:00:24 UTC+1 użytkownik Marzena napisał: > Użytkownik "Wojciech Malinowski" <wmalinowski1@gmail.com> napisał w > > wiadomości news:7602a5f5-d45c-4a24-a948-4a51b72e12d4@googlegroups.com... > > > > Wiem że można to podzielić BoundColumn. > > Ale nie wiem jak zrobić żeby była kolumna pod kolumną. > > > > Nie wiem czy zrozumiale napisałem > > (...) > > > > Kolumna pod kolumą? Ale przeciez w ten spsoóśb są wyświetlane wiersze > > poszczegółnych kolumn - jeden pod drugim. Kolumny sa wyświetane obok siebie. > > Chyba, ze źle Cię jednak zrozumiałam i nie o to Ci chodzi. > > > > > > marzatela > > --------------------- > > http://www.szultaset.pl Chodzi mi o to żeby było z odpowiednim tabulatorem: Jest tak: Towar1Kategoria Typtowaru1 Ttoowwaarr2Kategoria Typtowaru2 a żeby było tak: Towar1Kategoria Typtowaru1 Ttoowwaarr2Kategoria Typtowaru2
Re: excel vba combobox 2 kolumny
Author: Wojciech Malinowski
Date: Thu, 08 Nov 2012 08:22
Date: Thu, 08 Nov 2012 08:22
90 lines
3048 bytes
3048 bytes
W dniu czwartek, 8 listopada 2012 09:21:04 UTC+1 użytkownik Wojciech Malinowski napisał: > W dniu czwartek, 8 listopada 2012 09:00:24 UTC+1 użytkownik Marzena napisał: > > > Użytkownik "Wojciech Malinowski" <wmalinowski1@gmail.com> napisał w > > > > > > wiadomości news:7602a5f5-d45c-4a24-a948-4a51b72e12d4@googlegroups.com... > > > > > > > > > > > > Wiem że można to podzielić BoundColumn. > > > > > > Ale nie wiem jak zrobić żeby była kolumna pod kolumną. > > > > > > > > > > > > Nie wiem czy zrozumiale napisałem > > > > > > (...) > > > > > > > > > > > > Kolumna pod kolumą? Ale przeciez w ten spsoóśb są wyświetlane wiersze > > > > > > poszczegółnych kolumn - jeden pod drugim. Kolumny sa wyświetane obok siebie. > > > > > > Chyba, ze źle Cię jednak zrozumiałam i nie o to Ci chodzi. > > > > > > > > > > > > > > > > > > marzatela > > > > > > --------------------- > > > > > > http://www.szultaset.pl > > > > Chodzi mi o to żeby było z odpowiednim tabulatorem: > > > > Jest tak: > > Towar1Kategoria Typtowaru1 > > Ttoowwaarr2Kategoria Typtowaru2 > > > > a żeby było tak: > > Towar1Kategoria Typtowaru1 > > Ttoowwaarr2Kategoria Typtowaru2 Trochę nie wyszło ale chodzi o jednakowe przesunięcie
Re: excel vba combobox 2 kolumny
Author: Wojciech Malinowski
Date: Thu, 08 Nov 2012 08:33
Date: Thu, 08 Nov 2012 08:33
181 lines
3649 bytes
3649 bytes
W dniu czwartek, 8 listopada 2012 09:22:42 UTC+1 użytkownik Wojciech Malinowski napisał: > W dniu czwartek, 8 listopada 2012 09:21:04 UTC+1 użytkownik Wojciech Malinowski napisał: > > > W dniu czwartek, 8 listopada 2012 09:00:24 UTC+1 użytkownik Marzena napisał: > > > > > > > Użytkownik "Wojciech Malinowski" <wmalinowski1@gmail.com> napisał w > > > > > > > > > > > > > > wiadomości news:7602a5f5-d45c-4a24-a948-4a51b72e12d4@googlegroups.com... > > > > > > > > > > > > > > > > > > > > > > > > > > > > Wiem że można to podzielić BoundColumn. > > > > > > > > > > > > > > Ale nie wiem jak zrobić żeby była kolumna pod kolumną. > > > > > > > > > > > > > > > > > > > > > > > > > > > > Nie wiem czy zrozumiale napisałem > > > > > > > > > > > > > > (...) > > > > > > > > > > > > > > > > > > > > > > > > > > > > Kolumna pod kolumą? Ale przeciez w ten spsoóśb są wyświetlane wiersze > > > > > > > > > > > > > > poszczegółnych kolumn - jeden pod drugim. Kolumny sa wyświetane obok siebie. > > > > > > > > > > > > > > Chyba, ze źle Cię jednak zrozumiałam i nie o to Ci chodzi. > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > marzatela > > > > > > > > > > > > > > --------------------- > > > > > > > > > > > > > > http://www.szultaset.pl > > > > > > > > > > > > Chodzi mi o to żeby było z odpowiednim tabulatorem: > > > > > > > > > > > > Jest tak: > > > > > > Towar1Kategoria Typtowaru1 > > > > > > Ttoowwaarr2Kategoria Typtowaru2 > > > > > > > > > > > > a żeby było tak: > > > > > > Towar1Kategoria Typtowaru1 > > > > > > Ttoowwaarr2Kategoria Typtowaru2 > > > > Trochę nie wyszło ale chodzi o jednakowe przesunięcie Ehh, nie jednakowe przesunięcie tylko kolumna pod kolumną.
Re: excel vba combobox 2 kolumny
Author: IDKrzych
Date: Thu, 08 Nov 2012 15:22
Date: Thu, 08 Nov 2012 15:22
29 lines
1976 bytes
1976 bytes
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)
Re: excel vba combobox 2 kolumny
Author: 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]
Re: excel vba combobox 2 kolumny
Author: Wojciech Malinowski
Date: Thu, 08 Nov 2012 19:52
Date: Thu, 08 Nov 2012 19:52
155 lines
3989 bytes
3989 bytes
W dniu czwartek, 8 listopada 2012 20:30:49 UTC+1 użytkownik Wojciech Malinowski napisał: > 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] Źle wpisałem sorry With ActiveSheet.ComboBox1 .Clear Do .AddItem rst![Kategoria] .List(.ListCount - 1, 1) = rst![Typ, nr katalogowy] rst.MoveNext Loop Until rst.EOF End With Tak działa, tylko w którymś rekordzie wywala mi błąd .List(.ListCount - 1, 1) = rst![Typ, nr katalogowy] Przeleci kilkaset rekordów i pojawi się błąd. Dzięki za podpowiedź
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads