- Fórumok
- OS, alkalmazások
- Microsoft Excel topic
- (kiemelt téma)
-
23200 - 23101
54978 - 54001 54000 - 52001 52000 - 50001 50000 - 48001 48000 - 46001 46000 - 44001 44000 - 42001 42000 - 40001 40000 - 38001 38000 - 36001 36000 - 34001 34000 - 32001 32000 - 30001 30000 - 28001 28000 - 26001 26000 - 25901 25900 - 25801 25800 - 25701 25700 - 25601 25600 - 25501 25500 - 25401 25400 - 25301 25300 - 25201 25200 - 25101 25100 - 25001 25000 - 24901 24900 - 24801 24800 - 24701 24700 - 24601 24600 - 24501 24500 - 24401 24400 - 24301 24300 - 24201 24200 - 24101 24100 - 24001 24000 - 23901 23900 - 23801 23800 - 23701 23700 - 23601 23600 - 23501 23500 - 23401 23400 - 23301 23300 - 23201 23200 - 23101 23100 - 23001 23000 - 22901 22900 - 22801 22800 - 22701 22700 - 22601 22600 - 22501 22500 - 22401 22400 - 22301 22300 - 22201 22200 - 22101 22100 - 22001 22000 - 20001 20000 - 18001 18000 - 16001 16000 - 14001 14000 - 12001 12000 - 10001 10000 - 8001 8000 - 6001 6000 - 4001 4000 - 2001 2000 - 1
-
Fórumok
LOGOUT - lépj ki, lépj be!
LOGOUT reakciók Monologoszféra FototrendGAMEPOD - játék fórumok
PC játékok Konzol játékok MobiljátékokMobilarena - mobil fórumok
Okostelefonok Mobiltelefonok Okosórák Autó+mobil Üzlet és Szolgáltatások Mobilalkalmazások Tartozékok, egyebek Mobilarena blogokPROHARDVER! - hardver fórumok
Notebookok TV & Audió Digitális fényképezés Alaplapok, chipsetek, memóriák Processzorok, tuning Hűtés, házak, tápok, modding Videokártyák Monitorok Adattárolás Multimédia, életmód, 3D nyomtatás Tabletek, E-bookok Nyomtatók, szkennerek PC, mini PC, barebone, szerver Beviteli eszközök Egyéb hardverek PROHARDVER! BlogokIT café - infotech fórumok
Infotech Hálózat, szolgáltatók OS, alkalmazások SzoftverfejlesztésFÁRADT GŐZ - közösségi tér szinte bármiről
Tudomány, oktatás Sport, életmód, utazás, egészség Kultúra, művészet, média Gazdaság, jog Technika, hobbi, otthon Társadalom, közélet Egyéb Lokál PROHARDVER! interaktív
-
Frissítve: 2023-11-13 08:31 Téma összefoglaló
Új hozzászólás Aktív témák
-
Delila_1
veterán
Az volt a feladat, hogy 6 eredmény legyen a B oszlopban, lehetőleg a 6 kigyűjtésből 1-1. Ha valamelyik kigyűjtés nem ad eredményt, akkor ahelyett egy másikból írjon be eredményt.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül. -
Titkárnő
csendes tag
-
Titkárnő
csendes tag
-
Vasinger!
nagyúr
-
lappy
őstag
-
RAiN91
őstag
Sziasztok
Ha egy office doksiből kitöröltek pár sort, és utána feltöltötték netre, én onnan letöltöm, nem lehet valahogy visszahozni amit kitöröltek belőle? -
Fferi50
Topikgazda
Szia!
Bocsánat, hogy belekotyogok, de ha rész szövegre keresünk, akkor a Range.Find utasításban nem elég a lookat paraméter elhagyása.
A Find ugyanis megőrzi a korábbi beállításokat (gyakorlatilag a Ctrl+F nek a VBA megfelelője, olyannyira, hogy az ottani beállítások is "átjönnek" a makróba és viszont), tehát ajánlott beírni a lookat:=xlpart paramétert is hozzá - mivel ki tudja, hogy mit kerestek korábban.
Vagy ugyanazt eredményezi, ha marad a lookat:=xlwhole, de a keresendő betúk elé és mögé egy-egy csillagot teszünk. (Pl.: *lil* xlwhole beállításnál megtalálja a delila szót is - sőt, ebben az esetben nem is jó az xlPart beállítás!!!)De ha már makróról beszélünk, akkor inkább a Range.Replace utasítás jöhet szóba a fenti megkötésekkel, vagy a replace függvény.
Üdv.
-
slashing
senior tag
-
slashing
senior tag
-
botond187
csendes tag
Szia,
Valami nem stimmel, nálad lefutott, és kihozott az egész B oszlopba eredményt? (ameddig az A oszlopban van cikkszám)
Nekem csak a B-oszlop első 6 sorába hoz ki valamilyen eredményt. Ez is furcsa, hogy a B6-ba jön ki úgy az eredmény ahogy kellene, a B5-be amibe ugyanúgy 6 cikkszámot kéne kihozznia, csak 3-at ad ki. -
Delila_1
veterán
-
Delila_1
veterán
-
slashing
senior tag
-
Delila_1
veterán
-
Vasinger!
nagyúr
Olyan problémában kérném segítségegetek, amelyre nem találtam máshol választ:
Van egy excel táblázatom, abban egy oszlopban vannak szövegek/stringek/. (számok és betűk sorozata) Annyi lenne a probléma, hogy elromlott a karakterkódolása annak az adott oszlopnak, így tele van ilyen és ehhez hasonló karakterekkel: ö, Ă©, Ă stb. Ezeket kéne lecserélni az eredeti ékezetes betűkre.
Pl.: ö ö-re, Ă© é-re úgy, hogy a többi karakter érintetlen maradjon.Ezt egy visual basic scripttel könnyen meg tudnám csinálni, ha az egész cellát le kéne cserélni, de itt a cellákon belül kéne dolgoznom, ez az ami megnehezíti a feladatom. Van erre valami jó módszer?
Előre is köszönöm a segítséget!
-
Titkárnő
csendes tag
köszönöm, nagyon kedves vagy, hogy több variációval is dolgoztál!
A második megoldás nekem sokkal jobban tetszik, mert egyszerűbbnek tűnik, viszont mivel egy oszlop egy hónap és 12 van belőle, nem tudom megoldani, hogy 24 oszlop legyen, átláthatatlan lenne.
A makróval még barátkoznom kell... sosem csináltam még...

