Miten tämmöinen olisi viisainta ratkaista. Päivittäin tulee excel-raportti, jossa rivitietona lukuja eri sarakkeissa. Miten tästä saisi joka päivä näppärästi koonnin siirrettyä paikkaan X jossa nuo tiedot olisi riveittäin per päivä? Copypaste ei ole vaihtoehto tässä kohtaa.
Rivitiedon siirtäminen toiseen tiedostoon joka päivä
Anonyymi
6
1170
Vastaukset
- Anonyymi
Riippuu ihan paikasta X. Ei ole mitään yleisratkaisua, jos ei tiedetä mihin tieto halutaan.
- Anonyymi
Jos pysytään Excel-maailmassa, niin ajatus olisi että tämä päivittäinen rivitieto olisi vietävissä siihen isompaan exceliin päivämäärä riveittäin.
- Anonyymi
Mikä on "isompi excel"?
- Anonyymi
Anonyymi kirjoitti:
Mikä on "isompi excel"?
Joka päivä tulee uusi tiedosto, jossa on yhden päivän tiedot. Tarkoitus olisi kopioida nuo tiedot toiseen tiedostoon, jossa on myös aiempien päivien tiedot.
- Anonyymi
Anonyymi kirjoitti:
Joka päivä tulee uusi tiedosto, jossa on yhden päivän tiedot. Tarkoitus olisi kopioida nuo tiedot toiseen tiedostoon, jossa on myös aiempien päivien tiedot.
Minkälaisia tiedostot ovat? Tekstitiedostoja?
- Anonyymi
Sub LisääRaportti()
Dim app As New Excel.Application
Dim rapo As Excel.Workbook
Set fd = Application.FileDialog(msoFileDialogFilePicker)
solut = Split("B3;C4;D5;D6;E4;G4", ";")
With fd
.Filters.Clear
.Title = "Haettava Raportti"
.Filters.Add "Picture Files", "*.xls,*.xlsx,*.xlsm", 1
.AllowMultiSelect = False
r = Cells(Rows.Count, "A").End(xlUp).Row 1
If .Show = -1 Then
f = .SelectedItems(1)
Set book = app.Workbooks.Add(f)
app.Visible = False
Else
Exit Sub
End If
End With
c = 1 ' jos päivämäärä on raportissa, tähän tulee 0 ja päivämäärän sisältävä solu lisätään listaan
Cells(r, c) = Now()
For i = 0 To UBound(solut)
c = c 1
Cells(r, c) = rapo.ActiveSheet.Range(solut(i))
Next
rapo.Close SaveChanges:=False
app.Quit
Set app = Nothing
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Valtion alijäämä = yritystukien määrä = 10 mrd. euroa
Mutta persut eivät vaan suostu tasapainottamaan valtion budjettia, vaikka yritystuet on tiedetty haitallisiksi. Miksi p766990Suomi käyttää sosiaalietuuksiin suhteessa eniten rahaa koko maailmassa
Suomi käyttää sosiaaliturvaetuuksiin enemmän rahaa suhteessa bruttokansantuotteeseen kuin mikään muu maa maailmassa. Su3576078Grahn-Laasonen: "Kansalainen joutuu pettymään, jos demareita äänestää"
Ministeri viittaa tuoreeseen Helsingin Sanomien juttuun, jossa demarijohtajan keinoja Suomen suunnan muuttamiseksi esite543404Vähän fiksumpi Nimi kisa ? :=)
Kirjoita teidän etunimet allekkain. Jos nimissä on joku kirjain sama, poista se. Tee sama tarkistus kaikille kirjaimill293139Mikä on suurin luonne- eroavuus sinussa
Ja kaivatussasi? Vaikuttaako se huonoon vai hyvään suuntaan siinä, että teistä voisi tulla jotain?1901652Kenen haluaisit voittavan Amazing Racen: Tuomas ja Esko, Millu ja Karoliina vai Maria ja Vilma?
Amazing Race Suomi huipentuu lauantaina finaaliin. Jäljellä on kolme paria ja tiedossa on tehtäviä, jotka järkyttävät os171388Gallup: Katsotko Salkkareita tai oletko katsonut?
Salatut elämät on suomalaisten suosikkisarja vuosikymmenestä toiseen. Salkkareiden parissa viettää aikaa sukupolvet laps181116- 601093
Elämäni biisi starttaa uudessa muodossa - Voi olla pettymys faneille!
Elämäni biisi ja juontaja Katja Ståhl ovat suomalaisten suosikkeja. Lauantai-iltaisin ohjelma on vetänyt tv-katsojat arv11010Amazing Race Tomas rehellisenä Esko-appiukon, 63, tilasta: "Sairastelut ja..."
Tomas Grekov ja Esko Rotola-Pukkila ovat mukana Amazing Race Suomi -kisassa. Ja nyt vuorossa on finaali. Hankaluuksia m1997