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
312
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
Tänään pyörit ajatuksissa enemmän, kun erehdyin lukemaan palstaa
En saisi, silti toivon että sinä vielä palaat ja otetaan oikeasti selvää, hioituuko särmät ja sulaudummeko yhteen. Vuod225234- 254398
- 282541
- 342264
- 372008
- 151928
En ole koskaan kokenut
Ennen mitään tällaista rakastumista. Tiedän että kaipaan sinua varmaan loppu elämän. Toivottavasti ei tarvitsisi vain ka191617- 121541
Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...
Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons211277Kerranki asiat oikein
Ilkka ja muut pienpuolueeet...teitte hyvän työn kun valitsitte pätevän henkilön virkaan eikä kepulle passelia!! Jatkakaa101194