Teen userformia jossa textbox1:seen käyttäjä syöttää päivämäärän esim. 16.02.2009. Tämän jälkeen kirjataan muita tietoja esim sos.turvatunnus. Tiedot talletetaan riveittäin.
Haluaisin nyt poimia taul1:stä kaikki jotka vastaa haettua sos. turvatunnusta. Tämän jälkeen taul2:seen siirtyisi kaikki poimitut tiedot päivämäärittäin alenevasti.
Ongelma:
Käyttäjän päivämäärät ei suostu menemään alenevaan järjestykseen.
Kuka osaa auttaa ongelmassani?
Pitääkö textboxin tieto muuttaa joksikin muotoilulla jotta sorttaus onnistuu?
EXCEL is fun
VBA ongelma
Excel is fun
2
355
Vastaukset
tekstiruudun tiedot menee tekstinä soluun. Kyllähän se sorttaus pitäisi silti onnistua...
kokeile laittaa siirrossa pvm muutos seuraavasti
esim.
Sub Koe()
Dim vika As Integer
On Error Resume Next
Sheets(1).Activate
vika = Range("A65536").End(xlUp).Row 1
Range("A" & vika) = CDate(TextBox1)
Columns("A:A").Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
P.S. käytä mun postaamaa HaeJASiirrä funktiota , se on kätevä tossa tapauksessa...- Excel is fun
Hei
Tuo tuntui toimivan. Sain sen ymmärtämään myös textboxin tietoa kun muuttujan avulla muutin sen as date. Sen jälkeen alkoi toimimaan myös.
Kiitos vinkistä
Excel is Fun
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Saako kaunis ihminen parempaa kohtelua?
Onko kauniin ihmisen elämä "helpompaa" kuin tavallisen näköisen ihmisen? Olen kuullut väittämän, että kaunis ihminen saa1724726- 123296
En rehellisesti usko et oisit
Sekuntiakaan oikeasti mua kaivannut. Tai edes miettinyt miten mulla menee. Jotenkin todennäköisesti hyödyt tästäkin jos402213Näin sinusta taas unta!
Unessa olin pakahtuneesti rakastunut sinuun. Olimme vanhassa talossa jossa oli yläkerran huoneissa pyöreät ikkunat. Pöly261984Paljonko aikaa on kulunut siitä kun viimeksi tapasit hänet?
Päiviä? Viikkoja? Kuukausia? Vuosia?471906Se oli siinä sitten
Yhdysvaltain presidentti Donald Trump on määrännyt kaiken maan Ukrainalle toimittaman sotilaallisen tuen tauolle, kertoo6641837- 1161806
- 1371737
- 451485
En muuttaisi sinusta mitään
Ensin olit etäinen ja yritin pysyä tutkan alapuolella. Mutta ei silmiltäsi jää mitään huomaamatta, kuten minulla ei kuul101421