Tiedostonnimi muuttujaan

Anonyymi

Excelillä on tallennettu aikojen kuluessa .txt-tiedostoja kansioon. Nyt olis tarve saada luettua muuttujaan viimeisen kansiossa olevan .txt-tiedoston nimi.

4

243

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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

    1. Purra hyökkää nyt suomalaisen duunarin kimppuun teettämällä mamuilla palkatonta työtä

      Niinpä niin. Persut duunaripuolue, HAH. Joko alkaa kovapäisinkin persu älyämään, että persut ovat Suomen kansan vastain
      Maailman menoa
      180
      11056
    2. Mitä hyvää rikkaiden hyysääminen Suomelle tuonut?

      Minäpä vastaan: ei yhtikäs mitään, vaan pelkkää vahinkoa. Demareiden ansiosta Suomen valtio oli käytännössä vielä 1980-
      Maailman menoa
      92
      10522
    3. Tytti Tuppurainen häpäisi Suomen epäisänmaallisella lausunnollaan USA:n ulkoministerille Rubiolle.

      https://www.is.fi/politiikka/art-2000011816267.html Miksi Tytti Tuppurainen päästetään antamaan typeriä lausuntoja noin
      Maailman menoa
      235
      5960
    4. Purra ehdottaa vaan Tanskan mallia, joka on erittäin hyvä malli

      Purra ehdotti helmikuussa Suomeen Tanskan mallia, jossa maahanmuuttajilta vaaditaan työntekoa sosiaalitukien saamiseksi.
      Maailman menoa
      180
      4774
    5. Kokoomusnuoret: Sosiaalitukien työvelvoitteen tulisi koskea kaikkia

      Riikka Purra on esittänyt, että maahanmuuttajilta tulisi edellyttää palkatonta työtä sosiaalitukien vastineeksi. Kokoom
      Maailman menoa
      131
      3256
    6. Pystyisitkö olla

      Kanssani kaiken sotkun jälkeen? Ainakaan tunteet ei ole loppuneet
      Ikävä
      171
      3245
    7. L/OVER ikuisesti minun

      Aivan järkyttävä sarja. Ei voi olla katsomatta, mutta tuo omat muistot mieleen. Näyttelijät näyttelevät turhankin hyvin
      Ikävä
      40
      2063
    8. Mitä voisit miehenä tehdä?

      Suojellaksesi kaikkia naisia ja että heillä olisi juuri sinun käytöksen takia edes vähän turvallisempaa. Mitä miehenä
      Ikävä
      299
      1643
    9. Jyrki Linnankivi, Jyrki 69 - Goottirokkarista kirkonmieheksi Lappiin!

      Jyrki Linnankivi eli Jyrki 69 on The 69 Eyes -rockyhtyeen vokalisti. Lauluhommien lisäksi hän sanoittaa, säveltää ja sov
      Työ ja opiskelu
      6
      1480
    10. Onnea Maria ja Vilma Amazing Race -voitosta!

      Maria Guzenina ja Vilma Vähämaa voittivat Amazing Race Suomi -kisan. Voiton hetkellä Guzenina paljasti, miksi valitsi Vi
      Tv-sarjat
      16
      1404
    Aihe