Eli olen syöttänyt lukuarvoja excel taulukkoon, esim. A1=100 ja B1=200 C1=13.7.2006, A1 tarkoittaa lähtöarvoa ja B1 päättymisarvoa eli Arvot ovat 100:sta 200:aan. Arvoja on useita riveja mutta kaikki alkuarvot sijaitsevat sarakkeessa A ja loppuarvot sarakkeessa B. Samat luvut voivat esiintyä useaan kertaan tai tiettyjen lukujen sisällä (esim. A2=120 ja B2=150 C2=10.8.2006). Arvoja tulee kokoajan lisää. (n.100riviä/vuosi) kuinka helpoiten tietoon että minä päivänä arvo 123 on lisätty? (arvojen jälkeen on lisäyspäivämäärä). Näillä arvoilla vastaus olisi 13.7 ja 10.8.
Millä ohjelmalla ja miten
1
327
Vastaukset
Excelissä kannattaa tehdä.
Moduuliin koodi...
Nyt kysyy arvoa ja kopioi päiväykset F1 alkaen, muuta itsellesi sopivaksi :-)
Sub Suodata()
Dim Target As Range
Dim i As Integer
Dim Suodatetut As Range
Dim KopioAlue As Range
On Error GoTo virhe
Range("F:F") = ""
With Columns("A:C")
x = Application.InputBox("Anna luku", Type:=1)
.AutoFilter Field:=1, Criteria1:="=" & x, Operator:=xlAnd
For Each solu In ActiveSheet.AutoFilter.Range.Columns(3).SpecialCells(xlCellTypeVisible)
i = i 1
Cells(i, 6) = solu.Value
Next solu
.AutoFilter
End With
Exit Sub
virhe:
Columns("A:C").AutoFilter
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
IL - Kansanedustaja tehnyt ITSEMURHAN eduskuntatalossa!!
"IL:n tiedot: Kansanedustaja tehnyt itsemurhan Eduskuntatalossa Iltalehden tietojen mukaan kansanedustaja on tehnyt its4129066Eemeli Peltonen teki itsemurhan eduskuntatalossa
Kevyet mullat sitten vaan. Ei mulla muuta.1883652- 202113
- 831302
- 271115
Sylikkäin.
Sylikkäin, suudellen. Milloin haluaisit näin nainen tehdä ? Vain häntä ajatellen 😘. Tietenkin jos häntä asia kiinnosta661102- 751100
Eemeli Peltosen viimeinen postaus Facebookissa!
"Olen ollut kevätistuntokauden viimeisillä viikoilla paljon poissa eduskuntatyöstä. Sain toukokuussa hyvää hoitoa HUSiss791075- 551033
- 66982