GoldenLine
Zaloguj się

konto usunięte

Temat: proszę o pomoc ComboBox

jak zrobić na ComboBoxie (w liście rozwijanej) znajdującej się na Forms-ie takie coś, żeby po kliknięciu na wybrana pozycję otwierał się odpowiedni arkusz..?

pozdrawiam Iza
Link do wypowiedziLink
Łukasz B.

Łukasz B. Dyrektor Finansowy,
OTCF Sp. z o.o.

Temat: proszę o pomoc ComboBox

Cześć,
Nie wiem jak zaawansowana jesteś z makrami i excelem więc wytłumaczę krok po kroku:

Sprawę trzeba załatwić makrem.

Podane zakresy komórek są przykładowe:
Zrodło combobox to np. zakres komorek A2:A4. Komorka A1 stanowi lącze. W komórkach B2:B4 definiujesz ścieżki gdzie znajdują się pliki np. w komorce B2 scieżkę do pliku C:\Raporty\Handlowe\KPI 2007.xls, w B3 kolejna scieżka itd. Czyli wybierając z listy treść znajdującą sie w komórce A2 chcemy otworzyć plik zdefiniowany w komórce B2!
Następnie w komórce B1 wpisujemy formułę, która będzie w zależności od wyboru którego dokonamy w combobox pokazywała odpowiedającą ścieżkę dostępu do pliku: załatwiamy to zwykłym przesunięciem: w komórce B1 wpisujemy formułę =PRZESUNIĘCIE($B$1;$A$1;0).

I teraz kwestia zdefiniowania makra:

Alt+F11 ---> Insert --> Module
W tym wstawionym module wklejamy poniższy kod:

Sub Otworz()

Application.Calculate
Zrodlo = Range("B1").Value
Workbooks.Open Filename:=Zrodlo, ReadOnly:=True

End Sub

Podpinasz makro do ComboBox'a (prawe kliknięcie na combobox, "przypisz makro", wksazujemy nasze makro "Otworz" i klikamy "OK") i gotowe....

Powinno zadziałać :)

Lukasz
Link do wypowiedziLink
Łukasz B.

Łukasz B. Dyrektor Finansowy,
OTCF Sp. z o.o.

Temat: proszę o pomoc ComboBox

Jeszcze raz :)
Być może sie zagalopowałem z otwieraniem nowych plików. Jezeli chodzi tylko o wybór arkuszy z tego samego pliku to jak poniżej:

Tak samo jak w poprzednim wpisie: lista do ComboBox w A2:A4, nazwy odpowiednich arkuszy w B2:B4, w B1 formuła przesunięcia.
Tylko kod makra trochę inny:

Sub Arkusz()

Application.Calculate
DDD = Range("I5").Value

Sheets(DDD).Select

End Sub

Lukasz
Link do wypowiedziLink

konto usunięte

Temat: proszę o pomoc ComboBox

http://www.goldenline.pl/forum/excel-w-praktyce/163362
Link do wypowiedziLink
Izabela R.

Izabela R. Analityk danych

Temat: proszę o pomoc ComboBox

Wojtek G.:
http://www.goldenline.pl/forum/excel-w-praktyce/163362
Forum dla wybranych :)
Link do wypowiedziLink

konto usunięte

Temat: proszę o pomoc ComboBox

combo box wyświetla numer wiersza wybranej pozycji, więc przez VLOOKUP wyświetlasz sheet wybrany w combo, następnie proste macro powiązane z combo, nazwa sheetu jako zmienna i seets(zmienna).activate
Link do wypowiedziLink
Dariusz F.

Dariusz F.

Temat: proszę o pomoc ComboBox

Mam taki problem.
Zrobiłem Comboboxa. Jego zadaniem, po wyborze odpowiedniej pozycji na liście, będzie pokazanie odpowiednich grup tabel. Problem polega na tym, że te tabele mają nazwy od zakładek. Potrzebuję więc napisać tak formułkę, by utworzenie nowej zakladki "nazwa" spowodowało dodanie do comboboxa pozycji "nazwa"

I drugi problem. W arkuszu1 mam funkcję, która liczy średnią na podstawie n - wartości. Chce skopiować wynik do arkusz2 (wynik może się zmienić). Problem polega na tym, że w międzyczasie zmienia się nazwa "arkusz1" na "Eu reg'

ActiveWorkbook.Sheets("arkusz2").Activate
Range("G8").Select
ActiveCell.FormulaR1C1 = "='Arkusz1'!RC[28]"

Czy można to jakoś obejść, tak by zmiana nazwy zakładki nie wywalała programu?
Link do wypowiedziLink
« Wróć do tematów
Odpowiedz

Podobne tematy


Następna dyskusja:

Sumy standaryzowane - prosz...




Wyślij zaproszenie do
Anuluj