Kipróbálom és visszajelzek!Köszi még egyszer!

-
botond187
csendes tag
Lefuttatom a makrókat 1-6-ig (8-ig van megcsinálva, de elég a 6.-ig), mindet egyesével, mert ha csak a modul 3-at futtatom le, akkor a 3. oszlopba futtatja le.
modulkieg1-et ha lefuttatom csak az AH oszlopba dobja ki az eredményeket
kieg2-nél az AI oszlopba dobja ki
modulkieg3-nál csak az AJ oszlopba hozza ki az eredményeket
és így tovább.
Ezzel így nincs is gond, 6-szor lefuttatom, bár ha le lehetne egybe futtatni az se lenne baj, így legalább külön-külön is tudom futtatni.
Azt szeretném, hogy az AH-AI-AJ-AK-AL-AM oszlopból szedjen össze 6-ot, és mondjuk a B oszlopba tegye ki mint végeredmény.
Úgy gyűjtse össze, hogy ha az AH-AI-AJ-AK-AL-AM oszlopban mindegyikben van eredmény, akkor mindegyikből 1-1-et szedjen ki.
Ha nincs mindegyikbe oszlopban eredmény, akkor a többiből gyűjtse össze a 6-ot.
Elsődleges az lenne, hogy mindegyikből összejöjjön legalább 1. -
Delila_1
veterán
Nem akarom átböngészni a makrókat, amit valamikor én írtam közülük, már rég elfelejtettem.
Lefuttatod a 6 makrót, ami a Module3 lapon van?
Hol jelennek meg a kiválasztott értékek, amik közül 6-ot ki kell választani?Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül. -
botond187
csendes tag
-
botond187
csendes tag
-
Delila_1
veterán
-
Teejay83
tag
köszi.működik csak szerintem az volt a baj,hogy nem adtam be tartományi jelszót először
DPS Hungary- szoftverrobot fejlesztés-online marketing-rendszerek bővítése,korszerűsítése-digitalizáció-IT biztonsági tanácsadás-Laptop-Projektor BÉRLÉS | www.onlineasszisztens.com | www.dpshungary.eu | -
Delila_1
veterán
-
botond187
csendes tag
-
Delila_1
veterán
-
botond187
csendes tag
Szuper, működik.
Olyan segítség kellene még, hogy csináltál egy cikkszám kiolvasós makrót nekem, amiben pár hozzászólással feljebb Fferi50 segített egy-két dologban már. (A füzetet ferakom IDE)
Ezt 6-oszlopba lefutattam külön-külön, más értékekkel beállítva, mert 6 különböző értékeket kellett kiolvasnia.
Ezzel kapcsolatba lenne olyan kérdésem, hogy miután kihozta az eredményeket 6 oszlopba, oszloponként van hogy 1-2, van hogy 0 találat van, van hogy 6 találatot is kidob.
Ebből szeretném azt kihozni, hogy egy másik oszlopba gyúrjon össze 6 találatot úgy, hogy mind a 6 oszlopból kerüljön bele legalább 1. Ha nincs mind a 6 oszlopba találat, akkor a többiből szedjen össze 6-ot.Ez megoldható?
Köszönöm a választ előre is
-
Delila_1
veterán
Kipróbáltam, nem hibázik.
Kijelölöd a tartományt, Korrektúra | Változások | Tartományok szerkesztésének engedélyezése.
Megadás, itt módosíthatod a neve (címet), a hivatkozásba bekerül a tartomány címe. Megadod a jelszót, OK.Jöhet a következő tartomány engedélyezése, mint fent, végül a Lapvédelem.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül. -
Teejay83
tag
Sziasztok
segítsetek légyszi

