- 
			  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
- 
			
			  ppapp44 újonc válasz  ppapp44
							
							
								#37393
							
							üzenetére ppapp44
							
							
								#37393
							
							üzenetéreA korábban definiált public változóim működnek (modul hivatkozás nélkül), de a ma felvett egyszerűen nem. Már cserélgettem a nevet, a tipust (as string, as variant)a definiálás helyét (Thisworkbook, userform, modul). Használtam Feri hivatkozását "modul2.változó", valóban "userform10.muszak", de így sem látom máshol (msgbox muszak) csak a userform-on belül. (Egyébként ez valóban jó ötlet.) Hogyan tudom ellenőrizni, hogy a VB milyen típusnak tart egy változót? 
 Létezhet darabszámi korlátja a (global) változóknak????
 Előre is köszi Péter
- 
			
			  Fferi50 Topikgazda 
- 
			
			  Fferi50 Topikgazda válasz  Cilindrik
							
							
								#37385
							
							üzenetére Cilindrik
							
							
								#37385
							
							üzenetéreSzia! Az alábbi makrót írd be egy általános modulba: Sub szinvalaszt()
 Dim cl As Range, xx As Integer, rang2 As Range, yy As Long
 If Selection.Columns.Count > 1 Then
 MsgBox "Csak egy oszlopot tudok kezelni, egy oszlopot jelölj ki csak!", vbInformation
 Exit Sub
 End If
 Set rang2 = Selection.Offset(0, 2) ' a kettővel arrébb levő oszlopba fogja tenni az eredményt, ha közvetlenül mellé szeretnéd, akkor Offset(0,1)-et írj.
 For Each cl In Selection.Cells
 yy = cl.Characters(1, 1).Font.Color
 For xx = 1 To cl.Characters.Count
 If cl.Characters(xx, 1).Font.Color <> yy Then
 rang2.Cells(cl.Row, cl.Column).Value = Left(cl.Text, xx - 1)
 rang2.Cells(cl.Row, cl.Column + 1).Value = Mid(cl.Text, xx)
 rang2.Cells(cl.Row, cl.Column).Font.Color = yy
 rang2.Cells(cl.Row, cl.Column + 1).Font.Color = cl.Characters(xx, 1).Font.Color
 Exit For
 End If
 Next
 Next
 End SubArra képes, hogy bármilyen két színnel készült szöveget szétszedjen 2 oszloppal arrébb, az eredeti színek megtartásával. 
 Kijelölöd az adott 1 oszlopban levő szöveget, majd elindítod a makrót - fejlesztőeszközök - makrók - inditás.Üdv. 
- 
			
			  Fferi50 Topikgazda válasz  ppapp44
							
							
								#37393
							
							üzenetére ppapp44
							
							
								#37393
							
							üzenetéreSzia! "de a változó nem kap értéket. Olyan mintha nem válna globálissá sehogy sem a userform-on" A userform kódlapján definiált változó csak akkor és addig él, amíg a form a memóriában van! Tehát betöltés előtt és Unload után már nem érhető el, akkor sem, ha Public. 
 Ezért ezeket a változókat is célszerű általános modulban deklarálni és a userform kódjában értéket adni nekik.Üdv. 
