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
1065
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
Kiitos nainen
Kuitenkin. Olet sitten ajanmerkkinä. Tuskin enää sinua näen ja huomasitko, että olit siinä viimeisen kerran samassa paik124030MTV: Kirkossa saarnan pitänyt Jyrki 69 koki yllätyksen - Paljastaa: "Se mikä oli hyvin erikoista..."
Jyrki Linnankivi alias Jyrki 69 on rokkari ja kirkonmies. Teologiaa opiskeleva Linnankivi piti elämänsä ensimmäisen saar822081Hyväksytkö sinä sen että päättäjämme ei rakenna rauhaa Venäjän kanssa?
Vielä kun sota ehkäpä voitaisiin välttää rauhanponnisteluilla niin millä verukkeella voidaan sanoa että on hyvä asia kun5491647Kirjoita yhdellä sanalla
Joku meihin liittyvä asia, mitä muut ei tiedä. Sen jälkeen laitan sulle wappiviestin941366Olet hyvin erilainen
Herkempi, ajattelevaisempi. Toisaalta taas hyvin varma siitä mitä haluat. Et anna yhtään periksi. Osaat myös ilkeillä ja671117Yksi syy nainen miksi sinusta pidän
on se, että tykkään luomusta. Olet luonnollinen, ihana ja kaunis. Ja luonne, no, en ole tavannut vielä sellaista, joka s331038Hyödyt Suomelle???
Haluaisin asettaa teille palstalla kirjoittelevat Venäjää puolustelevat ja muut "asiantuntijat" yhden kysymyksen pohditt216916Hyvää Joulua mies!
Toivottavasti kaikki on hyvin siellä. Anteeksi että olen hieman lisännyt taakkaasi ymmärtämättä kunnolla tilannettasi, o60883- 171854
Paljastavat kuvat Selviytyjät Suomi kulisseista - 1 päivä vs 36 päivää viidakossa - Katso tästä!
Ohhoh! Yli kuukausi viidakossa voi muuttaa ulkonäköä perusarkeen aika rajusti. Kuka mielestäsi muuttui eniten: Mia Mill3828