Hirdetés
- Projektor topic
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Milyen egeret válasszak?
- Kormányok / autós szimulátorok topikja
- Lenovo Thinkbook, Yoga széria
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- Gaming notebook topik
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Lítium-ion/Li-ion akkumulátorok
- 3D nyomtatás
-
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
-
firemanus82
senior tag
válasz
slashing
#24550
üzenetére
Annyiban segíts még nekem légyszi, hogy hogyan tudom ezt két külön munkalapon megvalósítani? A "Beosztas" nevűben vannak a nevek, a "Munka2" nevűben a Diagram területek. Próbáltam megcímezni a kódot, de valami még hiányzik... Hibát ír ki, hogy Object required. 424. Nem talál objektumot. Ha egy lapon van minden, akkor megy (tehát nem fájlnév probléma)
Private Sub Worksheet_Change(ByVal Target As Range)
If beosztas.Target.Row = 3 And beosztas.Target.Column = 2 Then
Munka2.ChartObjects("Diagram 1").Select
ActiveChart.ChartArea.Format.Fill.UserPicture ("c:\" & Target & ".jpg")
Target.Select
End If
End Sub
Új hozzászólás Aktív témák
- Nintendo Switch 2
- PlayStation 5
- Trollok komolyan
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- E-roller topik
- Fogyjunk le!
- Windows 11
- Minden út Palindrómába vezet: leépítésekkel tér vissza a Realme a gyökereihez
- Linux Mint
- További aktív témák...
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- PC Game Pass előfizetés
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- REFURBISHED - DELL Thunderbolt Dock WD19TB (210-ARJD), WD19TBS (210-AZBV)
- Telefon felvásárlás!! Xiaomi Redmi Note 13, Xiaomi Redmi Note 13 Pro, Xiaomi Redmi Note 13 Pro+
- KÜLÖNLEGES RITKASÁG! VADIÚJ Microsoft Surface Pro 12 12" Snapdragon X Plus 16GB 512GB LEVENDULA 686g
- Telefon felvásárlás!! Apple Watch Series 6/Apple Watch Series 7/Apple Watch Series 8
- HIBÁTLAN iPhone 14 Pro Max 128GB Purple -1 ÉV GARANCIA - Kártyafüggetlen, MS3918
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50