- 
			
			  spe88 senior tag Sziasztok! Adott az alábbi tábla: 1 gd 0 #HIÁNYZIK
 2 bcx 1 gd
 3 hf 3 hf
 3 bd54t 4 fv
 1 sdg 6 #HIÁNYZIK
 1 qwef 7 dsfg
 7 dsfg 10 yvxc
 4 fv 21 yxcv
 9 vy 40 #HIÁNYZIK
 10 yvxc #HIÁNYZIK
 10 cv #HIÁNYZIK
 3 yxcv #HIÁNYZIK
 2 yxcv #HIÁNYZIK
 4 yxcv #HIÁNYZIK
 15 yxcv #HIÁNYZIK
 16 yxcv #HIÁNYZIK
 17 yxcv #HIÁNYZIK
 18 yxcv #HIÁNYZIK
 19 yxcv #HIÁNYZIK
 20 yvxc #HIÁNYZIK
 21 yxcv #HIÁNYZIKHogy tudom azt megadni, hogy a D oszlop adott sorában dobja ki a B oszlop adott sorát, ha az A oszlopban szerepel a C oszlop bármelyik száma? Itt a bármelyiken van a hangsúly és azon, hogy az adott sorban dobja ki. Sima Fkeressel a fenti összefüggést kaptam de nekem ilyenre volna szükségem: 1 gd 0 gd
 2 bcx 1
 3 hf 3 hf
 3 bd54t 4 bd54t
 1 sdg 6 sdg
 1 qwef 7 qwef
 7 dsfg 10 dsfg
 4 fv 21 fv
 9 vy 40
 10 yvxc yvxc
 10 cv cv
 3 yxcv yxcv
 2 yxcv
 4 yxcv yxcv
 15 yxcv
 16 yxcv
 17 yxcv
 18 yxcv
 19 yxcv
 20 yvxc
 21 yxcv yxcvköszi 
- 
			
			  ppapp44 újonc válasz  Fferi50
							
							
								#37392
							
							üzenetére Fferi50
							
							
								#37392
							
							üzenetéreKöszi a választ. Nem tudom, hogy ez baj-e vagy sem, de ez egy userform-on van (ami egyébként szerintem egy modul) nem modul-ban. A "userform10.muszak" valóban szintaktikailag elfogadott. de a változó nem kap értéket. Olyan mintha nem válna globálissá sehogy sem a userform-on. Üdv 
 Péter
- 
			
			  Fferi50 Topikgazda válasz  ppapp44
							
							
								#37391
							
							üzenetére ppapp44
							
							
								#37391
							
							üzenetéreSzia! A publikus változókra a Modulnév.Változónév szintaxissal hivatkozhatsz. 
 Pl. Thisworkbook.Ezavaltozo = "akarmi" vagy Module1.Valtozo=5
 Ezt akkor is tanácsos betartani, ha éppen az adott modulon vagy formon belül vagy mert ugyanazon név előfordulhat eljáráson belül is.
 Érdemes átnézned a VBA help változók élettartamára vonatkozó leírását.Üdv. 
- 
			
			  ppapp44 újonc Sziasztok! Excel 2013 VB6-ban egy user form-on levő változót szeretnék globálissá tenni. Megtettem itt (a user form code-ban) a "Thisworkbook"-ban és ott is ahol a moduljaim vannak. Mindenhol a SUB-ok előtt ("public muszak as string"). Egyszerűen nem látom sem a modulokban sem másik user formokon. Ahogy visszakerülök az adott form-ra persze megjelenik. Mi lehet a baj? Segítséget előre is köszönöm. Üdv 
 Péter
- 
			
			  oke senior tag Sziasztok! Technikai kérdés magának az excel felületének kinézetére vonatkozóan: hogy lehet a menüszalag betüinek a méretét növelni? Excel 2007 
- 
			
			  alfa20 senior tag Sziasztok! Meg lehet valahogy oldani, hogy az FKERES-nek egy celle értéke adja meg a kereső tábla munkafüzet nevét? Pl: =FKERES(A2;Március!A:B;2;0)
 A képletben lévő "Március"-t az I2-es celléból venné
 A fülek amiből keresni kell azok havi neveken szerepelnek.Köszi előre is! 
- 
			
			  Kronk őstag Sziasztok, Két win 10-es gép is a következőt csinálja. 
 Office 2007 van rajtuk, és bármit indítunk el, excel, word, outlook, kiírja, hogy konfigurálás állapota, kicsit telepítget, mintha most települne fel, kb 1 perc, majd elindul.
 És ezt minden program indításánál.
 Sejtésem szerint valami windows 10 frissítés okozza.
 Találkoztatok már ilyennel?Köszönöm előre is! 
