Hirdetés
- gban: Ingyen kellene, de tegnapra
- MasterDeeJay: Egy nem átlagos Asus videókártya (GTX950M 2GB GDDR3)
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- gerner1
- Luck Dragon: Asszociációs játék. :)
- sziku69: Szólánc.
- talmida: My Art II.
- Andras-G: #Kószagondolat - eMag tapasztalatok 2026-ban
- bambano: Bambanő háza tája
-
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
-
kokopeti
csendes tag
válasz
Delila_1
#13251
üzenetére
Delila egyszerűen nem bírom megcsinálni...
Private Sub Workbook_Open()
Do
felh_nev = InputBox("Üdvözöllek a BMP CAR Kft. vállalatirányítási rendszerében! A továbblépéshez kérlek írd be a rendszergazdától kapott felhasználónevet!", "Bejelentkezés")
Loop Until felh_nev = "bmpcarkft"
Sheets("Adatok").Select
UserForm1.Show False
MultiPage1.Value = 0
End SubAmikor indítom addig lefut a programom, hogy bejön a bejelentkező oldal, beírom azt a "felhasználónevet" amit előre megadtam. Aztán ezután a program dolga az lenne, hogy nyissa meg nekem az elkészített Userform multipage oldalai közül a legelsőt ami a "Főoldal" nevet viseli. Csak ezzel a MultiPage1.Value = 0 sorral van problémája, de ez már a 10. verzió amit beírtam és halvány fogalmam sincs, hogy hogyan hivatkozhatnék rá, mivel a Főoldalról gombok segítségével is szeretnék hivatkozni a Multipage oldalaihoz külön-külön.
Még dolgozok rajta, de ez megint egy olyan probléma ami egy teljesen egyszerű kis parancs lehet, viszont nem jövök rá, hogy mi az a parancssor amivel hivatkozhatok rá. Amennyiben még nem akasztottalak ki titeket a tudatlanságommal, akkor ismét megköszönném a segítséget.
Új hozzászólás Aktív témák
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- PlayStation 5 FAT Lemezes + kontroller 6 hó garancia, számlával!
- Telefon felváráslás!! Samsung Galaxy S22/Samsung Galaxy S22+/Samsung Galaxy S22 Ultra
- Lenovo ThinkPad T15 Gen 2 i5-1135G7 16GB Ram 256 GB SSD FHD IPS Garancia
- REFURBISHED és ÚJ - Lenovo ThinkPad 40AY Universal USB-C Dock
- 1000 W HP DPS-800GB-A szerver tápegység
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50