GoldenLine
Zaloguj się
Błażej Zych

Błażej Zych Specjalista - media
i komunikacja

Temat: Dynamiczna lista

Cześć,

Chciałbym się przywitać z wszystkimi tutaj obecnymi. Jest to mój pierwszy wpis w tej grupie.

Nie potrafię sobie poradzić z następującym działaniem. Podam przykład:
Arkusz1:
dane w jednej kolumnie w wierszach pod sobą (lista)
a
b

Arkusz2:
dane w jednej kolumnie w wierszach pod sobą (lista)
1
2
3
4

Chciałbym, aby jakieś makro, albo funkcja połączyła następująco dane z obu arkuszy, aby teraz w dwóch kolumnach, ale w tym samym wierszu znalazły się dopasowania:
kolumna 1 (listery), kolumna 2 (cyfry) - w tym samym wierszu
a 1
a 2
a 3
b 1
b 2
b 3

Oczywiście w życiu codziennych obie listy zarówno z Akrusza1 jak i Arkusza2 są uzupełniane o kolejne wiersze:
a
b
c

oraz

1
2
3
4
5

nowe zestawienie powinno wyglądać następująco.
kolumna 1 (listery), kolumna 2 (cyfry) - w tym samym wierszu
a 1
a 2
a 3
a 4
a 5
b 1
b 2
b 3
b 4
b 5
c 1
c 2
c 3
c 4
c 5

Jak sobie z tym poradzić?
Z góry dziękuję za pomoc.
Link do wypowiedziLink
Andy L.

Andy L. ITM, VUB

Temat: Dynamiczna lista

Czy chcesz aby:


A	1

A	2

A	3

B	1

B	2

C	1

C	2

C	3

C	4

D	1

E	1

E	2

F	1

X	1

X	2

X	3

X	4

X	5

X	6

G	1
czyli do każdej powtórzonej litery były przyporządkowane kolejne liczby?
Nie za bardzo rozumiem tego dopasowania dwóch kolumn. Wg. jakiego kryterium miało by być to dopasowanie?Ten post został edytowany przez Autora dnia 15.04.16 o godzinie 12:53
Link do wypowiedziLink
Błażej Zych

Błażej Zych Specjalista - media
i komunikacja

Temat: Dynamiczna lista

Dzięki za podejście do tematu.
Może jeszcze raz i wrzucę zrzuty z ekranu.

Na zdjęciu poniżej widać wyjściowe listy z danymi: dane I i dane II.
Chcę aby były one przez formułę, zebrane we wspólną tabelę.
Czyli do każdej figury geometrycznej przypasowany dokładnie jeden raz kolor.


Obrazek


Jeśli natomiast, zmienię dane I, dodam kolejną figurę geometryczną w obojętnie które miejsce listy oraz dodam w dane II kolejny kolor, to chce, aby tabela z nowymi przypasowaniami prezentowała się tak jak na zrzucie poniżej.

<a href=
Obrazek
.html><img src=
Obrazek
alt=hosting zdjęć zapodaj.net /></a>Ten post został edytowany przez Autora dnia 15.04.16 o godzinie 14:02
Link do wypowiedziLink
Andy L.

Andy L. ITM, VUB

Temat: Dynamiczna lista

Rozumiem ideę ale nie rozumiem po co definiować kolumnę (dane I figury) skoro już ją masz w H10 (o ile dobrze policzyłem wierszs). Do tych danych dopasowujesz zdefiniowane kolory i tyle.
np.:


A	Alpha		Alpha

A	Beta		Beta

A	Gamma		Gamma

B	Alpha		Delta

B	Beta		Epsilon

C	Alpha		Zeta

C	Beta		Eta

C	Gamma		Theta

C	Delta		Iota

D	Alpha		Kappa

E	Alpha

E	Beta

F	Alpha

X	Alpha

X	Beta

gdzie A,B,C etc. to twoje figury a Alpha, Beta etc to są twoje kolory

EDIT:
Jeżeli zmieni się coś w kolumnie pierwszej, np. dodam Z, to kolory dopasują się automatycznie. Warunkiem jest to, że nie może być wiecej liter niż ilość kolorów.
(ilość takich samych figur <= ilość kolrów)