- 
			
			  Kobe veterán válasz  Cilindrik
							
							
								#37381
							
							üzenetére Cilindrik
							
							
								#37381
							
							üzenetéreAdat - Szovegbol oszlopok Ott a fuggoleges specko karaktert beadod separatornak es szetszedi (de space alapjan is szetcsapja, csak minden szot kulon oszlooba). Ha az egyszinueket egy oszlopba akarod rakni akkor szetszedes utan raeresstesz egy CONCATENATE fuggvenyt a fekete szoveges oszlopokra, meg egyet a pirosakra 
- 
			
			  0P1 aktív tag válasz  Vision
							
							
								#37376
							
							üzenetére Vision
							
							
								#37376
							
							üzenetéreSzia, jól értem, hogy Excelbe akarsz MNB árfolyamokat lekérdezni? Akkor miért SOAP-pal próbálkozol, miért nem inkább az Excel Get&Transform-ot (Adatok beolvasása és átalakitása) használod ? Azzal szerintem sokkal egyszerűbb, mint SOAP-al és VBA-val szenvedni. . Úgy alakitod, ahogy akarod, úgy paraméterezed, ahogy akarod, be tudod joinolni egyéb querykbe, és akkor ki se kell dobnod munkalapra, akár a Data Modelbe be tudod olvasni, stb ... Ha megirod, konkréten milyen paraméterezéssel akarod meghivni és milyen formában szeretnéd megkapni a kimenetet,akkor tudok segiteni. Ha ragaszkodsz a SOAP-hoz, abban sajnos nem tudok, én is próbálkoztam vele pár éve, de pár órás próbálkozás után hagytam az egészet a fenébe, inkább Get&Transform-mal pár perc alatt összedobtam, amit akartam  
- 
			
			  Kobe veterán válasz  Delila_1
							
							
								#37372
							
							üzenetére Delila_1
							
							
								#37372
							
							üzenetérekipróbáltam, köszi. Sajna ennél a sornál elhasal: If WF.CountIf(Range("J1:J6"), Range("B" & i)) + WF.CountIf(Range("J1:J6"), Range("C" & i)) = 0 ThenEz egy xlam file, amiben van egy rejtett workbook (ThisWorkbook), illetve egy rejtett Worksheet (Usernames). 
 Azt csináltam, hogy a userneveket erre a rejtett worksheet A oszlopába írtam, A2:A7 mezőkbe listáztam, majd a makróval a hivatkozást átírtam:If WF.CountIf(Worksheets("Usernames").Range("A2:A7"), Range("B" & i)) + WF.CountIf(Worksheets("Usernames").Range("A2:A7"), Range("C" & i)) = 0 Thenígy viszont nem tudja lekezelni. Lehet mert rejtett? (szeretném xlam formátumban tartani a dolgot) 
- 
			
			Sziasztok, SOAP kapcsolatom paraméterezésével van gondolom. MNB árfolyamokat akarok lekérdezni, de a weboldalon nem találtam épkézláb segédletet hozzá. PHP/Java példa van, de szerintem azzal itt nem sokra megyek! Public Sub MNB_arfolyamok()
 
 Dim sURL As String
 Dim sEnv As String
 Set objHttp = CreateObject("MSXML2.XMLHTTP")
 sURL = "http://www.mnb.hu/arfolyamok.asmx?wsdl"
 
 sEnv = sEnv & "<soap:Envelope xmlns:soap=""http://schemas.xmlsoap.org/soap/envelope"">"
 sEnv = sEnv & " <soap:Header>"
 sEnv = sEnv & " <soap:Body>"
 sEnv = sEnv & " <soap:Request>"
 sEnv = sEnv & " <soap:GetCurrentExchangeRates></soap:GetCurrentExchangeRates>"
 sEnv = sEnv & " </soap:Request>"
 sEnv = sEnv & " </soap:Header>"
 sEnv = sEnv & " </soap:Body>"
 sEnv = sEnv & "</soap:Envelope>"
 
 objHttp.Open "GET", sURL, False
 objHttp.setRequestHeader "Content-Type", "text/xml"
 objHttp.send sEnv
 MsgBox objHttp.responseText
 End Sub
