Hirdetés
- One mobilszolgáltatások
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Xiaomi 15T Pro - a téma nincs lezárva
- „Új mérce az Android világában” – Kezünkben a Vivo X300 és X300 Pro
- iPhone topik
- Poco F7 – bajnokesélyes
- Google Pixel topik
- Xiaomi Mi 9T Pro - tizenegyes!
- Mi nincs, grafén akku van: itt a Xiaomi 11T és 11T Pro
- Apple iPhone 15 Pro Max - Attack on Titan
-
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
botond187
#22788
üzenetére
Egyszerűbben, és kicsit gyorsabban is meg lehet csinálni.
Kell egy segédtábla (nálam a K:M tartomány), ahol a K oszlop tartalmazza azt a szöveges formában tárolt adatot, amihez rendeljük a többit, az L és M szintén szövegesen a csatolandó min és max értékeket.Nem írtad, az Excelnek melyik verzióját használod, ezért 2003-ban írtam, azt a magasabb verziójú Excelek elfogadják, csak makróbarátként kell menteni.
A füzetet feltettem ide.
Módosítandó sorok, ha a segédtáblát máshova teszed:
1.Set sorS = Columns(11).Find(ehhez, LookIn:=xlValues)
A Columns(11) most a K oszlopra mutat, mert a K a 11. oszlop.
2.
If Mid(Cells(sorK, "A"), 3) >= Cells(sorS, "L") And _
Mid(Cells(sorK, "A"), 3) <= Cells(sorS, "M") ThenEzeknél az "L" és "M" helyett írd a saját oszlopaid betűjelét
Új hozzászólás Aktív témák
- Bomba ár! HP EliteBook 850 G1 - i5-4GEN I 8GB I 256GB SSD I 15,6" FHD I Cam I W10 I Gari!
- Azonnali készpénzes AMD Radeon RX 6000 sorozat videokártya felvásárlás személyesen/csomagküldéssel
- iKing.Hu - Google Pixel 10 Tensor G5, 120 Hz OLED, tripla kamera-128 GB Használt, karcmentes Gari
- Egyedi ékszerdobozka
- Eladó Oppo A78 5G 4/128GB / 12 hó jótállás
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50

