Hirdetés
- Százmilliárd dolláros AI-fegyverkezésbe kezdett az Amazon és a Google
- Így tüzelt el százbillió forintot az AI a héten
- Kétféle módon harcol a forró helyzetekkel szemben az ASUS új, M.2-es SSD háza
- Mérföldkő a szilárdtest akkuknál: fontos lépést tett a QuantumScape
- Degeneratív kapcsolóval készül a Firefox
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Gamer táblával tér vissza a Black Shark a globális versenybe
- OLED monitor topic
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Intel Core i7 9xx "Bloomfield" (LGA 1366)
- Milyen CPU léghűtést vegyek?
- Fejhallgató erősítő és DAC topik
- Milyen alaplapot vegyek?
- Milyen billentyűzetet 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
-
Pakliman
tag
válasz
Zola007
#43075
üzenetére
Szia!
Először is kell egy másolat az "eredeti" kiválasztható értékekről. Célszerű az eredeti lista mellett létrehozni. Ezt el is rejtheted.
A listaelem átírásakor az alábbiakat kell tenni a makróban (Worksheet_Change):
- Letiltod az eseménykezelőt: Application.Enabelevents=False
- a Target objektum tartalmazza az átírt elem sorának számát (Target.Row), ez lesz majd használva
- megkeresed az EREDETI szöveget a "másolatban" ( Cells(Target.Row, a_másolat_oszlopa) )
- sorra veszed a munkafüzet munkalapjait (For Each ws In Worksheets), ha kell szűrést is berakhatsz, vigyázz,
hogy az aktuális (a listát tartalmazó) munkalapot teljesen külön kezeld!
- a munkalapon megkeresed az EREDETI szöveget és átírod az újra.
- végül a listát tartalmazó munkalapon az EREDETI szöveget is átírod
- Engedélyezed az eseménykezelőt: Application.Enabelevents=True
Új hozzászólás Aktív témák
- Antivírus szoftverek, VPN
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- 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.
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Dell Precision 3571 4G LTE i7-12700H 32GB 1000GB FHD RTX A1000 4GB 1 év teljeskörű garancia
- Xbox One S 512 GB + kontroller 6 hó garancia, számlával!
- Xiaomi Redmi Note 12S 256GB, Kártyafüggetlen, 1 Év Garanciával
- ÁRGARANCIA!Épített KomPhone i5 14600KF 16/32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- Apple iPhone 15 Pro 256GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50

