-
Fototrend
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
PowerBuldog
#41279
üzenetére
Talán képletekkel is meg lehet oldani, de nekem egyszerűbbnek tűnik makróval.
Gondolom, az A1:C1 tartományon kívül a többi sorban is vannak adataid, ezért úgy írtam meg a modulba másolandó makrót, hogy menjen végig a sorokon, és a D oszlopba írja annak a cellának a szövegét, amelyikben először találja meg a "Póló" kifejezést. Ha pl. A5-ben és C5-ben is szerepel a szó, az A5 tartalma lesz a D5-ben.
Sub Hol_A_Polo()
Dim oszlop As Integer, sor As Long, usor As Long
usor = Range("A" & Rows.Count).End(xlUp).Row
For sor = 1 To usor
For oszlop = 1 To 3
If InStr(Cells(sor, oszlop), "Póló") > 0 Then
Cells(sor, 4) = Cells(sor, oszlop)
Exit For
End If
Next
Next
End Sub -
Fferi50
Topikgazda
válasz
PowerBuldog
#31287
üzenetére
Szia!
Attól függően, hogy az SKU oszlop hol szerepel a német munkalapon, használható
-az FKERES függvény, ha az első oszlop az SKU vagy az áthozandó adatok az SKU oszloptól hátrább vannak,
- az INDEX és HOL.VAN függvény páros, ebben az esetben az SKU oszloptól előrébb is lehet az adat.Üdv.
-
Nowitzki
csendes tag
válasz
PowerBuldog
#31169
üzenetére
Vagy ha a részleteket is ki akarod íratni akkor:
Sub pizza()
sor = 1
For pizza1 = 1 To 45
For pizza2 = 1 To 45
Cells(sor, "B") = "pizza" & pizza1 & "+" & "pizza" & pizza2 'pizzák sorszámai
Cells(sor, "C") = Cells(pizza1, "A") & "+" & Cells(pizza2, "A") ' pizzák árai
Cells(sor, "D") = Cells(pizza1, "A") + Cells(pizza2, "A") 'pizzák összege
Cells(sor, "E") = "=" & Cells(pizza1, "A").Address & "+" & Cells(pizza2, "A").Address 'pizzák összege képlettel
sor = sor + 1
Next pizza2
Next pizza1
End Sub -
Nowitzki
csendes tag
válasz
PowerBuldog
#31167
üzenetére
Ha az "A" oszlopban vannak egymás alatt felsorolva a pizzák árai, akkor működik. Ezért kérdeztem, hogy hol vannak neked megadva az egyes pizzák árai.
-
Nowitzki
csendes tag
válasz
PowerBuldog
#31165
üzenetére
Hol vannak megadva a pizzák árai?
Tegyük fel az "A" oszlopban vannak egymás alatt felsorolva az egyes pizzák árai. Akkor mondjuk ez működhet:Sub pizza()
sor = 1
For pizza1 = 1 To 45
For pizza2 = 1 To 45
Cells(sor, "B") = "pizza" & pizza1 & "+" & "pizza" & pizza2
Cells(sor, "C") = Cells(pizza1, "A") + Cells(pizza2, "A")
sor = sor + 1
Next pizza2
Next pizza1
End Sub -
Delila_1
veterán
válasz
PowerBuldog
#10276
üzenetére
Az adataidat kijelölve – vagy csak valahol benne állva – a Beszúrás, Kimutatás menüvel hozhatod létre.
Elküldöm, amit csináltam. -
Delila_1
veterán
válasz
PowerBuldog
#10271
üzenetére
A kimutatást a legördülőiben szűrheted a szobákra, és a helységre is, a diagram a szűrésnek megfelelően alakul.
-
Delila_1
veterán
válasz
PowerBuldog
#10273
üzenetére
Nosza! Bár arról volt szó, hogy én küldök egy fájlt.

-
Delila_1
veterán
válasz
PowerBuldog
#10271
üzenetére
Jó az itt megadott e-mail címed? Küldenék egy fájlt, ami különböző dinamikus diagramokat tartalmaz.
-
Delila_1
veterán
válasz
PowerBuldog
#10269
üzenetére
Jobb oldalon az Értékeknél ráklikkelsz a Összeg/Szobára, a feljövő gyorsmenüben az Értékmező-beállításokat választod, ott adhatod meg, hogy darabszámot jelenítsen meg.
A diagram kinézetét egyszerűen módosíthatod. Kimutatásdiagram-eszközök, Tervezés, Diagramelrendezések. Igaz, hogy olyan aprók az ábrák, hogy nem sok látszik belőlük, de rájuk klikkelve azonnal felveszi a formát a diagram.
-
Delila_1
veterán
válasz
PowerBuldog
#10267
üzenetére
-
PowerBuldog
veterán
válasz
PowerBuldog
#10252
üzenetére
Delila_1
Ezzel kapcsolatban lenne még egy olyan kérdésem, hogy olyan diagramot szeretnék csinálni, amin 1 oszlopon látszik pest és buda. Mindez a szobák számára lebontva. Vagyis, Lenne egy oszlop, amin az 1 szobás lakások látszanak, és mindemellett ez az oszlop 2 színből állna, buda és pest-re bontva.
Ilyet lehet valahogy csinálni? -
Delila_1
veterán
válasz
PowerBuldog
#10252
üzenetére
A feladat2.xlsx Adatbázis lapján az I4 képletét így adnám meg: =SOKSZOR("|";KEREKÍTÉS(F4/G4;0))
és a feltételes formázásnál is valamelyik feltételhez bevinnék egy = jelet, mert a 4 mFt-os négyzetméterenkénti ár így nem szerepel.
=J4<=4Ha az I oszlopot Wingdins karakterre állítod, csinos kis korongok jelzik majd a milliók számát.
A feltételes formázásnál nézd meg az Adatsávokat, Színskálákat, Ikonkészleteket is.
-
Delila_1
veterán
válasz
PowerBuldog
#10252
üzenetére
Új hozzászólás Aktív témák
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Fallout 4 Pip-Boy Edition eladó
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- iKing.hu Apple iPhone 15 Pro Max 256GB használt Black Titanium 91% akku 6 hónap garancia
- Dell D6000 univerzális dokkoló USB-C/ USB-A, DisplayLink & Dell WD15 (K17A) USB-C + 130-180W töltő
- Kihagyhatatlan áron DELL XPS 13 9310 /i5-1135G7/8 GB Ram/512 GB SSD/FHD+ IPS
- í kilenc! AKCIÓS PRECÍZIÓS KÉSZÜLÉK! 7560 i9-11950H 32GB RAM 1TB SSD Nvidia RTX A3000 6GB 1 év gar
- Asus TUF B650-Plus Wifi alaplap
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest


Fferi50