-
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
-
AvLav
csendes tag
válasz Gabcsika #4400 üzenetére
Helllo!
Az adatokat tartalmazó oszlop (legyen A) mellett lévő oszlopba (B-be), a következőt kell írni:
"=SZÖVEG.TALÁL("-";A1)" :ez megadja, hogy a kötőjel hanyadik karakter a szövegbenEzután a következő oszlopba (C-be), a következőt kell írni:
"=BAL(A1;B1-1)" :ez veszi az A oszlopban lévő szövegből balról kezdve a karaktereket a kötőjeligMindez persze megoldható makróval is, de sajnos nem fogalmaztad meg pontosan, hogy szükséged van-e az eredeti oszlopra vagy hogy hogyan nézzen ki a végén a tábla.
-
cellpeti
veterán
Sziasztok!
Hogy tudok legördülő menüt csinálni Excelben?
[ Szerkesztve ]
Tigris, tigris, csóvafény...
-
Delila_1
Topikgazda
válasz cellpeti #4404 üzenetére
Kétféle módon, az egyszerűbbet írom le.
Az ikonsoron (eszköztáron) jobb klikk, ott bejelölöd a Űrlapokat.
A megjelenő eszköztárból kiválasztod a kombi panelt, megrajzolod vele a legördülődet.
A jobb klikkre előjövő menüben a vezérlő formázására kattintasz. Bemeneti tartomány az, ahol a legördülőben mutatni kívánt adatok lesznek. Cellacsatolásnak azt a cellát add meg, ahova majd a kiválasztott elem listabeli sorszámát kapod meg. Ezt érdemes a kombi panel mögé tenni, hogy ne legyen zavaró a megjelenő sorszám.
Módosíthatod még a lenyíló sorok számát az alapértékként megadott 8 helyett, és bejelölheted a térhatású árnyékot.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
válasz Gabcsika #4409 üzenetére
Például ilyen:
Sub szétcincál()
sor = 1
Do While Cells(sor, 1) <> ""
Cells(sor, 1) = Left(Cells(sor, 1), InStr(Cells(sor, 1), "-") - 1)
sor = sor + 1
Loop
End Subde másképp is meg lehet írni.
Másik, nem makrós megoldás, hogy kijelölöd a sorokat, Adatok/Szövegből oszlopok. A varázsló második lapján a kötőjelet adod meg határoló jelnek.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
jpisti
senior tag
Helló mindenkinek!
Lenne egy problémám. Egy munkafüzetben az első munkalapon (leltár) vannak cikkszámok. (csak numerikus karakterek de szövegként formázva mert elég sok 0-val kezdődik.)
Egy másik munkafüzetben (árlista) ugyanezen gyártó árlistája (természetesen több ezer tétel.)
A feladat az lenne, hogy létezik-e olyan függvény amivel a leltár lapon szereplő cikkszámokat megkereshetem az árlista lapon és a cella eredménye az árlista találati sorának egyik cella értéke?
Próbáltam az FKERES függvényt de nem akar működni.A vok és a vagyok között pontosan egy "agy" a különbség!
-
jpisti
senior tag
válasz Delila_1 #4412 üzenetére
Nem értesz azthiszem. ez egy file. mondjuk abc.xls és tartalmaz két munkalapot: Inventory és List
Amit én szeretnék az az, hogy az Inventory lap A1 cellájában szereplő cikkszámot keresse meg a List lap A oszlopában és a találati sor B cellájának értéke legyen az Inventory lap B1 cellaértéke. Így tovább a többi sorban is (de gondolom ha a függvény végre működne akkor ezt egyszerűen "lehúzva" a többi cellában is jó lesz.)[ Szerkesztve ]
A vok és a vagyok között pontosan egy "agy" a különbség!
-
Delila_1
Topikgazda
Az előbb ezt írtad.
Egy másik munkafüzetben (árlista) ugyanezen gyártó árlistája (természetesen több ezer tétel.)Így még egyszerűbb a dolog.
Az Inventory lap B1 cellájába:=fkeres(a1;List!a:b;2;hamis)
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
Sokszor előfordul, hogy az egyik cikkszám végén van egy szóköz, ami nem látható.
Mindegyik lapon vegyél fel egy üres oszlopban egy TRIM függvényt, ami megszabadítja az adatokat a felesleges szóközöktől.
=trim(a1)
A képleted végighúzod, másolod, és irányítottan, értékként beilleszted az eredeti A oszlopba mindegyik lapodon.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
jpisti
senior tag
Mi lehet a gond? Az adatokat más xls-ekből másoltam... mindkét lapon a cikkszámokat tartalmazó oszlop (az A) szöveg formátumú...
A vok és a vagyok között pontosan egy "agy" a különbség!
-
bobace
őstag
Nagyon óvodás kérdés, de nem tudom a választ...
Szóval hogyan lehet megcsinálni, hogy felül maradjon egy sor, ahol a fejlécek neve látszik, és ha görgetem a listát, az nem tűnik el, hanem mindig ott marad?
Köszi.Nem az a szabadság, hogy azt teheted, amit akarsz, hanem, hogy nem kell megtenned, amit nem akarsz.
-
Delila_1
Topikgazda
Állja az A2 cellába, Ablak menü/ Ablaktábla rögzítése.
Ha a B2-re állva rögzíted az ablakot, akkor az A oszlop is a helyén marad jobbra görgetéskor. Több sort és oszlopot is rögzíthetsz így, a megfelelő helyre állva.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
mimi_bacsi
tag
OpenOffice számolótábla, ki tud segíteni, hogy ebben az exceles kerek.fel függvény hogy van? (és az excel többi függvénye ebben hogy van, hol lehetne ezt elolvasni?)
-
Delila_1
Topikgazda
válasz mimi_bacsi #4423 üzenetére
Próbáld meg a ROUNDUP-ot.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
válasz mimi_bacsi #4425 üzenetére
Eszerint ráhibáztam.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
-
Delila_1
Topikgazda
válasz mimi_bacsi #4427 üzenetére
E-mail-ben elküldöm.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
válasz mimi_bacsi #4430 üzenetére
Használd egészséggel!
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Gabcsika
tag
Megint én...
Azt hogyan lehet (Kimutatás opció nélkül!) megcsinálni, hogy Sheet2-n (pl. A oszlopban) van egy lista (egymás alatt számok, mind különböznek), de minden érték csak egyszer szerepel ott, viszont ezek a számok a Sheet1-en is szerepelnek az A oszlopban, de nem egyszer, ha sokszor és szintén a Sheet1-en B oszlopban mellé hozzá vannak rendelve adatok.
Azt szeretném elérni, számolja össze az Excel, hogy hányféle adat van a Sheet1 B oszlopában egy-egy A oszlopnak megfelelően, amely A oszlop a Sheet2-n van.
A bibi az, hogy adott értékhez egyszerre több érték is tartozik Sheet1-en...Pl.:
Itt a Sheet2-n a 10 jelenti azt, hogy a Sheet1-en tízféle (nem tíz darab!) szám tartozik ugyanahhoz az értékhez!
Na ezt hogy kell?Símán countif-el nem lehet célt érni.
Köszi!
Freedom, Nature, Love & Music
-
AvLav
csendes tag
válasz Gabcsika #4433 üzenetére
Szia!
Én valami hasonló makróval próbálkoznék, bár amit most itt mutatok még hagy egy kis kívánnivalót maga után:
Sub szamol()
Sheets("Munka2").Select
lastRow = Range("A65535").End(xlUp).Row
Sheets("Munka1").Select
lastRow2 = Range("A65535").End(xlUp).Row
Dim szamlalo
For i = 1 To lastRow
Sheets("Munka2").Select
x = Range("A" & i).Value
szamlalo = 0
For j = 1 To lastRow2
Sheets("Munka1").Select
y = Range("A" & j).Value
If (y = x) Then
szamlalo = szamlalo + 1
End If
Next j
Sheets("Munka2").Select
Range("B" & i).Value = szamlalo
Next i
End Sub!!! Ez a makró feltételezi, hogy a Sheet1-en minden A oszlopbeli elem mellett van a B oszlopban érték
[ Szerkesztve ]
-
Gabcsika
tag
Arra gondoltam, hogy nincs-e olyan függvény az Excelben amelyik megszámolja egy adott oszlopban, hogy hány darab különböző érték szerepel? Már az is nagy segítség lenne!
Freedom, Nature, Love & Music
-
AvLav
csendes tag
-
Delila_1
Topikgazda
válasz Gabcsika #4436 üzenetére
Meg lehet számoltatni az adatok "féleségét". A B oszlop adatait elnevezed tartománynak.
=SZORZATÖSSZEG((tartomány<>"")/DARABTELI(tartomány;tartomány))
avagy
=SUMPRODUCT((tartomány<>"")/COUNTIF(tartomány;tartomány))Ezzel az a baj, hogy azt mutatja meg, hány féle érték van a B oszlopban, függetlenül az A oszlop tartalmáról.
Miért nem jó a kimutatás? Már máskor is kapálóztál ellene.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
válasz Gabcsika #4436 üzenetére
Nagy nehezen megszületett.
Sub Egyezo()
Sheets("Sheet1").Select
'******* Rendezés ***************
Range("A2").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("B1") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
'************************************
sor_1 = 1: sor_2 = 1
Sheets("Sheet2").Select
Do
első = sor_1
A = Cells(sor_2, 1)
Sheets("Sheet1").Select
Do While Cells(sor_1, 1) <> ""
If Cells(sor_1, 1) = A Then
If Cells(sor_1 + 1, 1) > A Or Cells(sor_1 + 1, 1) = "" Then
ucsó = sor_1
Range("B" & első & ":B" & ucsó).Select
ActiveWorkbook.Names.Add Name:="tartomány", RefersTo:=Selection
Sheets("Sheet2").Select
Cells(sor_2, 2).Select
Selection.FormulaR1C1 = "=SUMPRODUCT((tartomány<>"""")/COUNTIF(tartomány,tartomány))"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Sheets("Sheet1").Select
ActiveWorkbook.Names("tartomány").Delete
sor_1 = sor_1 + 1
Exit Do
End If
End If
sor_1 = sor_1 + 1
Loop
sor_2 = sor_2 + 1
Sheets("Sheet2").Select
Loop While Cells(sor_2, 1) <> ""
Application.CutCopyMode = False
End SubA csillagokkal határolt rész a Sheet1-en való rendezés. Nálam nincs rovatfej. Ha ez nem jó, helyette rögzítsd makróban a kétkulcsos rendezést, első kulcs az A, második a B oszlop, emelkedő sorrendben.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
-
Gabcsika
tag
Utánanéztem egy macronak, ami beszínezi a cellát.
Sub colour()
With Cells(1, 17).Font.Color = vbRed
End With
End SubEz a Q1 cellát pirosra színené. De nem teszi. Miért?
Illetve azt hogy kell, hogy egy tartomány kivételével az egész sheet-et színezze be?
Mondjuk a békén hagyandó tartomány az A1-P27, a többi legyen piros.Köszi szépen!
Freedom, Nature, Love & Music
-
Delila_1
Topikgazda
válasz Gabcsika #4443 üzenetére
A font.color a karakter színét adja, az interior.color a kitöltését. A kitöltés nélkülit próbáltam a vbNone kifejezéssel megadni, de az fekete lett, ezért inkább a ColorIndexet írtam be, a -4142-t.
Sub colour()
Cells.Interior.Color = vbRed
Range(Cells(1, 1), Cells(27, 16)).Select
Selection.Interior.ColorIndex = -4142
Range("A1").Select
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Gabcsika
tag
válasz Delila_1 #4444 üzenetére
Köszi szépen!
Ez jó, de abban a tartományban (A1-P27) van már egy formázás, és azt szeretném, hogy ahhoz ne nyúljon a macro, az azon kívüli területeket viszont színezze be.Másik kérdés: meglehet-e oldani, hogy olyan lapvédelmet teszek fel, amivel bizonyos cellákba lehet beírni, a többibe nem. Sehova sem, csak az eredményt lehessen látni (a többi cellából jó pár be függvényezve).
Köszi szépen!
Freedom, Nature, Love & Music
-
Delila_1
Topikgazda
válasz Gabcsika #4445 üzenetére
Akkor két részletben add meg a színezést, az A28: P65536, és a Q1:IV65536 tartományra. 2007-es Excelnél nagyobb a tartomány.
Alapértelmezésben a cellák zárolva vannak, de ez a zárolás csak akkor lép érvénybe, mikor beállítod a lapvédelmet. A nem védendő cellák kijelölése után a cellaformázásnál a védelem fülön kiveszed a pipát a Zárolt elől. Ugyanitt a cella rejtését is beállíthatod, ha azt akarod, hogy a szerkesztőlécen ne jelenjen meg a képlet. Ez utóbbi is csak a lapvédelem beállítása után lép érvénybe.
A lapvédelmet az Eszközök/Védelem/Lapvédelemnél állíthatod be, és jelszót is adhatsz a feloldásához.[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Gabcsika
tag
...és őőő... legördülő menüt hogyan lehet készíteni? Ráklikk és mint amikor autoszűrő van, egy lista jön elő. Ha valamelyik elemet kiválasztom, akkor mondjuk a mellette levő cellában egy érték hozzárendelődik.
Ezt nehéz?Köszi!
Freedom, Nature, Love & Music
-
Delila_1
Topikgazda