Pytanie: W jaki sposób chcesz przyporządkować żółty do trójkąta? itd. skoro nie masz tego zdefiniowanego w twoich warunkach?

Dodaj link do pliku xlsx gdzie pokaż co masz PRZED i co chcesz osiągnąć czyli wygląd PO, plus to co sam zrobiłeś (formuła, funkcja etc.)Ten post został edytowany przez Autora dnia 15.04.16 o godzinie 15:12
Link do wypowiedziLink
Oskar Shon

Oskar Shon Dodatki do Office
www.VBATools.pl

Temat: Dynamiczna lista

Pętelka w pętelce w module VBA:
Sub PwP()

'Dodatki do Office VBATools.pl

Dim a As Range, b As Range, x&

For Each a In Range("C4:C6")       'zakres fig

    For Each b In Range("E4:E6")   'zakres kolorów

        Cells(10 + x, "C") = a     'od 10 wiersza

        Cells(10 + x, "E") = b

        x = x + 1

    Next

Next

End Sub
Link do wypowiedziLink
Błażej Zych

Błażej Zych Specjalista - media
i komunikacja

Temat: Dynamiczna lista

Andy Levi i Oskar Shon.
Dziękuję za zainteresowanie tematem i pomoc.

Makro jest strzałem w dziesiątkę.
To jest to o co mi chodziło.
Dziękuję!!!
Link do wypowiedziLink
Damian Zurawski

Damian Zurawski Data Engineer w
Grupie Żywiec

Temat: Dynamiczna lista

Oskar S.:
Pętelka w pętelce w module VBA:


A nie w modułku? ;)

A na poważnie Oskar mam pytanie: jest zadeklarowana zmienna "x&". Cóż to za zapis? Czy zmienna ma przypisany jakiś typ zmiennych?Ten post został edytowany przez Autora dnia 17.04.16 o godzinie 12:11
Link do wypowiedziLink
Andrzej Graczyk

Andrzej Graczyk Specjalista Analiz
Sprzedaży,
Wielkopolski Bank
Spółdzielczy

Temat: Dynamiczna lista

Można również użyć Microsoft Query i odświeżać listę makrem zdarzeniowym.
Link do wypowiedziLink
Andrzej Graczyk

Andrzej Graczyk Specjalista Analiz
Sprzedaży,
Wielkopolski Bank
Spółdzielczy

Temat: Dynamiczna lista

Sprawdziłem i działa coś takiego:

select x.ListaA,y.Lista2
FROM
(
SELECT `Arkusz13$`.ListaA
FROM `Arkusz13$` `Arkusz13$`
where `Arkusz13$`.ListaA is not null) as x
,
(
SELECT `Arkusz13$`.Lista2
FROM `Arkusz13$` `Arkusz13$`
where `Arkusz13$`.Lista2 is not null) as y

Wystarczy odświeżyć listę ręcznie i kombinacja się aktualizuje.
Link do wypowiedziLink
Oskar Shon

Oskar Shon Dodatki do Office
www.VBATools.pl

Temat: Dynamiczna lista

Damian Z.:
A na poważnie Oskar mam pytanie: jest zadeklarowana zmienna "x&". Cóż to za zapis? Czy zmienna ma przypisany jakiś typ zmiennych?

Deklaracje można zapisać skrótem: 
Dim a! ' to samo co: Short

Dim b@ ' to samo co: Currency

Dim c# ' to samo co: Double

Dim d$ ' to samo co: String

Dim e% ' to samo co: Integer

Dim f& ' to samo co: Long

Ja się przyzwyczaiłem.
Szkoda jednak ze nie ma Range, ale biorą się one z VB5/6 gdzie programowanie w Excel jeszcze raczkowało więc zasada zadziałała, ale jej nie zaktualizowano.Ten post został edytowany przez Autora dnia 17.04.16 o godzinie 16:50
Link do wypowiedziLink
Damian Zurawski

Damian Zurawski Data Engineer w
Grupie Żywiec

Temat: Dynamiczna lista

Ekstra, dzięki wielkie za odpowiedź! :)

Na Ciebie jak zawsze można liczyć!
Link do wypowiedziLink
« Wróć do tematów
Odpowiedz

Podobne tematy


Następna dyskusja:

lista rozwijana - sezaktywo...




Wyślij zaproszenie do
Anuluj