konto usunięte

Temat: Odwołanie do wartości minimalnej poprzez funkcję MIN

Witam,

W skoroszycie mam kilka arkuszy, z których jeden pełni rolę mastera zbierającego minimalne wartości z pozostałych (MIN('17042010:17122010'!D20))
Teraz chciałbym, żeby w komórce w której wyświetlana jest wartość liczbowa znajdowało się odwołanie do komórki w danym arkuszu z której została pobrana ta wartość.

Czy ktoś może mi coś poradzić w tej kwestii?
Bartłomiej Dąbrowski

Bartłomiej Dąbrowski
analiza/przetwarzani
e danych

Temat: Odwołanie do wartości minimalnej poprzez funkcję MIN

taka procedura:
Sub Stworz_Lacze()

Dim dblWartoscKomorki As Double
Dim shtArkusz As Worksheet
Dim rngKom As Range
Dim rngMin As Range
Dim shtMin As Worksheet

Set shtMaster = Worksheets("17042010")
dblWartoscKomorki = shtMaster.Range("D20")

For Each shtArkusz In ThisWorkbook.Worksheets
Set rngKom = shtArkusz.Range("D20")
If rngKom.Value <= dblWartoscKomorki Then
Set rngMin = rngKom
Set shtMin = shtArkusz
dblWartoscKomorki = rngKom
End If
Next shtArkusz

shtMaster.Hyperlinks.Add Anchor:=shtMaster.Range("B1"), Address:="", _
SubAddress:=shtMin.Name & "!" & rngMin.Address, TextToDisplay:="Minimum"

End Sub


Stworzy odnośnik w arkuszu "17042010" w komórce B1, którego kliknięcie przeniesie użytkownika do arkusza, w którym wartość komórki D20 jest minimalna.
Załozyłem przy tym, że arkusz "17042010" jest wspomnianym "Masterem"

Oczywiście przy zmianie wartości w którj kolwiek komórce "D20" trzeba będzie procedurę wykonać od nowa, więc zasadnym byłoby podpięcie jej pod zdarzenie reagujące na zmianę wartości.
Piotr B.

Piotr B. Analityk MIS, SQL,
VBA, BI

Temat: Odwołanie do wartości minimalnej poprzez funkcję MIN

Witam

Można to zrobić bez użycia Makra
w arkuszy w którym zbierasz dane wpisz poniższą formułe
=HIPERŁĄCZE("#Arkusz2!A"& PODAJ.POZYCJĘ(MIN(Arkusz2!A:A);Arkusz2!A:A;0);MIN(Arkusz2!A:A))


tworzy ona hiperłącze do najmniejszej wartości w arkuszu2 w kolumnie A i wyświetla jako "przyjazną nazwe" wartość minimalną z drugiego arkusza.

jak się zmienią wartości w kolumnie A w arkuszu2 to automatycznie link się zrobi to nowej najmniejszej wartośći.

PozdrawiamPiotr B. edytował(a) ten post dnia 07.06.10 o godzinie 22:57
Bartłomiej Dąbrowski

Bartłomiej Dąbrowski
analiza/przetwarzani
e danych

Temat: Odwołanie do wartości minimalnej poprzez funkcję MIN

si
ale, jak zrozumiałem, tutaj mamy do czynienia z tzw. funkcją 3-W (funkcja MIN zwracająca minimum z wartości komórki D20 z wielu arkuszy)

czyli przy pomocy PODAJ.POZYCJĘ musielibyśmy otrzymać nie tylko adres komórki ale i odpowiedni arkusz



Wyślij zaproszenie do