-
IT café
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
-
Hyper84
csendes tag
-
vigyori78
őstag
Sziasztok!
Ebben tudna valaki segíteni ?
( Office 2007 )
Köszönöm[ Szerkesztve ]
-
Delila_1
Topikgazda
válasz Carasc0 #23585 üzenetére
Gondolom, a rengeteg adat hosszú időn át gyűlt fel. Az egyes sorokban lévő képletek frissülése hosszú időt vesz igénybe. A helyedben azokat a képleteket, függvényeket szüntetném meg, amiknek az eredménye már biztosan nem változik, például az előző évi adatoknál.
Ezt az irányított beillesztéssel szüntetheted meg, ahol a képleteket tartalmazó cellákat másolod, és irányítottan, értékként ugyanoda beilleszted.
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 m.zmrzlina #23600 üzenetére
Egyszerűbben is meg lehet oldani az oszlopok törlését.
Sub OszlopTorles()
Dim oszlop As Integer
For oszlop = ActiveSheet.UsedRange.Columns.Count To 1 Step -1
If Cells(1, oszlop) >= "S01" And Cells(1, oszlop) <= "S099" Then
Columns(oszlop).Delete Shift:=xlToLeft
End If
Next
End SubSorok, oszlopok törlésénél mindig az utolsó helytől indulunk az első felé.
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
őstag
válasz vigyori78 #23602 üzenetére
Szia!
Húzás kikapcsolása: Application.CellDragAndDrop = False
Az egérkattintás kikapcsolása:
A munkafüzet eseménykezelőjében:
dupla kattintás
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel =True
End Subjpbb egérgomb
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Cancel=True
End SubÜdv.
-
D5
aktív tag
Sziasztok!
Nekem egy olyan függvény kellene, ami egy számokat (lehet azonos tartalmú) tartalmazó oszlopot rangsorol.
Pl.: A1: 3; A2: 3; A3: 1; A4: 2, és ekkor a függvény a B oszlopban a következőket adja: B1: 1; B2: 1; B3: 3; B4: 2.
Sorba rendezni azért nem szeretném, mert több oszlop van egymás mellett, és és nekem csak a sorrend kellene mindegyikből, vagyis ne változzon a cellák helye. Remélem, sikerült érthetően leírnom...
Előre is köszönöm a segítségeteket!
Üdv.:
D. -
Fferi50
őstag
Szia!
Nézd meg a sorszám függvényt. Ha azt beírod a B oszlopba, megmondja neked, hogy az A oszlopban levő szám hanyadik a sorrendben, növekvő vagy csökkenő sorrendet is választhatsz.
=sorszám(A1; $A$1:$A$100;0) növekvő sorrend szerinti helyet mutatja, ha az utolsó paraméter 1 akkor csökkenő sorrend szerinti helyet.
Figyelj rá, hogy a második paraméter dolláros legyen.Üdv.
-
slashing
senior tag
válasz Fferi50 #23608 üzenetére
Én ezt vagyis 2013 már a sorok függvényt használom a sorszámozáshoz ha olyan táblázat van amit mondjuk rendszerszeresen úgy kell bővíteni hogy sorbeszúrással.
=SOROK(A$2:A2) itt kezdődik mondjuk a sorszámozás lehúzom amíg kell aztán ha közben be kell szúrni egy új sort akkor az alatta lévők automatikusan egyel nagyobbat fognak kapni és csak a beszúrt sorra kell lehúzni a képletet, nem kell a teljes oszlopon A4-től indulva újra képletezni.
-
mexel
veterán
Sziasztok! Már elolvastam párszor amit itt írtatok, de mégsem sikerül: Excel 2007-ben a táblázatomban szeretnék mindent nagybetűre állítani. Hiába próbálom a Nagybetű függvénnyel, nem sikerül. Pontosan leírná valaki hogyam csináljam hogy jó legyen?
( vajon miért nem lehetett a többi sok ezer beállítás közé egy olyan kapcsoló hogy "kisbetű<>nagybetű"? )
[ Szerkesztve ]
-
slashing
senior tag
a nagybetű függvény úgy működik hogy megadod a képletben melyik cellát akarod nagybetűsre alakítani, ennyi. Ha van egy kész táblázatod és minden kisbetűs cellát át akarsz alakítani nagyra akkor Macró kell hozzá, ez a Microsoft példája ráhttp://support2.microsoft.com/kb/291323
Miért nem lehet? Szerintem azért mert mindenki be tudja írni eleve naggyal is. Vagy ha mondjuk véletlen átalakítasz mindent nagyra de aztán mégis kicsi kell vissza alakítod de akkor meg minden mondat vagy minden első szó is kicsit lesz akkor meg az a baj hogy azt nem lehet megcsinálni és miért nincs arra is egy kapcsoló...
[ Szerkesztve ]
-
Delila_1
Topikgazda
A függvény neve NAGYBETŰS.
Van egy másik, a TNÉV, ami a hivatkozott szöveg minden szavának első betűjét nagyra-, a többit kicsire állítja. Ez neveknél hasznos.
A függvényeket "lehúzva" tudod az összes cellában nagybetűsre cserélni a szöveget. Ezután irányított beillesztéssel rámásolhatod a függvényt tartalmazó cellák értékét az eredeti cellákra.
[ 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.
-
mexel
veterán
Nem megy. Ha kijelölöm a nagybetűs függvénnyel a cellát amiben kisbetűs szöveg van, az eredmény az lesz hogy körkörös hivatkozás, stb, majd 0 lesz az eredmény, vagy éppen akármi mást csinál. Valamiért nem tudom használni. Beírom hogy pl "=NAGYBETŰS(I69)" akkor nem jó.
Csak egy cellával tudom úgy megcsinálni, hogy beírom hogy "=NAGYBETŰS(ezt kellene átalakítani)" akkor ez az egy cella nagybetűs lesz, de a többire ha ráhúzom vagy másolom akkor mindenhová ezt írja be. -
mexel
veterán
-
mexel
veterán
Na jól van, nem foglakoztama dologgal. Oszloponként átmásoltam a Word-be és ott beállítottam a nagybetűt majd visszamásoltam. Gyors volt és egyszerű. Ettől függetlenül még megpróbálom megcsinálni excelben mert nem hagy nyugodni a hülyeségük. ( miért kell függvénnnnyel ezt megvalósítani. Akkor ennyi erővel a dőlt betű vagy a félkövér is lehetne függvénnyel Rendben hogy legyen függvény, ha módosítjuk a szöveget a cellában akkor jó lehet, de egy sima átalakításhoz elég feleslegesnek tűnik, ugyanolyan kis állítási lehetőség kellene mint a word-ben, nem hiszem hogy nehéz lett volna átrakni.)
-
Delila_1
Topikgazda
Az Excel nem szövegszerkesztő, azért nem az ilyen formaságokra van kihegyezve.
Vegyük, hogy a kisbetűkkel írt szövegeid az A2:A10 tartományban vannak.
Egy üres oszlop 2. sorába, pl. B2-be beírod a képletet: =NAGYBETŰS(A2)
Ezen a cellán állva keret látszik a cellán, a jobb alsó sarkában egy kis fekete négyzettel. Az egérrel erre a négyzetre mutatsz, ekkor az egérmutató kereszt alakú lesz. A bal gombbal "megfogod", és lehúzod a B10 celláig. Végig lemásoltad a képletet az adataid mellé.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
m.zmrzlina
senior tag
válasz Delila_1 #23618 üzenetére
Én tudom, hogy olyan vagyok mint Móricka akinek mindenről AZ jut az eszébe de ez tényleg csak pár sor makró. Feltéve ha nincsen képlettel előállított cellaérték mert a képletet felül fogja írni a cellaértékkel. Bár ha a Word-ös megoldás működött akkor ez is fog.
Sub nagybetu()
For Each cella In Selection.Cells
If Not IsEmpty(cella) Then
cella.Value = UCase(cella.Value)
End If
Next
End Sub -
Delila_1
Topikgazda
válasz m.zmrzlina #23619 üzenetére
Ez teljesen korrekt, ám a kérdezőnek a képlet másolásával is gondja van.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
csferke
senior tag
Sziasztok!
Ha már a "nagybetűs" témáról van szó, lenne 1 kérdésem.
Hogyan lehet megadni egy cella formátumában (Custom format), hogy a beírt betűk NAGYBETŰK legyenek?
A cellában vegyesen vannak betűk és számok. Angol Excel 2007.köszi
-
Delila_1
Topikgazda
válasz csferke #23622 üzenetére
Tudtommal nem lehet ezt a formátumot megadni, de m.zmrzlina makrójával a kijelölt területen könnyedén átállíthatod a formátumot.
Programozó: 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
válasz csferke #23622 üzenetére
Érvényesítéssel lehet játszani hogy csak nagybetűs szöveget engedjen beírni mondjuk, egyéni cellaformátummal nem tudom hogy megolható-e....
excel 2013, valószínű hogy 2007-ben is jó
érvényesítés
pl.: =AZONOS(A1;NAGYBETŰS(A1))de valami munklaphoz rendel eseménnyel elvileg megolható lehet hogy automatikusan nagybetűs legyen
csak elképzelés:target = UCase(target.Value)
[ Szerkesztve ]
-
Fferi50
őstag
válasz vigyori78 #23620 üzenetére
Szia!
Az egérrel való húzás letiltása lehetséges a beállítások között is, makró nélkül. Excel 2010-ben a speciális beállítások között (a kitöltőjel használatának és a cellák egérrel húzásának engedélyezése.
De az egérklikkeket csak makróval lehet tiltani, ezért makróbarát (xlsm) formában kell menteni.
Üdv.
-
Mittu88
senior tag
Ha excelben létrehoztam egy active-x nyomógombot, amihez makrót rendeltem, azt ki lehet rakni mondjuk asztalra? Vagy valahogy lehet ikont létrehozni, ami egy adott fájlban makrót futtat?
-
Delila_1
Topikgazda
válasz Mittu88 #23626 üzenetére
2007-től így tehetsz ki ikont.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
mexel
veterán
Köszönöm a segítségeket!
-
m.zmrzlina
senior tag
válasz m.zmrzlina #23633 üzenetére
Az "A" munkafüzet két eseményében lévő makró. Természetesen lehet cizellálni őket (főleg az _Open-t) de az elv az ez.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
Dim wb As Workbook
mappa = ThisWorkbook.Path & "\"
For Each wb In Workbooks
If wb.Name <> ThisWorkbook.Name Then
wb.SaveAs Filename:=mappa & wb.Name
wb.Close
End If
Next wb
Application.DisplayAlerts = True
End Sub
Private Sub Workbook_Open()
Workbooks.Open ThisWorkbook.Path & "\B.xlsx"
Workbooks.Open ThisWorkbook.Path & "\C.xlsx"
End Sub -
Mr.Scofield
újonc
Hali mindenkinek!
Lenne egy olyan problémám, hogy van egy 2 munkalapból álló munkafüzetem és az első munkalapon csak az adatok szerepelnek 20 db Név (A oszlop),Kor(B oszlop),Foglalkozás(C oszlop).
A második munkalapon pedig csak egy panel 3 szövegmezővel (Név,Kor,Foglalkozás).
Na már most azt szeretném elérni, hogy az első munkalapon lévő adatok a második munkalapon lévő megfelelő szövegmezőben megjelenjenek.
Kezdetben az első rekord adatai legyenek láthatóak ezekben.
Legyen Következő és Előző gomb, amelyekkel értelemszerűen navigálhatunk! Ha elérjük az utolsó rekordot a Következő gombra nyomva a legelső rekord mezői jelenjenek meg! Hasonlóan, az első rekordnál az Előző gombra nyomva a legutolsó rekord mezői jelenjenek meg!Valakinek van valamiféle megoldása?
Válaszaitokat előre is köszönöm! -
Fferi50
őstag
válasz Mr.Scofield #23635 üzenetére
Szia!
A második oldalra tegyél fel egy userformot a megfelelő vezérlőkkel (cimkék, parancsgombok, spinbutton) és írj hozzá megfelelő megjelenítő makrót.
Üdv.
-
Fferi50
őstag
válasz Mr.Scofield #23637 üzenetére
Szia!
A formot már megvan? Akkor tegyél fel legalább egy képet róla, hogy lehessen látni, mi van benne.
A makró elvi vázlata:
a rekordokat számolja egy változó
amikor megjeleníted a userformot (activate exemény), a rekordszámláló változó legyen egy, utána meghívsz egy olyan eljárást amelyben kitöltöd az első szövegmezőt az A oszlop rekordszámlálónak megfelelő sorú cellája értékéve, a másodikat a B oszlop ugyanazon cellája értékéve, a harmadikat a C oszlop ugyanazon cella értékével (rekordbetöltő).
amikor a következő gombot megnyomják (gomb_click esemény) megnézed, hogy a rekordszámlálód elérte-e a huszat. Ha igen, egyre állítod, ha nem növeled eggyel. utána meghívod a rekordbetöltő eljárást.
amikor az előző gombot megnyomják (gomb_click esemény) megnézed, hogy a rekordszámláló érte egy-e, ha igen, húszra állítod, ha nem, akkor csökkented eggyel. utána meghívod a rekordbetöltő eljárást.A rekordsorszámot megadhatod egy publikus változóban, akkor minden eljárás használhatja, amelyik a form kódlapján van.
Üdv.
-
slashing
senior tag
válasz Mr.Scofield #23637 üzenetére
Makró nélkül is majdnem meglehet csinálni csak nem teljesenolyan lesz olyan mint ahogy leírtad. (elején végén nem fog visszaugrani)
A második lapra beszúrsz egy léptetőnyílt űrlapvezérlő elemet. Cellacsatolásnak megadsz egy olyan cellát amit biztosan nem fogsz használni kezdőértéknek meg 1-et adsz.
Oda ahova nevet szeretnéd megjeleníteni oda meg csinálsz egy indirekt hivatkozást:
=INDIREKT("Munka1!A"&F19)
Ebben a képletben az F19 az a cella amit megadsz a léptetőnyíl cellacsatolásának. Így az alapértéke a celládnak a Munka1 A1 lesz a nyilakkal lépkedve meg változik a Név. A másik két oszlopra meg elég egy sima fkeres függvény is...
valahogy így: [link]
[ Szerkesztve ]
-
Delila_1
Topikgazda
válasz Mr.Scofield #23637 üzenetére
Harmadik megoldás, nem userform, de nem is makró nélkül.
Nem írtad az Excel verzióját, ezért 2003-ban írtam meg, azt mindegyik érti.A Kiírás lapon a kitöltendő mezők nem textboxok, csak formázott cellák.
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
őstag
válasz Mr.Scofield #23637 üzenetére
Szia!
Még egy lehetőség makró nélkül:
A második munkalapnak azt a celláját, ahová a nevet szeretnéd látni, kijelölöd, majd az Adatok- érvényesítés menüpont alatt az érvényesítés legyen lista, a forrása pedig az első munkalap név oszlopának értékes cellái. (még jobb, ha ezt a cellatartományt elnevezed és csak a nevet írod be).
A két másik adatot tartalmazó cellát fkeres függvénnyel tudod kitölteni.
Ennek is az a hátránya, hogy magától nem fordul vissza. Viszont a listát akár egészében is láthatod a kiválasztás során.Üdv.
-
Delila_1
Topikgazda
válasz Mr.Scofield #23641 üzenetére
3 féle választ kaptál, amiből már az újonnan feltett két gomb makróját kikövetkeztetheted.
Módosításnál a textboxok (cellák?) értékeit beviszed az adatokat tartalmazó cellákba
Sheets("Munka1"). Range("A" & sor)=TextBox1Törlésnél sheets("Munka1").Rows(sor).Delete Shift:=xlUp
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
őstag
válasz Mr.Scofield #23641 üzenetére
Szia!
Akkor ez így mégis makró lesz a Userformhoz. és a törlést is meg kell valósítanod.
Üdv.
-
slashing
senior tag
De ezt az Access alapból tudja emlékeim szerint, minden makró nélkül stb... nélkül.
-
Mr.Scofield
újonc
Makróval kell mindenféleképpen megoldanom.
Delila_1 - szuper neveket sikerült alkotnod!
Köszönöm szépen mindenkinek a segítséget, így már meg fogom tudni oldani![ Szerkesztve ]
-
Mr.Scofield
újonc
válasz Mr.Scofield #23647 üzenetére
Már megvan.
-
wwhy
veterán
Egy kis SOS segítségre lenne szükségem:
Adott 8-10 oszlop , 70-80 sor, csak számok.
Mindegyiket ugyanazzal a számmal kellene megszorozni, és az a lényeg, h minden cella értéke természetesen az új értéket kapja meg, a régit felülírva.
Hogyan lehet/lehet-e ezt valahogy megoldani, hogy ne kelljen minden cellát egyesével átírniELADÓ <<narancs Honor Magic5 Ultimate>> <<Újszerű, doboz, minden kellék>>
-
Delila_1
Topikgazda
Új hozzászólás Aktív témák
- Székesfehérvár és környéke adok-veszek-beszélgetek
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- A fociról könnyedén, egy baráti társaságban
- Milyen légkondit a lakásba?
- Súlyos adatvédelmi botrányba kerülhet a ChatGPT az EU-ban
- Napelem
- Milyen okostelefont vegyek?
- Fallout 4
- Renault, Dacia topik
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- További aktív témák...
- Vírusirtó, Antivirus VPN kulcsok
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
- Canva Pro előfizetés - 1 éves
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!