- 
			
			  aclandiae senior tag Sziasztok! Office 2016-ban szeretnék úgy nyomtatni, hogy oldalszámok kerüljenek a lapok aljára (mint a Word-ben). 
 Végignéztem a nyomtatási beállításokat, de nem szúrja ki a szememet.Ezt a formátumot szeretném: - 1 - és így tovább a számozás. Hol tudom beállítani? 
- 
			
			  Delila_1 veterán A J1:J6 tartományba írtam be a keresendő neveket. Az If WF kezdetű sorban ezt írd át (2 helyen) a saját neveidet tartalmazó területre. Sub torlesek()
 Dim LR As Long, i As Long, WF As WorksheetFunction
 Application.ScreenUpdating = False
 Set WF = Application.WorksheetFunction
 LR = Cells(Rows.Count, 2).End(xlUp).Row
 For i = LR To 2 Step -1
 If WF.CountIf(Range("J1:J6"), Range("B" & i)) + WF.CountIf(Range("J1:J6"), Range("C" & i)) = 0 Then
 Rows(i).EntireRow.Delete Shift:=xlUp
 End If
 Next i
 Application.ScreenUpdating = True
 End Sub
- 
			
			  Kobe veterán válasz  Delila_1
							
							
								#37370
							
							üzenetére Delila_1
							
							
								#37370
							
							üzenetéreKoszi. A vege eleg szep kis lista lesz....ha minden userre 2db bejegyzest kell nyilvantartani Ha letarolom a user listat egy worksheetben, akkor van arra mod hogy a "Gipsz Jakab" helyere meghivatkozzam azt? (egyszerubb egy listat karbantartani mint egy hardcodeolt reszt a programban) 
- 
			
			  Delila_1 veterán Sub torlesek()
 Dim LR As Long, i As Long
 Application.ScreenUpdating = False
 
 LR = Cells(Rows.Count, 2).End(xlUp).Row
 For i = LR To 2 Step -1
 If Range("B" & i) <> "Gipsz Jakab" And Range("C" & i) <> "Gipsz Jakab" And _
 Range("B" & i) <> "Rezső Dezső" And Range("C" & i) <> "Rezső Dezső" Then
 Rows(i).EntireRow.Delete Shift:=xlUp
 End If
 Next i
 Application.ScreenUpdating = True
 End Sub
- 
			
			  Kobe veterán sziasztok van egy Excel táblám, amiben a B és C oszlopokban nevek vannak (kb 100-200 különböző név). Azt szeretném, ha egy makró kitörölné azokat a sorokat (az egész sort) ahol a B és C oszlopok bármelyikében nem egyezik meg az általam kívánt nevekkel (magyarul szeretném csak a nekem érdekes 4-5 névre emgtartani a sorokat). 
 A nevek a 2 oszlopban lehetnek eltérőek, akár B ben vagy C ben szerepelhet az általam ekresett érték, és ha egyikben sem találta meg, akkor töröljön csak sort,, ha a kettő közül bármelyikben szerepel, maradhat.Idáig jutottam, de nem működik, tuti elírtam valamit. Mi lenne helyesen ? Dim LR As Long
 Application.ScreenUpdating = False
 LR = Cells(Rows.Count, 1).End(xlUp).Row
 
 For i = LR To 2 Step -1
 
 If Range("B" & i:"C" &i) <> "Gipsz Jakab" Or "Rezső Dezső" Then
 Range("B" & i).EntireRow.Delete Shift:=xlUp
 End If
 Next i
 Application.ScreenUpdating = True
- 
			
			  Krogoth senior tag Hali. Az mitől lehet, hogy néha nem érzékeli az excel a bevitelt? 
 Írnék valamit és nem reagál. Átlépek másik táblázatra (nem munkalap), majd vissza és ismét jó minden.Szerk: AMD A8-5500B, 16 giga ram. 
- 
			
			Sziasztok! Adott egy xlsx file, amibe ha felviszek egy vonalkódot, akkor automatikusan kitölti a mellette lévő oszlopokat könyv címmel és egyéb információkkal. Az érdekelne, hogy ezeket az infókat honnan veszi, mert a függvényt látom: =FKERES(A653;$EAN.A$2:J$9219;5;0) , de azt nem hogy hol vannak az adatok amiben keres  
