Hirdeté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
-
Delila_1
veterán
válasz
LED333
#38875
üzenetére
Az elsőre a válasz, hogy a laphoz kell rendelned egy makrót. Ennek a módját megtalálod a Téma összefoglalóban.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 And Target > "" Then
Sheets(2).Select
ActiveSheet.Shapes(Target).Select
End If
End SubNálam a terméknevek az A oszlopban vannak. A második lapon lévő képek nevei megegyeznek az első lap termékneveivel.
Ha a neveket tartalmazó lapon nem az A oszlopban vannak a nevek, akkor az If Target.Column = 1 -nél írd át az 1-et annyira, ahányadik oszlopra kattintást kell figyelnie a makrónak.
Ha a képek nem a 2. lapon vannak, akkor a Sheets(2).Select sorban kell átírnod a 2-t.A füzetet makróbarátként (xlsm) kell mentened.
Most nem ugrik be a második kérdésedre a válasz, de majdcsak jön valaki, aki kapásból tudja.

Új hozzászólás Aktív témák
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Keresem a Barkács Balázs Játékokat
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- 10 Darab ÚJ PC Játékszoftver
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 32/64GB RAM RTX 5070Ti 16GB GAMER PC termékbeszámítással
- M5! KÉSZLETKISÖPRÉSI ULTRAAKCIÓ!!! TÜZES EZÜST MacBook Pro 14" M5!!! 10C/10G 16GB 512GB Gar!
- Bomba ár! Dell Vostro 5490 - i5-10GEN I 16GB I 256SSD I 14" FHD I HDMI I Cam I W11 I Gari!
- Dell Latitude Core i5 - i7 - 6-7-8-10-11-12-13. gen. üzleti kategóriás notebookok számlával - 12.18
- GYÖNYÖRŰ iPhone 13 mini 128GB Midnight -1 ÉV GARANCIA - Kártyafüggetlen, MS4077
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest

Fferi50

