Hirdetés
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Képernyős trükkök növelik a notebookok üzemidejét
- Hogy mi van? A TikTok lett az Xbox ellenfele?
- Minőségi ugrást hozhat a One új médiaboxa?
- SSD kibeszélő
- Bambu Lab 3D nyomtatók
- Soundbar, soundplate, hangprojektor
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- 3D nyomtatás
- Milyen notebookot vegyek?
-
PROHARDVER!
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
-
Fferi50
Topikgazda
Szia!
"a gépen dupla katt-al megnyitom az excel filet és amikor felugrik a password ablak, akkor VBA ismerje fel, hogy most egy "olyan" file-t nyitottam meg "
Én úgy gondolom, ez nem fog így menni. A fájlt makróból lehet jelszóval megnyitni, de ahhoz ismerni kell a fájl nevét:
Workbooks.Open Filename:=fájlnév,Password:=jelszó
A fájlnévnek az aktulális könyvtár esetén elegendő a név.kiterjesztés, másik könyvtár esetén a teljes elérési út szöveg formában (idézőjelek között). A jelszó szintén idézőjelek között, mert az is szöveg (akkor is ha szám!).
Tehát a makróból való megnyitáshoz ismerni kell a fájl nevét.
Ezt a DIR() parancs tudja szolgáltatni:
fájlnév=DIR("*.xls*") az első xls-el kezdődő kiterjesztésű fájl nevét adja vissza.
Ebben az Instr függvénnyel megnézheted, hogy szerepel-e a kívánt szövegrészlet.
A következő fájlnevet pedig a paraméter nélkül kiadott parancs adja vissza:
fájlnév=DIR()
Addig az első feltétel szerint keres, amíg meg nem változtatod a keresés feltételét.
Ha nem talál olyan fájlt, ami a keresési feltételnek megfelel, akkor üres lesz a fájlnév változó. [Itt találsz a DIR parancshoz helpet]
Üdv.
Új hozzászólás Aktív témák
- Hitelkártyák használata, hitelkártya visszatérítés
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Napelem
- Képernyős trükkök növelik a notebookok üzemidejét
- Hálózati / IP kamera
- Hogy mi van? A TikTok lett az Xbox ellenfele?
- Arc Raiders
- Minőségi ugrást hozhat a One új médiaboxa?
- SSD kibeszélő
- Eredeti játékok OFF topik
- További aktív témák...
- MacBook felváráslás!! MacBook, MacBook Air, MacBook Pro
- Samsung Bluetooth Mouse Slim egér
- HIBÁTLAN iPhone 13 mini 128GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3139, 100% Akkumulátor
- HIBÁTLAN iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3733, 91% Akkumulátor
- Apple iPhone 13 Pro max 512GB,Újszerű,Dobozával,12 hónap garanciával
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Promenade Publishing House Kft.
Város: Budapest
Fferi50

