Hirdetés
- sziku69: Fűzzük össze a szavakat :)
- CaNNa3IS: Kis előkarácsonyi muzsika csak nektek
- gban: Ingyen kellene, de tegnapra
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- GoodSpeed: Ennél jobb Windows 7 Aero Skin nem igen van Windows 11-re (WindowBlinds 11)
- GoodSpeed: Márkaváltás sok-sok év után
- Luck Dragon: Asszociációs játék. :)
- bambano: Bambanő háza tája
- Ndruu: Segíts kereshetővé tenni a PH-s arcképeket!
- Brogyi: CTEK akkumulátor töltő és másolatai
-
LOGOUT
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
- ASRock lapok általában
- sziku69: Fűzzük össze a szavakat :)
- Eredeti játékok OFF topik
- Androidos tablet topic
- Autós topik
- Milyen okostelefont vegyek? OFF topik
- Autós topik látogatók beszélgetős, offolós topikja
- Rémisztő árakkal szembesülnek a notebookgyártók az új mobil platformoknál
- Linux kezdőknek
- Kínai és egyéb olcsó órák topikja
- További aktív témák...
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Keresem a Barkács Balázs Játékokat
- Bomba ár! Lenovo ThinkPad T14s G2 - i7-11GEN I 16GB I 1TSSD I 14" FHD Touch I W11 I Cam I Gari!
- KARÁCSONYI AKCIÓK / MICROSOFT WINDOWS 10,11 / OFFICE 16,19,21,24 / VÍRUS,VPN VÉDELEM / SZÁMLA / 0-24
- DJI Osmo Pocket 3
- Apple iPhone 13 128GB, Kártyafüggetlen, 1 Év Garanciával
- BESZÁMÍTÁS! ASUS H510M i5 10500 16GB DDR4 512GB SSD RX 6600 8GB Zalman T4 Plus ADATA 600W
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: ATW Internet Kft.
Város: Budapest
Fferi50
