Hirdetés
-
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
-
Delila_1
veterán
válasz
Mythunderboy
#11558
üzenetére
A hivatkozási értéken mit értesz? Függvényt?
Most az A oszlopba képleteket vittem be (amik a D oszlop azonos sorában lévő értéket szorozzák 2-vel). A B oszlopba különböző számokat tettem. A
Sub EgyeniErtekek()
Columns("A:B").AdvancedFilter Action:=xlFilterCopy, _
CopyToRange:=Sheets("Munka2").Range("A1:B1"), Unique:=True
End Submakró rendben átviszi a Munka2 lapra a két oszlopból azokat a sorokat, ahol az A érték a B-vel együtt egyszer fordul elő. Pl. ha az A oszlopban 2× szerepel 6, a B oszlop hozzájuk tartozó értéke különböző, akkor a Munka2 lapon is 2× lesz ott a 6-os, a különböző B értékkel. Ha viszont mind a két 6-oshoz azonos B tartozik, a másik lapon csak 1× jeleníti meg.
Az oszlopok első sora cím legyen, lehet hogy ennek hiánya miatt duplázta az első sort.
Új hozzászólás Aktív témák
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- PC Szervizeket, Gépépítőket keresek B2B szoftver partnerségre (E-számlával)
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Lenovo Thinkpad E595 Ryzen 5 3500U, Radeon Vega 8, 8-16GB RAM, SSD, jó akku, számla, gar
- Csere-Beszámítás! Asus Tuf FX506I Gamer Notebook! R7 4800H / 1650Ti / 16GB DDR4 / 512GB SSD
- HIBÁTLAN iPhone 15 128GB Yellow-1 ÉV GARANCIA - Kártyafüggetlen, MS4489, 100% Akksi
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9700X 32/64GB RAM RX 9070 16GB GAMER PC termékbeszámítással
- Csere-Beszámítás! Playstation 5 Lemezes kiadás!
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50
