Hirdetés
- gban: Ingyen kellene, de tegnapra
- Luck Dragon: Óraátállítás
- Luck Dragon: Asszociációs játék. :)
- Gurulunk, WAZE?!
- gerner1
- sziku69: Fűzzük össze a szavakat :)
- Bestx: Budget DIY eGPU USB4/Thunderbolt csatlakozással – egy mining VGA új élete.
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- sziku69: Szólánc.
- Luck Dragon: MárkaLánc
-
LOGOUT
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
bteebi
veterán
válasz
PETEE78
#29074
üzenetére
Mindig a filenév végén van a dátum, tehát itt például 1510160939, illetve ebből a 151016? A végén lévő dátum mindig négy karakter? Mert ha igen, akkor a megnyitás után írd bele a makróba azt, hogy
fnev = ActiveWorkbook.Name
If Mid(fnev, Len(fnev) - 14, 6) <> WorksheetFunction.Text(Date, "yymmdd") Then
ActiveWorkbook.Close savechanges:=False
End IfA 14 azt jelenti, hogy ennyi karakterrel a teljes filenév (pl. 221_ALMA_20151016_20151016_1510160939.csv) előtt indul a keresés, és 6 karakter hosszú (mert amit keresünk, az ugye ééhhnn formátumú).
#29075: Amúgy igen, nagyon nyakatekert lenne
. Ez se a legegyszerűbb, mert előbb megnyitja a file-t, némi eséllyel feleslegesen...
Új hozzászólás Aktív témák
- iPhone 12 Mini 128GB 100% (3 Hónap Garancia)
- Gigabyte RTX 5060 Ti 16GB // Felbontott, új // SZÁMLA // GARANCIA //
- ÁRGARANCIA!Épített KomPhone i5 14400F 16/32/64GB RAM RX 9060 XT 16GB GAMER PC termékbeszámítással
- AKCIÓ! AsRock H510M i5 11400 16GB DDR4 512GB SSD RTX 2070 Super 8GB ZALMAN S2 TG Adata 600W
- AKCIÓ! Gigabyte B760M i3 12100F 16GB DDR4 512GB SSD RTX 2060 Super 8GB ADATA XPG Valor Air 600W
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
. Ez se a legegyszerűbb, mert előbb megnyitja a file-t, némi eséllyel feleslegesen...
Fferi50