-
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
-
Exportlaptop
csendes tag
válasz
Delila_1
#41090
üzenetére
Közben rájöttem, más okozta a problémát, megoldva

Köszi még egyszer!
Még egy kérdésem lenne esetleg ha nem gond.
Van két oszlop, az elsőben mondjuk 100 sor, melyben 70 sorban van adat, 30 sorban nincs, vagyis üres.
Viszont ahol üres, ott a második oszlopban van adat, és a többi 70 üres.
Ezt a két oszlopot, hogy lehet összevonni, hogy egy oszlopban legyenek, úgy hogy ne sérüljön egyik sem?
Köszönöm ha segít valaki.
Üdv,
Erika
-
Exportlaptop
csendes tag
-
Exportlaptop
csendes tag
Sziasztok!
Segítségre lenne szükségem.
Van egy nagy excel adatbázisom, több ezer sorból áll.
A K oszlop minden cellájában van egy-egy nagyobb szöveg.
A szövegből mindent törölni kell az "Item Specifics" szó után.
Keresgéltem a neten, csak pár angol fórumot találtam, ahol az alábbi függvény jelentett megoldást:
L oszlopba beírni a következőt: =LEFT(K2;SEARCH("Item Specifics";K2)-2)
Mivel magyar excelem van, próbáltam ezt a függvényt LEFT helyet BAL-al és KERES-el beírni, de helytelen így és csak az alábbi eredményt hozza elő: #NÉV?
Mit csináltam rosszul? Hogyan kellene beírnom, hogy sikerüljön?Hálás köszönet a segítségért előre is,

Erika -
Exportlaptop
csendes tag
Üdv!
Még anno segített egy kedves hölgy, talán Delila_1 az alábbi modul szerkesztésében, ami ezidáig tökéletesen működött, most viszont ezt a hibát írja ki: Compile error: Expected End Sub
És a modul:
Sub Kepek()
Dim Kepneve As String, utvonal As String, sor As Long
utvonal = "D:\MUNKA kicsinyitett2\BC adatbazis\UJ TERMEKEK 2018,04,13\COMP\KEPEK\"
sor = 1
Do While Cells(sor, "I") <> ""
Kepneve = Cells(sor, "I")
With ActiveSheet.Pictures.Insert(utvonal & Kepneve)
.Left = Columns(10).Left
.Top = Rows(sor).Top
.Height = Rows(sor).Height
End With
sor = sor + 1
LoopMi lehet a gond?
Nincs szóköz a végén vagy bármi ilyesmi, ismétlem a modul tökéletesen működött idáig.
A sorok is a helyén vannak.
Napok óta próbálkozom, sikertelenül.
Remélem tudnak segíteni.
Köszönöm előre is. -
Exportlaptop
csendes tag
válasz
Delila_1
#31266
üzenetére
Köszönöm a választ és bocsi az amatőr kérdésért.
Lenne itt még egy kérdés ha van időtök.
Van egy hosszú terméklistám A-M oszlopig.
Az "I" oszlopban van a termékkód.
Van egy másik excelem, melyben csak termékkódok vannak A oszlopban. Legtöbbjük megtalálható az első excelben, vannak benne újak is, amelyek nem találhatók meg benne (ezekre nincs szükségem jelenleg), nekem azok az első listában szereplő termékkódok kellenek, melyek hiányoznak a második excel táblázatból.
Tehát tulajdonképpen nekem az első excelből törlendő termékek kódja kellene egy listába.
Hogyan oldhatom meg?
Nem győzöm köszönni az időtök!
-
Exportlaptop
csendes tag
Sziasztok!
Segítséget szeretnék kérni az excellel kapcsolatban.
Excel 2013-as verzióm van.
A következő a helyzet:
Van 2 excel táblázatom.
Az elsőben:
A-tól L oszlopig vannak benne adatok.
E oszlopban van a termékkód
I, J, K oszlopban képek neve van beírva.
L oszlopban van még egy adat, mégpedig a kategória.
Van egy másik excel táblázatom ahonnan be szeretnék rakni az első excel táblázatba pár adatot, mégpedig van egy oszlopnyi kép nevem pluszba.
A második excelben tehát:
A oszlop = termékkódok
B oszlop = hiányzó képek (van ahol üres)A termékkód szerint szeretném tehát beazonosítani az első excel táblázatban levő termékeket és berakni az első excel M oszlopába a második excel B oszlopát.
Mit kell tennem?Köszönöm előreis a segítséget!

