Excelillä on tallennettu aikojen kuluessa .txt-tiedostoja kansioon. Nyt olis tarve saada luettua muuttujaan viimeisen kansiossa olevan .txt-tiedoston nimi.
Tiedostonnimi muuttujaan
4
221
Vastaukset
- Anonyymi
ls ja tuolle tietyt parametrit.
- Anonyymi
Avaa kansio ja käytä silmämuniasi.
moduuliin...
Tallentaa viimeksi tallenetun tekstitedoston nimen muuttujaan VikaTiedostonnimi
Tallentaa viimeksi tallenetun tekstitedoston tallennusajan muuttujaan VikaPäiväys
Option Explicit
Dim Polku As String
Dim Tiedostonnimi As String
Public VikaTiedostonnimi As String
Public VikaPäiväys As Date
Dim TallennusPäiväys As Date
Sub Uusintiedosto()
'muuta polku ja tiedostopääte sopivaksi
Polku = "C:\Kunde\"
Tiedostonnimi = Dir(Polku & "*.txt", vbNormal)
If Len(Tiedostonnimi) = 0 Then
MsgBox "Ei löytynyt tekstitiedostoja...", vbExclamation
Exit Sub
End If
Do While Len(Tiedostonnimi) > 0
TallennusPäiväys = FileDateTime(Polku & Tiedostonnimi)
If TallennusPäiväys > VikaPäiväys Then
VikaTiedostonnimi = Tiedostonnimi
VikaPäiväys = TallennusPäiväys
End If
Tiedostonnimi = Dir
Loop
End Sub
Keep EXCELing
@Kunde- Anonyymi
Kiitti
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Yritykset verolle ja yritystuet 10 mrd. eur/v pois
Kiristämistapauksissa yrityksille sanotaan hei hei. Suomi ei tarvitse yhteiskunnan rahoilla "yrittämistä". Yhteiskunta v1772547Riikan perintö: ennätysvelka, ennätystyöttömyys ja ennätysverotus
Tavallisen keskituloisen suomalaisen verotus on kireintä vuosikymmeniin, ja ensi vuonna palkansaajien käteen jää vieläki82302Sannalta jälleen fiksu lausunto johtamisesta
"I used to think the best argument would win – but real leadership means listening, understanding where people come from562100- 1072031
Riikka se runnoo työttömyyttä lisää
Menkää töihin! "15–74-vuotiaiden työttömyysasteen trendiluku oli lokakuussa 10,3 prosenttia. Työttömiä oli yhteensä 276702014Sanna Antikainen (ps) : Vornasen pyssy suututti demarit
https://www.suomenuutiset.fi/sanna-antikaisen-kolumni-vornasen-pyssy-suututti-demarit-mutta-kuka-puhuu-totta/ Vornasen341989Hallinto-oikeus totesi Sysmän kunnanjohtajan potkut laittomiksi (YLE Lahti 24.11.2025)
Että näin sitten: Hallinto-oikeus totesi Sysmän kunnanjohtajan potkut laittomiksi – valtuuston päätös nurin ja 50 000 la621347- 1251175
Poistettuun aloitukseen
Ei se mulle ollut varmastikaan. En usko vaik sille tuntuukin että oisit voinut olla eräs. Mut niin mäkin pelkään. Ei241087- 55968