Elektroda.pl
Elektroda.pl
X
Elektroda.pl
Advanced Search
Elektroda.pl
Please add exception to AdBlock for elektroda.pl.
If you watch the ads, you support portal and users.

[Excel] Wyszukiwanie i transpozycja wartości > 0

Barnard33 18 Jul 2018 09:08 513 5
Reply | New topic
  • #1
    Barnard33
    Level 5  
    Cześć
    Chciałbym:
    - wyszukać w poprzednich 10 wierszach koilumny A wartości >0
    - transponować powyższe do wierszy B, C, D, ... Formuła kopiowana w dół.
    Kolejność może być odwrotna, może być w ogóle inne podejście do tematu. Byle było zautomatyzowane.

    Plik w załączeniu: wartości na białym tle są wpisane, a mamy uzyskać wartości w komórkach na szarym tle.

    Czy da się to zrobić?
    Attachments:
  • Helpful post
    #2
    Prot
    Level 38  
    Barnard33 wrote:
    Czy da się to zrobić?

    Można to zrobić np przy użyciu dodatkowych kolumn z formułami pośrednimi, oraz przy użyciu funkcji WYBIERZ() tak jak na zrzucie:
    [Excel] Wyszukiwanie i transpozycja wartości > 0wybor.JPG Download (58.86 kB)
    Wszystkie funkcje w załączonym pliku :spoko:
    wybor.xlsx Download (10.59 kB)Points: 1.5 for user
  • #3
    krzkus2
    Level 11  
    Co jeśli wierszy kolumnie będzie więcej niż pól w "tabelce"?
    tutaj masz na szybko napisany kod :D działa.

    Code: Expand Select all Copy to clipboard 
    Sub przerzucanie()
Dim i As Integer
Dim cell As Range
Dim o As String

i = 11
o = "B"
For Each cell In Worksheets("arkusz1").Range("a:a").Cells
If i = 22 And o = "B" Then
o = "c"
i = 11
Else
If i = 22 And o = "c" Then
o = "d"
i = 11

End If
End If

If cell.Value > 0 Then
Range(o & i).Value = cell.Value
i = i + 1

Else
If cell.Value = "" Then
Exit For
End If
End If
Next cell

End Sub
  • #4
    Barnard33
    Level 5  
    Czy to VBA?
  • #5
    krzkus2
    Level 11  
    dokładnie tak, byłoby fajnie gdybys podał jakieś szczegóły tego jak ma to wyglądać.
  • #6
    Barnard33
    Level 5  
    krzkus2 wrote:
    dokładnie tak, byłoby fajnie gdybys podał jakieś szczegóły tego jak ma to wyglądać.

    Całość jest / będzie znacznie bardziej rozbudowana, powiązana z Access itd. I jest w trakcie tworzenia.
    Nie mam nic przeciwko udostępnieniu czy sukcesywnemu udostępnianiu, choć już raczej na PW. Oznaczałoby to pewnego rodzaju współpracę.
    A chodzi w tym o budowanie strategii dla inwestowania na rynku forex.

    PS. Na excelforum.pl uzyskałem pożądaną formułę na pytanie jak w obecnym wątku.
Reply | New topic