szeretnék egy excel táblát office 2010-ben,amely teljesen védett,de bizonyos oszlopokat a cégen belüli több felhasználó is módosíthatna, a problémám az,hogy ha zárolom a lapot és hozzáadok pl. egy felhasználót az AD-ből egy bizonyos tartományhoz módosítási engedéllyel már nem csak ő hanem én is tudom szerkeszteni, ez miért van?
DPS Hungary- szoftverrobot fejlesztés-online marketing-rendszerek bővítése,korszerűsítése-digitalizáció-IT biztonsági tanácsadás-Laptop-Projektor BÉRLÉS | www.onlineasszisztens.com | www.dpshungary.eu | -
Delila_1
veterán
-
botond187
csendes tag
Sziasztok,
Arra keresek képletet, hogy a cellákban lenne egy random szám, és azt a számot kerekítse fel úgy, hogy az utolsó 2 számjegye 90-ra végződjön. A kerekítés képlet valamiért nem működött.
Köszönöm a segítséget előre is
-
Delila_1
veterán
-
maestro87
őstag
-
Delila_1
veterán
-
maestro87
őstag
Erre valaki?
Lehetőleg makró nélkül mert olyat még nem csináltam.
A kiemelést formázással gondoltam (pl. más színnel).
A cellaformázásnál a formátum egyébként számra van állítva, így nem értem, hogy miért keres úgy mintha karaktereket keresnék. -
botond187
csendes tag
-
slashing
senior tag
csak makróval fog működni és nem lesz automatikusan, a szerkesztőlécen le kell okézni mindig a képletet hogy frissüljön...
ezt találtam a neten:
Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean)
Dim rCell As Range
Dim lCol As Long
Dim vResult
''''''''''''''''''''''''''''''''''''''
'Written by Ozgrid Business Applications
'www.ozgrid.com
'Sums or counts cells based on a specified fill color.
'''''''''''''''''''''''''''''''''''''''
lCol = rColor.Interior.ColorIndex
If SUM = True Then
For Each rCell In rRange
If rCell.Font.ColorIndex = lCol Then
vResult = WorksheetFunction.SUM(rCell, vResult)
End If
Next rCell
Else
For Each rCell In rRange
If rCell.Font.ColorIndex = lCol Then
vResult = 1 + vResult
End If
Next rCell
End If
ColorFunction = vResult
End Functionén csak annyit írtam át rajta hogy ne háttérszínt nézze hanem a betűszínt.
használni úgy kell hogy: =ColorFunction(C1;A1:A9;IGAZ)
ahol c1 cella háttérszíne olyan mint az összeadandó számoké tehát piros, A1:A9 a tartomány amit figyeltetünk. A végén ha igaz akkor összeadja ha hamis akkor csak megszámolja hány cella piros...szerintem egyszerűbb egy új oszlop amibe beírod hogy fizetve aztán egy =SZUMHATÖBB(A1:A9;B1:B9;"fizetve") ahol a1:a9 az összegek b1:b9 a fizetve és a fizetve szövegűeket összeadja...
-
Fferi50
Topikgazda
Szia!
Itt az egész makró, hátha elírtál valamit:
Sub kieg()
Dim sor As Long, usor As Long, sorS, sorK As Long, szamol As Integer
Dim ehhez As String, tol$, ig$
Columns(2) = ""
usor = Range("A" & Rows.Count).End(xlUp).Row: sor = 1
For sor = 2 To usor
ehhez = Cells(sor, "A")
If ehhez <> "" Then
sorS = Application.Match(ehhez, Range("D:D"), 1)
szamol = 0
For sorK = 1 To usor
tol$ = Cells(sorS, "E"): ig$ = Cells(sorS, "F")
If Cells(sorK, "A") >= tol$ And Cells(sorK, "A") <= ig$ Then
If szamol = 6 Then Exit For
If Cells(sor, "B") = "" Then
Cells(sor, "B") = Cells(sorK, "A")
Else
Cells(sor, "B") = Cells(sor, "B") & "|" & Cells(sorK, "A")
End If
szamol = szamol + 1
End If
Next
End If
Next
End SubÜdv.
-
Titkárnő
csendes tag
Sziasztok!
Segítség kellene, egy oszlopon belül szeretném összeadni azokat az értékeket, amelyek piros betű színűek...(eredetileg mindegyik fekete, csak ha kifizették átállítom pirosra, és szeretném, ha automatán összeadódna, és nem kellene minden egyes újabb piros számot hozzáadni az összeghez)
Ha ezt lehet bonyolítani, vannak kék betűszínű értékek is, ezek számlázottak, de még nincsenek kifizetve.
És jó lenne, ha azonnal frissülne az összeg, amikor átszínezem pirossá...

Van rá megoldás? Előre is köszönöm a válaszokat! -
botond187
csendes tag
-
Delila_1
veterán
-
Delila_1
veterán
-
Delila_1
veterán
-
Dolphine
addikt
-
Delila_1
veterán
Igen, a beírt szám alatti cella mellett megjelennek a színező gombok.
Persze szerintem is külön oszlopba kellene írni a szóbeli, írásbeli, stb. jegyeit, de ha ragaszkodsz az 1 oszlophoz, hát ez a módszer megteszi.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül. -
Dolphine
addikt
-
Delila_1
veterán
-
Delila_1
veterán
Megírtam a 3 színhez, tudod folytatni.
Sub Piros()
Selection.Offset(-1).Font.Color = vbRed
End Sub
Sub Kek()
Selection.Offset(-1).Font.Color = vbBlue
End Sub
Sub Zold()
Selection.Offset(-1).Font.ColorIndex = 10
End SubA zöldhöz számmal adtam meg az árnyalatot, mert a vbGreen nagyon világos.
Tegyél ki 3 (5) alakzatot. Adj nekik nevet (itt Sz, I és T), és rendeld hozzájuk a megfelelő makrót.
Ezek színeznek a következő képpen: beírod a számot pl. a B4 cellába, mire a fókusz a B5-be áll. Rákattintasz a megfelelő színű alakzatra, ami az aktuális (B5) cella fölötti cella tartalmát színezi ki.
Írtam egy másik makrót, amit a lapodhoz kell rendelned. Ennek hatására az alakzatok mindig az aktuális cella mellett jelennek meg, kényelmesebbé téve a színezést.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Shapes("Sz").Top = ActiveCell.Top
ActiveSheet.Shapes("I").Top = ActiveCell.Top
ActiveSheet.Shapes("T").Top = ActiveCell.Top
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. -
slashing
senior tag
-
Delila_1
veterán
-
Dolphine
addikt
-
slashing
senior tag
talán képlettel is menne, eddig jutottam:
=DARABHATÖBB($B$2:$B$8;"="&$H2;$C$2:$C$8;"="&$I2;$D$2:$D$8;"="&$J2)
ha a tartomány ahol keresni kell csak 3 cellás akkor már jól működik. Kicsit tovább kéne gondolni, de nincs erőm hozzá és a macro is kész úgyhogy passzolom a dolgot.
-
Delila_1
veterán
Figyelmesebben olvasva a kérdést átírtam a makrót.
Ez a K oszlopba írja be a darabszámokat.Sub HolVan()
Dim sor As Integer, sor1 As Integer
Range("L1") = "_"
Range("L2:L22") = "=B2 & L$1 & C2 & L$1 & D2 & L$1 & E2 & L$1 & F2"
Range("M2:M5") = "=H2 & L$1 & I2 & L$1 & J2"
For sor = 2 To 22
For sor1 = 2 To 5
If InStr(Cells(sor, "L"), Cells(sor1, "M")) Then
Cells(sor1, "K") = Cells(sor1, "K") + 1
End If
Next
Next
Range("L1:M22").ClearContents
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. -
Fferi50
Topikgazda
Szia!
A makró elejére írd be egy uj sorba:
Dim szamol as integerIde szúrd be a félkövér sort:
sorS = Application.Match(ehhez, Range("D:D"), 1)
szamol = 0
For sorK = 1 To usorIde szintén:
If Cells(sorK, "A") >= tol$ And Cells(sorK, "A") <= ig$ Then
If szamol = 6 Then Exit For
If Cells(sor, "B") = "" Then
És még ide:
End If
szamol = szamol + 1
End IfÜdv.
-
Delila_1
veterán
A makró a futás idején segédoszlopként használja az L1:M22 tartományt, majd törli ezeket az adatokat.
Abba a sorba, ahol egyezést talál, a G oszlopba X-et ír.Sub HolVan()
Dim sor As Integer, sor1 As Integer
Range("L1") = "_"
Range("L2:L22") = "=B2 & L$1 & C2 & L$1 & D2 & L$1 & E2 & L$1 & F2"
Range("M2:M5") = "=H2 & L$1 & I2 & L$1 & J2"
For sor = 2 To 22
For sor1 = 2 To 5
If InStr(Cells(sor, "L"), Cells(sor1, "M")) Then
Cells(sor, "G") = "X"
Exit For
End If
Next
Next
Range("L1:M22").ClearContents
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. -
Xenon86
csendes tag
Sziasztok!
Szeretnék segítséget kérni egy makróhoz. A feladathoz mellékeltem egy kis képecskét is. 2007-es Excelem van. Tehát a feladat, amelyhez a makró kell, a következő lenne:
Az adathalmazban (például B2: F22) számolja meg, hogy a megadott számhármasokból (például a H2:J2, aztán H3:J3 és így tovább) hány darab van? És a darabszámot írja ki a megfelelő számhármas melletti mezőbe (K3 és így tovább)?A segítséget előre is köszönöm!
-
botond187
csendes tag
-
Fferi50
Topikgazda
Szia!
Két dolog okozta a hibát:
1. Az első sortól indítottad a ciklust és így a cikkszámot is kereste, ami persze nem volt.
Ezért ezt a sort: For sor = 1 To usor át kell javítani erre: For sor = 2 To usor
2. Az A oszlopban vannak üres cellát, ami szintén hibát okoz. Vagy "eltünteted" az üres cellákat, vagy beírod a következő feltételt a makróba:
ehhez = Cells(sor, "A")
If ehhez <> "" Then
sorS = Application.Match(ehhez, Range("D:D"), 1)valamint a lezárását:
Next
End If
NextA félkövérrel szedett sorokat kell beszúrnod a másik kettő közé.
Üdv.
-
Delila_1
veterán
-
maestro87
őstag
Üdv!
Van egy táblázat tele számokkal, és kiszeretnék emelni közülük párat. A probléma csak annyi, hogy ha rákeresek pl. a 6-os számra akkor a 16-os, 26-os stb. számokat is találatnak veszi. Hogy lehetne ezt kiszűrni?
-
botond187
csendes tag
-
Fferi50
Topikgazda
-
Fferi50
Topikgazda
-
Dolphine
addikt
Azt hiszem, nem tudom elmagyarázni!

Nekem olyan kellene, hogy a számok színe aszerint legyen más, hogy milyen típusú!
Pl. Az összes témazáró jegye piros, vagy a szóbeli felelet száma kék, stb.Fferi50
De szerintem ennél sokkal jobb lenne, ha a három különböző eredményt 3 külön oszlopba írnád az adott tanulónál. Máris megvan oldva a probléma, még az oszlopot is színezheted, ha akarod.Ezt nem egészen értem!
Nem egyenlőre, hanem egyelőre! Nem ez miatt, hanem emiatt, vagy ez által! -
Fferi50
Topikgazda
-
tgumis
tag
-
botond187
csendes tag
-
Xenon86
csendes tag
-
slashing
senior tag
-
Xenon86
csendes tag
-
Xenon86
csendes tag
-
slashing
senior tag
-
slashing
senior tag
-
Xenon86
csendes tag
-
slashing
senior tag
Vagy lehet még egyéni számformátumot is használni mint pl.:
[Piros][<=100];[Kék][>100]
-
slashing
senior tag
-
Fferi50
Topikgazda
Szia!
Szinválasztásra ott a jobb egérgomb, cellaformázás, kitöltés. A három szined gyorsan ott lesz a kiválasztható szinek elején.
Vagyis beírod a jegyet, enter. Utána egérrel visszaállsz a cellára és végigcsinálod a fenti műveletet.De szerintem ennél sokkal jobb lenne, ha a három különböző eredményt 3 külön oszlopba írnád az adott tanulónál. Máris megvan oldva a probléma, még az oszlopot is színezheted, ha akarod.
Üdv.
-
Dolphine
addikt
Azt is próbáltam, de az sem az igazi, vagy csak rosszul csináltam.
Szóval az a lényeg, hogy amikor egy érdemjegy (jelen esetben egy szám) rögzítésre kerül, már akkor ki tudjam választani az adott színt, ne később kelljen választanom, mivel előfordul, hogy több tanuló jegyét is rögzítenem.
Így érthetőbb?
Ha feltételes formázás, akkor milyen beállítással kellene kezdenem?
Nem egyenlőre, hanem egyelőre! Nem ez miatt, hanem emiatt, vagy ez által! -
slashing
senior tag
-
Dolphine
addikt
Sziasztok!
Van olyan lehetőség az Excelben, hogy egy cellában ne egyesével kelljen kiválasztani a beírt érték színét?
Hogy pontosan mire gondolok:
Adott három különböző érdemjegy: szóbeli, írásbeli, témazáró - mind a három különböző színű.
Valami olyasmi kellene nekem, hogyha egy cellába beírok egy jegyet, akkor azonnal ki tudjam választani, hogy az érdemjegy milyen színű legyen. Az a baj, hogy az Érvényesítés nem jó.
Hiába hozok létre egy listát, a cellába beírt szöveg mindig fekete lesz, ráadásul a legördülő menüben sem látszanak a színek.
Érthető egyáltalán, hogy mit szeretnék?
Nem egyenlőre, hanem egyelőre! Nem ez miatt, hanem emiatt, vagy ez által! -
tomi4506
csendes tag
-
botond187
csendes tag
Köszönöm a gyors választ, nemsokára kipróbálom.
-
Fferi50
Topikgazda
Szia!
Képlettel nem lehet módosítani az adott cella tartalmát, mert az körkörös hivatkozás hibát ad.
Vagy makrót írsz, vagy a mellette levő cellába beírod a következő képletet:
B1-be pl. ="XY" & A1 ahol XY a két új karakter. Ezután a cellát kijelölve másol, beilleszt értéket és ezt teszed át az eredeti cellába.Üdv.
-
tomi4506
csendes tag
-
botond187
csendes tag
Sziasztok,
Olyan kérdésem lenne, hogy milyen képlettel lehet beilleszteni 2 karaktert már létező cellákba úgy, hogy mindegyiknél a legelejére kerüljön ez a két karakter?
Köszönöm a válaszokat
-
tomi4506
csendes tag
Helló Sürgős segítségre lenne szükségem...
Egy excelben munkafüzetben van több beillesztet nagy felbontású kép. Hogy tudom pdf-ként lementeni, úgy hogy ne csorbuljon a minősége a képeknek. A beállításokban a speciális fülön természetesen nincs bepipálva, hogy tömörítsen, szóval elvileg nem tömörít. Meg nagy 220ppi-re van állítva. De gondolom ezek csak excel formátumban lévő mentésre vonatkoznak. Próbáltam pdf nyomtatóval is, de akkor is rossz minőségű lettek a képek.Szóval, hogy tudom megtartani pdf-be való mentésnél az excelben lévő nagy felbontású képek minőségét?
-
Delila_1
veterán
Szia!
Nem voltam net közelében.
Mindkét lapon össze kell fűznöd az A és B oszlop adatait, közöttük pl. szóközzel.
A képen a Munka1 lap C2 cellájának a képletét láthatod a státuszsorban.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül. -
Fferi50
Topikgazda
Szia!
Tettem fel ide egy kis példát. A combobox forrása az A2:A48 cellákban található. Hozzá van kapcsolva az F1 cellához.
Amikor elkezdesz gépelni valamit, akkor a megfelelő értékek automatikusan töltődnek, ha lehúzod a legördülő listát, onnan kezdődnek a választható értékek. Kiválasztod enterrel, majd kijelölsz egy cellát és rákattintasz. Ebbe a cellába automatikusan beíródik a combo (és az F1 cella) értéke.Remélem, segít neked ez a dolog.
Van még egy kikommentelt része is, ott a B oszlopot tölti folyamatosan, függetlenül attól, hogy hova kattintottál el a comboboxról.
Üdv.
-
tgumis
tag
-
Szilard7
csendes tag
-
Fferi50
Topikgazda
Szia!
Ha biztos, hogy minden H oszlopbeli értékre van J oszlopbeli érték és az első H előfordulás mellett van a J oszlopban érték, akkor fkeres a barátod. Ha nem így lenne, akkor kapsz hibaértéket, amit az első előfordulásnál átírsz a helyesre és a többi kijavul (persze ezt H értékenként kellene megtenni).
Ha J11-től kezdődnek az üres cellák:
J11 képlete =fkeres(H11;$H$5:$H10;3;0)
Ezután húzd végig a J oszlopon a képletet.Vagy:
Csinálsz egy irányított (speciális) szűrést a H:J tartományodból átmásolva egy másik tartományba, bejelölve, hogy csak az egyedi értéket másolja át.
Ezután az fkeres kereső tartománya az új, kimásolt tartomány lesz, képlet mint fent, csak a $H$5:$H10 helyett az új tartomány $-os címét kell beírnod ($X$2:$Z$30).
Üdv.
-
Fferi50
Topikgazda
-
tgumis
tag
Èn ùgy csinàlnàm,hogy először csinàlnèk egy szűkitett listàt az ismètlődő sorok eltàvolítàsàval. Módjuk a L oszlopba a h oszlop értékeiből mellette M oszlopba a hozzà tartozó j oszlop elemeivel.
Majd leszűröm a j oszlopot 0 vagy üres értékre.aztàn =index(M:M;hol.van(H1;L;0))
Szerintem ennyi. -
Szilard7
csendes tag
Sziasztok!
Remélem nem okozok nagy fejtörést, egy képletet keresnék, ami jócskán megkönnyíti munkám, ugyanis kb. 3 ezer sorról lenne szó, amit ki kell töltenem. Ezen a képen próbálom bemutatni a dolog lényegét. Adott a "H" oszlopom mindig változó értékekkel, de kb 10 féle variáció van csak belőlük, és mindig ugyanaz tartozik hozzájuk a "J" oszlopban. Ehez kérnék segítséget, hogy az üres részekhez a "J" oszlopba automatikusan bekerüljenek az oda tartozó adatok. A 3 ezer sorban végig meg van a "H" oszlopom, csak a "J"-ben van "üresedés"

Ezer köszönet annak, aki tud segíteni.
-
tgumis
tag
-
Fferi50
Topikgazda
Szia!
Tervező módban:
Tegyél fel egy combobox activexvezérlőt a munkalapra, a listfillrange a listát címe.
A matchentry tulajdonságot állítsd 1-fmmatchentrycomplete értékre
Így amint elkezded begépelni az értéket, a mejelenő lista szűkülni fog.
Hozzákötheted egy cellához (linked cell), ahonnan kimásolhatod az értéket.
Ha kilépsz a tervező módból látod a listádat és választhatsz belőle, amint rákattintottál, megjelenik az értéke a hozzákötött cellában.Üdv.
-
tgumis
tag
-
Fferi50
Topikgazda
-
tgumis
tag
Sziasztok
Van arra valami megoldás hogyha elkezdek begépelni valamit a cellába akkor az felkínáljon egy listából értékeket amik tartalmazzák azt a betűkombinációt amit elkezdtem begépelni.
PL:
van egy listám a következő értékekkel:
ez a lista a CR1 : CR21 tartományba vancroissain csokoládés vaniliás min. 70 g 3 db
burkifli mákos 95-100gr 3 db
pizzás csiga 100 g 3 db
zsemle 3 db
kifli 3 db
zöld paprika 10 dkg
tv paprika 10 dkg
paradicsom 10 dkg
zöld paprika 7 dkg
tv paprika 7 dkg
paradicsom 7 dkg
alma
narancs
tej 0,5 l-es
minimargarin 1 db
minimargarin 2 db
minimargarin 3 db
gyümölcsjoghurt
gyümölcsös tejberizs
túró rudi 1 dbAz A1 cellába begépelem mondjuk, hogy min egy legördülő listában már csak a minimargarin jelenjen meg, hogy kiválasszam melyiket akarom a 3 ból. vagy beírom, hogy TV lés már csak a 2 TV paprikából választhassak.
Remélem érthető
-
the radish
senior tag
Új hozzászólás Aktív témák
-
23200 - 23101
54978 - 54001 54000 - 52001 52000 - 50001 50000 - 48001 48000 - 46001 46000 - 44001 44000 - 42001 42000 - 40001 40000 - 38001 38000 - 36001 36000 - 34001 34000 - 32001 32000 - 30001 30000 - 28001 28000 - 26001 26000 - 25901 25900 - 25801 25800 - 25701 25700 - 25601 25600 - 25501 25500 - 25401 25400 - 25301 25300 - 25201 25200 - 25101 25100 - 25001 25000 - 24901 24900 - 24801 24800 - 24701 24700 - 24601 24600 - 24501 24500 - 24401 24400 - 24301 24300 - 24201 24200 - 24101 24100 - 24001 24000 - 23901 23900 - 23801 23800 - 23701 23700 - 23601 23600 - 23501 23500 - 23401 23400 - 23301 23300 - 23201 23200 - 23101 23100 - 23001 23000 - 22901 22900 - 22801 22800 - 22701 22700 - 22601 22600 - 22501 22500 - 22401 22400 - 22301 22300 - 22201 22200 - 22101 22100 - 22001 22000 - 20001 20000 - 18001 18000 - 16001 16000 - 14001 14000 - 12001 12000 - 10001 10000 - 8001 8000 - 6001 6000 - 4001 4000 - 2001 2000 - 1
-
Fórumok
LOGOUT - lépj ki, lépj be!
LOGOUT reakciók Monologoszféra FototrendGAMEPOD - játék fórumok
PC játékok Konzol játékok MobiljátékokMobilarena - mobil fórumok
Okostelefonok Mobiltelefonok Okosórák Autó+mobil Üzlet és Szolgáltatások Mobilalkalmazások Tartozékok, egyebek Mobilarena blogokPROHARDVER! - hardver fórumok
Notebookok TV & Audió Digitális fényképezés Alaplapok, chipsetek, memóriák Processzorok, tuning Hűtés, házak, tápok, modding Videokártyák Monitorok Adattárolás Multimédia, életmód, 3D nyomtatás Tabletek, E-bookok Nyomtatók, szkennerek PC, mini PC, barebone, szerver Beviteli eszközök Egyéb hardverek PROHARDVER! BlogokIT café - infotech fórumok
Infotech Hálózat, szolgáltatók OS, alkalmazások SzoftverfejlesztésFÁRADT GŐZ - közösségi tér szinte bármiről
Tudomány, oktatás Sport, életmód, utazás, egészség Kultúra, művészet, média Gazdaság, jog Technika, hobbi, otthon Társadalom, közélet Egyéb Lokál PROHARDVER! interaktív
- Fórumok
- OS, alkalmazások
- Microsoft Excel topic
- (kiemelt téma)
- PC Szervizeket, Gépépítőket keresek B2B szoftver partnerségre (E-számlával)
- Eladó PC játékok - sok ritkaság!!!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- BESZÁMÍTÁS! ASRock B450M R5 3600 16GB DDR4 512GB SSD GTX 1660 Super 6GB Rampage SHIVA DeepCool 400W
- ÁRGARANCIA!Épített KomPhone i5 14600KF 32/64GB DDR5 RAM RX 9070 16GB GAMER PC termékbeszámítással
- Lenovo 40AH és 40A1 dokkoló, töltő is.
- ÚJ Lenovo LOQ Intel Core i5-13450HX, 24GB, 512GB, RTX 5050(8GB), FHD IPS 144Hz
- Honor Magic6 Lite / 8/256GB / Kártyafüggetlen / 12Hó Garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest











Hiába hozok létre egy listát, a cellába beírt szöveg mindig fekete lesz, ráadásul a legördülő menüben sem látszanak a színek.


