Sortiranje

[Marty]

Spet imam težavo in prosim za pomoč. V stolpcu A se nahaja zaporedje, recimo 1 do 20, v stolpcu B so različna imena (a, b, c,...),v stolpcu C pa količine ki se spreminjajo. V stolpec D v vsako vrstico poleg pripadajoče količine bi rad vpisal novo količino, ki bi se prištela količini v stolpcu C ta pa bi moral sortirati stolpec B in C padajoče. Ko bi bilo sortiranje izvršeno se lahko številka v stolpcu D izbriše. Nikoli se ne vpišejo vse številke v stolpcu D ampak le nekatere(naključno)

Vnaprej hvala za pomoč!
Lp!
Marty

[admin]

Pozdravljeni,

Avtomatično to ne gre, ker vnos v celico ne more vplivati na način sorta neke kolone. Potrebno je napisati makro, ki se sproči ali ob spremembi v koloni D ali pa ga upoabnik sproži sam, ko želi.

[Marty]

Hvala za odgovor
Ampak ker sem bolj nov pri tem bi prosil za kakšen namig ali pa če so kje navodila o pisanju makrojev.
Lp!

[admin]

Pozdravljeni,

Da bi se zdajle učili makrov bi dolgo trajalo, zato sem vam ta makro napisal kar jaz:

Koda: Izberi vse

' www.matjazev.net
' 09.12.2005
Sub UpostevajD()
    Dim vrstica, zadnjaVrstica
    
    ' C-ju prištejem D in ga brišem
    zadnjaVrstica = Range("D65000").End(xlUp).Row
    For vrstica = zadnjaVrstica To 2 Step -1
        Cells(vrstica, 3) = Cells(vrstica, 3) + Cells(vrstica, 4)
        Cells(vrstica, 4) = ""
    Next
    
    ' sortiram B in C padajoče
    Range("B1").Select
    Selection.Sort Key1:=Range("B2"), Order1:=xlDescending, Key2:=Range("C2"), _
        Order2:=xlDescending, Header:=xlYes
End Sub

Makro predvideva, da se podatki začno v vrstici 2, v vrstici 1 pa so naslovi.

Kar pa se tiče učenja makrov, pa vam priporočam mojo knjigo: "Visual basic za aplikacije".

[Marty]

Najlepša hvala!
Zdajle bom takoj preizkusil zadevo.
Zanima pa me tudi knjiga. Ali je v prodaji v knjigarnah ali se kar zmeniva.
Še enkrat hvala in lep pozdrav!
Marty

[nkomel]

Spoštovani,
Najprej to, da je vaša stran zelo pohvalna. Ob njej sem se marsikaj naučil. Hvala.

Zdaj pa bi imel tudi sam eno vprašanje.
Z uporabo makroja želim sortirati podatke po neki vrednosti (ko uporabnik pritisne npr. na ctrl+r).
V stoplcu A imam neka imena, v naslednjih stolpcih pa mesece in pripadajoče vrednosti. Stvar dela v kolikor pustim obkljukane (prikazane) vse mesece, ko pa želim odkljukati določen mesec, da ga ne prikazuje, sortiranje vrže error 1004:Cannot determine which PivotTable field to sort by.

A mi lahko prosim pomagate?

Hvala lepa
N