- iPhone topik
- Android alkalmazások - szoftver kibeszélő topik
- Profi EKG-s óra lett a Watch Fitből
- Honor 400 Pro - gép a képben
- Samsung Galaxy S21 és S21+ - húszra akartak lapot húzni
- Honor Magic7 Pro - kifinomult, költséges képalkotás
- Samsung Galaxy A54 - türelemjáték
- Milyen okostelefont vegyek?
- Telekom mobilszolgáltatások
- Apple iPhone 16 Pro - rutinvizsga
-
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
-
Fferi50
Topikgazda
válasz
genlog #45279 üzenetére
Szia!
Eseménykezelő makróval meg lehet oldani. Minta:
Az A-D oszlopban van a lista.
Az F-I oszlopban a kiválasztott konfiguráció (csak azért sárga az alap, hogy kitűnjön), az I6 cellában a konfiguráció ára.
Az eseménykezelő makró:Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim cl As Range, keres As Range
If Target.Column < 5 Then
Application.EnableEvents = False
Set keres = Cells(Target.Row, 1)
Set cl = Range("$F$2:$F$5").Find(what:=keres.Value, LookIn:=xlValues, lookat:=xlWhole)
cl.Offset(0, 1).Value = keres.Offset(0, 1).Value
Application.EnableEvents = True
End If
Cancel = True
End Sub
Ezt a munkalap kódlapjára kell bemásolni. (Lapfülön jobb egérgomb - kód megjelenítése).
A makró a G oszlopba teszi a kiválasztott márkát. A H és I oszlopban képleteke vannak.
H2 képlete:=HAHIBA(FKERES($G2;$B$1:$D$12;2;0);"")
I2 képlete:=HAHIBA(FKERES($G2;$B$1:$D$12;3;0);"")
I6 cella képlete:=SZUM(I2:I5)
A tartományokat természetesen mind a makróban, mind a képletben saját adataid szerint változtasd meg.
DuplaKattintással az 1-4 oszlop celláin lehet választani. Ha máshova kattintanak, az nem hatásos.
A kiválasztott konfiguráció elemeit a G oszlopban lehet törölni, csak ott, mert a többi oszlopban képlet van.
Remélem, valami ilyesmire gondoltál.
A munkafüzetet makróbarátként (xlsm) vagy binárisként (xlsb) kell mentened. Engedélyezni kell a makrókat is a biztonsági beállításoknál.
Üdv.
Új hozzászólás Aktív témák
- Melyik tápegységet vegyem?
- sziku69: Szólánc.
- Parkside szerszám kibeszélő
- Arena Breakout: Infinite
- Luck Dragon: Asszociációs játék. :)
- iPhone topik
- Veszprém és környéke adok-veszek-beszélgetek
- Magga: PLEX: multimédia az egész lakásban
- iPhone-t használók OFF topikja
- Milyen videókártyát?
- További aktív témák...
- BESZÁMÍTÁS! HP Elitebook 840 G11 üzleti notebook - Intel Core Ultra 5 135U 16GB DDR5 RAM 256GB W11
- Csere-Beszámítás! Asus Rog Strix G731GU Gamer Noti! I7 9750H / GTX 1660TI / 16GB D4 / 512 SSD
- Csere-Beszámítás! RTX Számítógép játékra! I5 13400F / 32GB DDR5 / RTX 4070 Super / 1TB SSD
- AKCIÓ! GIGABYTE AORUS MASTER RX 6800 XT 16GB videokártya garanciával hibátlan működéssel
- BESZÁMÍTÁS! ASUS B450 R7 2700X 16GB DDR4 512GB SSD RTX 2060 Super 8GB Zalman i3 FSP 600W
Állásajánlatok
Cég: PC Trade Systems Kft.
Város: Szeged
Cég: Promenade Publishing House Kft.
Város: Budapest