Hei, nauhoitin makron ja muokkasin sen tällaiseksi:
Sub vuosi()
Dim v As Integer
Range("A3").Select
v = Application.InputBox("Anna vuosi muodossa VVVV", Type:=1)
Selection.AutoFilter Field:=1, Criteria1:=">=1.1." & v, Operator:=xlAnd, _
Criteria2:="
AutoFilter ei toimi makrolla oikein
apua pyydän
1
185
Vastaukset
päivämäärät on usein kinkkisiä excelissä. Toimiakseen lajittelussa vaatii jenkkityyliset päiväykset, mutta koska Excel tallentaa päivät numeroina niin ne kannattaa muuttaa luvuiksi
korjasin hiukan koodiasi ja nyt se toimii
Sub vuosi()
Dim v As Integer
Dim Päiväys1 As Long
Dim Päiväys2 As Long
Range("A3").Select
v = Application.InputBox("Anna vuosi muodossa VVVV", Type:=1)
Päiväys1 = DateSerial(v, 1, 1)
Päiväys2 = DateSerial(v 1, 1, 1)
Selection.AutoFilter Field:=1, Criteria1:=">=" & Päiväys1, Operator:=xlAnd, _
Criteria2:="
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Mikä on kaivattusi etunimi?
Otsikossa siis on kysymys eriteltynä. Vain oikeat vastaukset hyväksytään.1703526En kestä katsoa
Sitä miten sinusta on muut kiinnostuneita. Olen kateellinen. Siksi pitäisi lähteä pois1011859- 1431767
Kun viimeksi kohtasitte/näitte
Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...1291672Peräti 95 % persujen kannattajista rasisteja
Kertoo EVA:n teettämä kysely. Pakollista yhdenvertaisuuskoulutusta tarvitsee siis paljon laajempi joukko kuin pelkästää3961604Olet kyllä vaarallisen himokas
Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.1021457Anna vielä vähän vihreää valoa
Teen sitten siirtoni, nainen. Tiedän, että olet jo varovaisesti yrittänyt lähestyä, mutta siitä on jo aikaa. Jos tunnet171173- 631096
- 621093
On minulla suunitelma
Siitä ei vain tiedä kukaan muu kuin tällä hetkellä minä. Suunnitelma ja varasuunnitelma. Sinun takiasi nainen. Vain s541001