-
Exportlaptop
csendes tag
-
Exportlaptop
csendes tag
-
Exportlaptop
csendes tag
válasz
Delila_1
#30928
üzenetére
Köszönöm a választ. F8-al nem indul el valamiért, az alábbit írtam be, helyes?
Ismétlem a képek neve jpg. kiterjesztéssel a H oszlopban van, én pedig az I oszlopba akarom helyezni a miniatur képeket cellánként az összeset. Kb 16 ezer sorról van szó.Sub Kepek()
Dim Kepneve As String, utvonal As String, sor As Longutvonal = "G:\MUNKA kicsinyitett2\BC adatbazis\Képek összes logos\"
sor = 2
Do While Cells(sor, "I") <> ""
Kepneve = Cells(sor, "I")
With ActiveSheet.Pictures.Insert(utvonal & Kepneve)
.Left = Columns(8).Left
.Top = Rows(sor).Top
.Height = Rows(sor).Height
End With
sor = sor + 1
Loop
End Sub -
Exportlaptop
csendes tag
válasz
Delila_1
#30922
üzenetére
Közben sikerült megcsinálni, köszönöm a segítséget!
Lenne még egy olyan kérdésem, hogy hogyan lehet tömegesen beszúrni minden sorba egy egy képet a termékeimről?
Meg van adva a H oszlopba a képek neve, és be szeretném illeszteni mondjuk az I oszlopba a kepeket miniatűr formában csak épp látható legyen kicsiben. Lehetséges ez?Köszönöm mégegyszer a hasznos tippeket!
-
Exportlaptop
csendes tag
válasz
Delila_1
#30922
üzenetére
Mint már írtam, abszolút kezdő vagyok és szükségem lenne egy bővebb, butított magyarázatra amennyiben időd engedi.
Ezt a függvényt egy az egybe bemásolom a B oszlop celláiba. De hogyan fogja megtalálni a másik excelemben levő adatokat? A kettes excel egy külön excel. Vagy be kellene másolnom az egyes excelbe először?Üdv
-
Exportlaptop
csendes tag
Sziasztok!
Exceles kezdő vagyok, segítségetek szeretném kérni.
2013-as magyar excelt használok.
Van 2 excelem.
1. excelben A oszlopban angol szöveg van, B oszlop üres, C oszlop egyedi kód. Vannak további oszlopok is, jelen esetben lényegtelen.
2. excelben A oszlopban szintén angol szöveg, B oszlopban magyar fordítás, C oszlop egyedi kód.
A második excel egy része azonos az első excelben levőkkel. Ezeket C oszlopból lehet azonosítani.
Kérdés: Hogyan lehet a két excelt úgy összehasonlítani, hogy a második excel C oszlopában levő egyedi kód szerint beazonosítsa az első excelben levő adatokat és a második excel B oszlopában levő magyar fordítást áthelyezze az első excelben levő B oszlopba úgy, hogy a mellette levő egyedi kód stimmeljen?
Előreis köszi!
Új hozzászólás Aktív témák
- Luck Dragon: Asszociációs játék. :)
- Milyen nyomtatót vegyek?
- AliExpress tapasztalatok
- Autós topik
- MasterDeeJay: i7 4980HQ asztali gépben (vs i7 4770)
- iRacing.com - a legélethűbb -online- autós szimulátor bajnokság
- Milyen belső merevlemezt vegyek?
- Szeged és környéke adok-veszek-beszélgetek
- Android alkalmazások - szoftver kibeszélő topik
- Milyen routert?
- 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
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok : (12.20.)
- 10 Darab ÚJ PC Játékszoftver
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Bomba ár! Lenovo IdeaPad V15-IIL: i5-10GEN I 8GB I 256SSD I 15,6" FHD I Cam I W11 I Garancia!
- Samsung Galaxy S25 Ultra Titanium Jetblack Titán dizájn, 120 Hz AMOLED, AI Pro kamera
- BESZÁMÍTÁS! Apple Macbook Pro 16 2023 M3 Pro 36GB 512GB macbook garanciával hibátlan működéssel
- Dell Alienware AW3423DW 34 QD-OLED Gaming Monitor 27% ÁFÁS
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7800X3D 32/64GB RAM RX 9070 16GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: BroadBit Hungary Kft.
Város: Budakeszi





Köszönöm nagyon sokat segítettél!


