Hirdetés
- Google Pixel 9 Pro XL - hét szűk esztendő
- Vivo X300 Pro – messzebbre lát, mint ameddig bírja
- Redmi Note 14 5G - jól sikerült az alapmodell
- Samsung Galaxy S25 - végre van kicsi!
- iPhone topik
- Samsung Galaxy A56 - megbízható középszerűség
- Xiaomi 15T Pro - a téma nincs lezárva
- One mobilszolgáltatások
- Pebble - az átgondolt okosóra
- Xiaomi 17 Ultra - jó az optikája
-
Mobilarena
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
-
Pakliman
tag
válasz
p5quser
#40480
üzenetére
Szia!
A legegyszerűbb megoldás (szerintem), ha a munkalapokat átnevezed:

Amint láthatod, egy munkalapnak 2 "Neve" van, VBA-ban mindkettő használható, de más módon:
1.: egy tulajdonképpeni "belső" azonosító, közvetlenül lehet hivatkozni rá:Munka3.Range("A1")
2.: ez látszik az Excelben a lapfülön, szövegként hivatkozhatunk rá:Worksheets("Munkaóra").Range("A1")
A 2. változatnál egy általános modulban deklarálni kell a szükséges "változókat"Public ws1 As Worksheet
Public ml3 As Worksheet
Public Össz As Worksheet, majd a Thisworkbook modulban értéket adni neki(k):
pl.:Private Sub Workbook_Open()
Set ws1 = Worksheets("Táblázat")
Set ml3 = Worksheets("Munkaóra")
Set Össz = Worksheets("Segéd")
End Sub
Új hozzászólás Aktív témák
- Luck Dragon: Asszociációs játék. :)
- Teljes verziós játékok letöltése ingyen
- Google Pixel 9 Pro XL - hét szűk esztendő
- Háztartási gépek
- Gyúrósok ide!
- Vivo X300 Pro – messzebbre lát, mint ameddig bírja
- Építő/felújító topik
- Soundbar, soundplate, hangprojektor
- Linux kezdőknek
- Óra topik
- További aktív témák...
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Game Pass Ultimate előfizetések 3 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- TOP Pure White PC /Ryzen 7 9850X3D, 32GB DDR5 RAM, 1TB M.2 PCIe SSD/ akciós áron eladó! BeszámítOK!
- Samsung Galaxy Z Fold6 12/256GB Silver Shadow használt, karcmentes 6 hónap garancia
- AKCIÓ! Gigabyte B650M R5 7600 16GB DDR5 512GB SSD RX 9070 XT 16GB NZXT H7 Flow fehér 750W
- iPhone 13 mini 128GB 100% (1év Garancia) - AKCIÓ
- AKCIÓ! ASUS B365M i5 9600KF 16GB DDR4 512GB SSD RX 5600XT 6GB Zalman S2 TG GAMDIAS 650W
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50