- 
			
			  föccer nagyúr válasz  cheeka
							
							
								#37363
							
							üzenetére cheeka
							
							
								#37363
							
							üzenetéreA beepitett fuggvanyek hasznalata nagyon kis helyet foglal es egy fajl meretebol nem lehet annak bonyolultsagara kovetkeztetni. Olyasmire gondoltam hogy megirod, hogy pl adott egy lista ami tartalmazza a termek nevet es masik tucat tulajdonsagat. Ebbol a listabol legordulo menubol lehet valasztani es a valasztas melle kiratni valamelyik tulajdonsagot. Ha ilyen elemi lepesekre le tudod bontani a feladatot akkor az egyes lepesek megoldasaban tudunk segiteni itt a forumon. Az, hohy ugyan ezt az algoritmust/fuggvenyz 30x be kell irni az mar "rabszolga munka".  
- 
			
			  cheeka tag válasz  föccer
							
							
								#37362
							
							üzenetére föccer
							
							
								#37362
							
							üzenetéreBiztosan félreérthető voltam, nagyon egyszerűnek írtam le, de nem az. Tervezek 3 témakört, témánként teljesen eltér a számítási módszer. Minden témakörben több márka van, egy márkának 5-10 típusa, ezen típusoknak esetenként akár 100 kapcsolódó kiegészítője. Ez nem egy formátum, de nem is igazán tudom leírni magamtól (hány lapot használjak adatfeltöltésre, mit melyik lapra írjak, azon belül milyen logika szerint stb.). Szerintem a több lépcsőben elért végeredmény lehet akár 30-40mb-os file is, ha ez egyáltalán lehetséges? Egy hasonlóan működőt használok, az 11mb (ez adta az ötletet, ez egy márkának a sajátja, nekem lenne benne kb. 30 márka). 
- 
			
			  föccer nagyúr 
- 
			
			  cheeka tag Sziasztok! 
 Tudnátok segíteni? Debrecen környékén keresek egy Excel "írásban/programozásban" járatos személyt, aki létrehozna nekem egy eléggé összetett táblázatot. Röviden ez egy ajánlatkészítő dolog lenne, százalékszámítás, osztás, szorzás nem kevés alapadattal. Az adatokat én vinném fel, a számolásokat kellene összehozni. Szeretnék jelszavas védelmet is, hogy aki később használni akarja, az ne lásson mögé a dolgoknak. Természetesen ezt nem ingyen kérném (nem vagyok hatóság, nem erre megy ki a játék). A helyszín azért lenne fontos, mert véleményem szerint, személyes találkozó nélkül nem lehetne ezt a projektet megvalósítani.
- 
			
			  allein addikt Jó reggelt, Adott két cella aminek a tartalmát szeretném összeadni: Termék1 Termék2 
 1.00 1.00
 2.00 0.00Milyen módon tudom eltüntetni a .00-at, tehát ne 1.00 legyen hanem 1. SZERK: (#37356) 0P1 - ezt már próbáltam és nem változott semmi. A cellákban nem "," vesszővel vannak elválasztva hanem "." ponttal. 
- 
			
			  zzz012 csendes tag Sziasztok! A következőre kérnék segítséget. Van három sorba rendezett számoszlopom. Az elsőhöz nincs a másik kettőhöz van külön oszlopban számhoz tartozó érték. Megszeretném keresni, hogy a 2.és 3.oszlopban van e az 1.oszlopban lévő számokból és ha egyezik a hozzá tartozó értéket kiíratni az 1.oszlopba tartozó szám mellé.Köszi! Próbáltam index(hol.van) variációval de nem sikerült. 
- 
			
			  wolfman veterán Sziasztok! Két kérdésem lenne: 1.: Legördülő menüs cellákat hogyan lehet törölni. Egyik táblázatból átmásoltam a másikba cellaértékeket, de most nem engedi átírni, mert nem szerepelt az érték a korábbi lehetőségek között. Ezt a funkciót hogyan törölhetem? Mostantól felesleges lett. 2.: Az mitől van amikor egy cellának nem lesz szegélye? Amúgy sincs rajzolva neki, de az alap szürke vonal is eltűnik és olyan mintha egyesítve lenne a mellette levővel, pedig nincs. Ezt miért vagy mitől csinálja és hogyan lehet visszaállítani alapra???
- 
			
			  Delila_1 veterán válasz  RaZroX
							
							
								#37346
							
							üzenetére RaZroX
							
							
								#37346
							
							üzenetéreNem látszanak a képeken a sor- és oszlopazonosítók, így csak saccolni tudom, mi hol van. 
 A színezendő cellák eszerint a B3:B14 tartományban vannak, a feltétel az F3:F14-es terület.Kijelölöd a B3:B14-et, és képlettel adod meg a formátumot. A zöldhöz =$F3<>0; piroshoz =$F3=0. A $ jel rögzíti, hogy az F oszlopot értéke alapján történjen a feltételes formázás. 
- 
			
			  RaZroX addikt 
- 
			
			  RaZroX addikt Sziasztok! A képen látható első két cella összegét szeretném kiszorozni a harmadik cellával. Ezt egy képletben szeretném megoldani, hogy ne legyen mindenhol részeredmény, de nem boldogulok. Előre is köszönöm a segítséget.  
- 
			
			  kopogo tag Helló! Adott két különálló excel állomány 
 az egyikbe vannak azok az adatok amelyeket átszeretnék rakni másikba,
 A második munkafüzet B oszlopában lévő számot megkeresem az első munkafüzetbe majd a hozzá tartózó értékeket melyek a C,D,E oszlopba vannak szépen átmásolja első munkafüzet ott is a C,D,E oszlopba.
 remélem érthetőOszloponként fkeres függvényel lehet de más megoldás 
- 
			
			
- 
			
			  Mauzes addikt Sziasztok! Van egy olyan excel listám, ahol időráfordítást gyűjtünk projektenként, évenként, emberenként. Ez egy sok adatot tartalmazó tábla, de mintaként itt van, hogy kb. hogyan néz ki: [link]. Erre hogyan tudok pivot táblát rárakni, ami minden projektre összesíti az értékeket: 
 - emberenként összesen
 - évenként összesen
 - összesen
 ?Ilyen formában nem tudja kezelni nálam az összesítést. 
- 
			
			  oke senior tag Sziasztok! Hogy tudnám beállítani bizonyos cellákra, hogy csak "X"-et lehessen beírni? legördülő lista nélkül. 
- 
			
			  NGA addikt megvan 
- 
			
			  Delila_1 veterán válasz  HollyBoni
							
							
								#37330
							
							üzenetére HollyBoni
							
							
								#37330
							
							üzenetéreBeállítod az oszlopodat szöveg formátumúra a cellaformázásnál. Az első cellába (A1) beírod: 1-1 
 Ezt egérrel lehúzva automatikusan nő a kötőjel utáni szám. Mikor elérted az utolsó értéket, alá 2-1-et írsz, és megismétled a fenti lehúzást.Mikor mind kész, a B1 cellába beírod a képletet =A1&".jpg"Beírás után a cellán állva a jobb alsó sarokban lévő kis fekete négyzeten duplaklikk végig másolja az összes A oszlopban lévő adat mellé a képletet. Most kijelölöd a B oszlopot, Ctrl+c-vel másolod. Marad a kijelölés, jobb klikk, Irányított beillesztés, Értéket. Az A oszlopot törölheted. 
- 
			
			  HollyBoni veterán Sziasztok! Nagyon kezdő Excel-es vagyok, kéne egy kis segítség. Van egy termék adatbázis (szerűség) amit webshopba szeretnék beimportálni. A képeket előre feltöltöm a tárhelyre, aztán az Excel táblázatban ha beírom a nevüket akkor a webshop összerakja a kettőt. A gond az, hogy kb. 10 kép tartozik egy termékhez, és több száz termékről van szó, szóval ha most egyenként elkezdem beírogatni Excel-be a kép neveket akkor sosem leszek kész. A képek nevei megegyeznek a cikkszámmal. Mivel több kép van ezért így mentettem le őket: 1-1, 1-2, 1-3, 1-4, 1-5 stb. Hogy tudnék generálni automatikusan egy sorozatot ami így nézne ki? 1-1.jpg|1-2.jpg|1-3.jpg (mondjuk elmegy 15-ig) (következő cella lefele) 2-1.jpg|2-2.jpg|2-3.jpg stb stb. Persze jöhet bármi jobb megoldás is.  
- 
			
			  Kasya nagyúr Az Excelben megterveztem egy rácshalmazt, amit szeretnék ráhelyezni egy képre. A gondom az, ha a rácsozatot ki is mentem, nem png-be teszi. Az Excelben pedig nem tudom a kepet hatterbe helyezni, hogy a racsozat legyen eloterben. 
 Mit tudnek teni?
 Vagy forduljak inkabb a photshop fele?
- 
			
			  smallmer őstag Sziasztok, Szeretnék tőletek kérni egy kis segítséget. Van 3 munkafüzetem és mindhárom első oszlopában ugyanazoknak az adatoknak kellene lennie(csak szöveg), viszont van mindegyikben 250 sor. Nem szeretném egyesével végignézni, hogy megegyezik-e, ezért szeretném kérni a segítségeteket, hogy van-e valami megoldás, beépített függvény ami megvizsgálja?  köszönöm szépen  
- 
			
			Üdv! Adott egy excel táblázat melyen be van állítva a lapvédelem és a szerkeszthető tartomány. A szerkeszthető tartományon belül működik a másolás, a beillesztés, de a kivágás nem. 
 Lehet valahogy a kivágást is engedélyezni?Ja és még valami. 
 Minden felhasználónak engedélyezve van a sorok törlése, de mégsem engedi bekapcsolt lapvédelem esetén.
- 
			
			  TomMusic őstag Sziasztok, 
 Adott egy SZUMHA függvény:=SZUMHA(B1:B50;"*macska*";C1:C50)
 ahol ugyebár aC1:C50-ben lévő azon értékeket adja össze, ahol aB1:B50megfelelő sorában szerepel a macska szó (helyesebben: ha a cella tartalmazza a macska szót). Ez eddig oké is, viszont kellene még egy feltétel, hogy ne szerepeljen a "kutya" szó. Tehát csak akkor vegye bele a szummázásba a sort, ha a cellában szerepel a "macska", de nem szerepel a "kutya" szó.
 A valóságban más szavak vannak, csak az egyszerűség kedvéért írtam ezeket. 
 Előre is köszönöm!
- 
			
			  Madwe nagyúr Sziasztok, az alábbiban kérnék segítséget, feltételes formázásnál nem jöttem rá hogy kéne, de gondolom ebből makró lesz? Merrefele induljak?  Adott a b és c sora felül, ami mögött értékek lesznek. 
 Ha az alsó részen szelektálva van egy sor, aminek megadott oszlopa A B vagy C értéket tartalmazza, akkor a felső sorok között azt a sort töltse ki vmi színnel...Köszi! 
- 
			
			  AMDPista tag Sziasztok! Segítségeteket szeretném kérni: Az első oszlopban ponthatárok vannak. A második oszlopban az értékelt jegy. Azt szeretném, ha a piros cellába beírom, hogy hány pontot kapott, akkor a sárga cellába írja be a jegyet  köszi 
- 
			
			  Zola007 veterán nem excel, de ha van köztetek könyvelő vagy munkajogász, tudna nekem egy kérdésben segíteni privátban?  
- 
			
			  the radish senior tag Makróval hogy lehetne azt megoldani, hogy azA1:A200tartományban törölje pl. a "ford" kifejezést?Előre is köszönöm.Megoldva... 
- 
			
			  edari őstag Sziasztok 
 Makróban szeretnék segítséget kérni. Sorokat kéne csoportosítanom 6000 soron keresztül. Azonban nem egyszerű a dolog, mert nem fix sorokat kell csoportosítani. Mutatok egy példát: Annyi a lényeg, hogy 2 kategória (Fő és al), és azt kéne csinálnia a makrónak hogy az alkategória alatti sorokat csoportosítja. Mivel váltakozó sorokban helyezkednek el az adatok, ezért annyi a támpont hogy az alkategóriás sorok mindig félkövérek (a fő kategóriák pedig félkövér és dőltek, de ez most nem is annyira lémyegeg). 
 Ezt megleht egyáltalán oldani makróval?
- 
			
			  Fferi50 Topikgazda válasz  the radish
							
							
								#37304
							
							üzenetére the radish
							
							
								#37304
							
							üzenetéreSzia! Fontos apróságok: valtozo$=Range ("C1")
 A C1 cella értékét teszi a valtozo$ nevű változóba!
 Ha ez nem felel meg a Range meghatározás szabályainak, akkor hibát okoz.
 Ha a C1 cella tartalmazza a kijelölés végének a címét, akkor Delila megoldása jó.Ha magát a cellát, mint objektumot szeretnéd a változóba tenni, akkor set valtoz=Range("C1")Ebben az esetben a helyes kijelölés: Range("A1",valtoz).SelectÜdv. 
- 
			
			  Delila_1 veterán válasz  the radish
							
							
								#37304
							
							üzenetére the radish
							
							
								#37304
							
							üzenetéreNincs mit.  
- 
			
			  Delila_1 veterán válasz  the radish
							
							
								#37302
							
							üzenetére the radish
							
							
								#37302
							
							üzenetéreRange("A1:" & Range("C1").value).Select
- 
			
			  the radish senior tag Sziasztok! Szeretnék egy kijelölést makróban végrehajtatni, de úgy, hogy a kijelölés alsó sora változó érték legyen. DIM valtozovaltozo$=Range ("C1")Range("A1:valtozo$").SelectHogy lehetne ezt helyesen megoldani? Előre is köszi. 
- 
			
			  föccer nagyúr válasz  dellfanboy
							
							
								#37299
							
							üzenetére dellfanboy
							
							
								#37299
							
							üzenetéremármint szöveggént van megadva? Segésdtáblával, ami tartalmazza, hogy melyik szöveg milyen jegynek felel meg. Utána simán az átlagba beágyazni az fkeres függvényeket. =ÁTLAG(Fkeres();Fkeres();Fkeres()) 
Új hozzászólás Aktív témák
- Vezetékes FEJhallgatók
- Futás, futópályák
- Asustor NAS
- sziku69: Szólánc.
- TrainStation 2
- Milyen egeret válasszak?
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- BestBuy topik
- Luck Dragon: Asszociációs játék. :)
- Kodi és kiegészítői magyar nyelvű online tartalmakhoz (Linux, Windows)
- További aktív témák...
- LG 48C4 - 48" OLED evo - 4K 144Hz - 0.1ms - NVIDIA G-Sync - FreeSync - HDMI 2.1 - A9 Gen7 CPU
- GYÖNYÖRŰ iPhone SE 2020 128GB Black -1 ÉV GARANCIA - Kártyafüggetlen, MS3582, 100% Akksi
- BESZÁMÍTÁS! Asus H370-A i5 9600K 16GB DDR4 512GB SSD RTX 2060 Super 8GB Zalman T7 Zalman 500W
- ÁRGARANCIA!Épített KomPhone i9 14900KF 64GB RAM RTX 5090 32GB GAMER PC termékbeszámítással
- Bomba ár! HP ProBook 450 G5 - i3-7GEN I 8GB I 128GB SSD I 15,6" FHD I HDMI I Cam I W11 I Garancia!
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Promenade Publishing House Kft.
Város: Budapest
 
						 
								 
							 
								 
							 
							 
								 
							 
								 
							 
								
 
								 
								 
							 
								 
								
 
								 
							 
								 
							 
							 
								

 
							 
								 
								 
							 köszi!
 köszi! 
							

 
								 
							 
								 
							

 
							
 
							 
								 
							 
								 
 


 
							
 
								 
								 
								 
							
 
								 
							 
								 
							 
								 
							 
								 
								 
							
 
								 
							 
								 
							


 
								 
								 
								 
							
 )
 ) 
							
 
							
