-
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
-
válasz
Delila_1
#4617
üzenetére
Rájöttem, talán az a gond,hogy közben módosítottam a táblázatot. Cellákat szúrtam be.
Az emailben amit küldtél tökéletesen működik, csak azt a táblát tovább fejlesztettem..Akkor most helyesen így nézne ki a makró?
Sub rejt()
Dim lap As Variant
lap = Array("Kaschieren", "Näherei")
For ll = 0 To 1
Sheets(lap(ll)).Select
For sor = Range("G65536").End(xlUp).Row To 11 Step -1
If Cells(sor, 7) = "" Then GoTo Köv
If Cells(sor, 7) = 0 Then
Range("G" & sor).Select
Selection.EntireRow.Hidden = True
End If
Köv:
Next
Next
End SubSub felfed()
Dim lap As Variant
lap = Array("Kaschieren", "Näherei")
For L = 0 To 1
Sheets(lap(L)).Select
Rows("11:100").Select
Selection.EntireRow.Hidden = False
Range("C1" & sor).Select
Next
End SubA G oszlop 11-es sorától kellene elrejteni, vagy felfedni.
Helyesen módosítottam?
Vagy a felfeden még kell alakítani? -
válasz
Delila_1
#4593
üzenetére
Bocsi,hogy csak most, de lejárt a munkaidő és most itthon folytatom.
A helyzet az, hogy a benti gépen Excel 2003 van, és azon nem akar elindulni. Mindig nyöszörög hogy indítsam el a makrót, amit megteszek, de a gomb nem működik.
itthon 2007 van ezen engedélyezem és szó nélkül tökéletesen megy.
Nem értem, mi a gond.Továbbá ha vannak ilyen táblázataim akkor hogyan tudok ilyen gombot ( makrót ) csinálni erre a feladatra?
-
-
válasz
Delila_1
#4559
üzenetére
Még egy kérdésem lenne:
-megtudom-e oldani ,hogy egy Excel táblázatban csak bizonyos cellák legyenek levédve.
-ha ezt a táblázatot odaadom a kollégámnak, aki az adatfeldolgozást végzi, és nem egy nagy Excel guru, akkor csak azokba a cellákba tudjon beírni ahová szüksége, a többihez ne férjen hozzá, vagy jelszó kelljen azok módosításához.
A probléma az, hogy elkészítek egy jó táblázatot, működik minden rajta, de Ő ide oda átmásolgat képleteket és max.2 hét és vége a táblázatnak.
A lapvédelem levéd mindent, azokat a cellákat is ahová Ő a termelt mennyiséget kellene beírja...
Ha létezik megoldás megosztanád velem?
-
Garffi
tag
-
BenJoe80
senior tag
válasz
Delila_1
#4505
üzenetére
Várjál... azt hiszem meg van a megoldás! Tehát...mi (ill. én a tanácsodra) ugye írtunk olyan ki téteket is hogy:
- az Anyagköltség egy oszlopába (ez legyen R) "=D4&F4"
ill.
- a Szabásjegyzék egy oszlopába (ez meg legyen O) "=C5&E5"Ezeket aztán soronként le kellet írni minkét munkalapon, hogy stimmeljen az adott sorra az állítás.
Na mármost ezeket én átírtam a következőre:
- "=(SZUM(Anyagköltség!D4-(Anyagköltség!E4*0,5))&
(SZUM(Anyagköltség!F4-(Anyagköltség!G4*0,5))))"
ill.
-
"=(SZUM(Anyagköltség!D5-(Anyagköltség!E5*0,5))&
(SZUM(Anyagköltség!F5-(Anyagköltség!G5*0,5)))"Mindjárt kipróbálom, hogy megy-e... de azért küldöm a mappát is.
-
BenJoe80
senior tag
válasz
Delila_1
#4489
üzenetére
Delila_1 nagyon-nagyon szépen köszönöm a segítségedet. Működik minden szépen, ahogy szeretném.
Azt szeretném megkérdezni, hogy a "$" jelnek és a "DARABTELI"-nek mi a jelentése/jelentősége ill. mit is csináltunk, hogy az lett ami lett?
A táblázat működik, csak éppen lövésem nincs, hogy mit-miért csináltam. Ezt el tudnád magyarázni?Még egyszer köszönök mindent!
-
BenJoe80
senior tag
válasz
Delila_1
#4483
üzenetére
Juhúúú!!! Működik! Gyönyörűen működik!
Ezer köszönet! Azt hagy kérdezzem még meg, hogy az megoldható-e, hogy ezen az oszlopok (Szabásjegyzék C és E oszlopai) 20 sorára - teszem azt 5-24-ig (tehát C5-C24-ig ill. E5-E24ig) - legyen ez az állítás igaz, viszont ne érzékelje egy ismétlésnek, ha ugyanazon oszlopok, másik 4 sorában - pl. C28-C31-ig és E28-E31-ig - esetleg szerepelnek egyazon számok.
Ugyanakkor ezen négy soros oszlopokon belüli ismétlődéseket természetesen jelezze - bár ez működik. Azt hogy lehet megoldani, hogy C ill. E 5-24-ig és 28-31-ig két oszlopban lévő azonos számokat ne vegye ismétlődésnek?Tudom, kezdek szemtelenedni... szóljon nagysága, ha kezdek az idegeire menni...
-
BenJoe80
senior tag
válasz
Delila_1
#4479
üzenetére
Húúú... ezt most rázzuk össze!
1. a Szabásjegyzéknél is végig be kell írni az adatok mellé mint az Alkatrészjegyzéknél?
2. az előbbi kérdés a G5 tartományra vonatkozóan...
3. C5: D5 tartomány kijelölése. Ez alatt azt érted, hogy amolyan kisiskolás módon kijelölöm a két rubrikát egérrel és utána formázok?
4. a feltételes formázásnál, hova írod be ezt a képletet? Nekem van ott három rubrikám: egyszer cella/képlet értéke, aztán nagyobb mint, kisebb mint, nagyobb vagy egyenlő... stb. (ezek variációi) és végül ahova írhatnám a $-os képletet, de be kell írnom oda, hogy >1?
-
BenJoe80
senior tag
válasz
Delila_1
#4474
üzenetére
Nem egészen... ezek szerint rosszul írtam le. Tehát:
Van egy munkafüzetem, benne két munkalap: "Alkatrészjegyzék" és "Szabásjegyzék". Az elsőben megadom az alkatrész hosszát (1500) egy rubrikában - legyen D4 ill. a szélességét (500) egy másik rubrikában - F4.
Ezt a két adatot átvitetem a "Szabásjegyzék" munkalapra - a következő képlettel =Alkatrészjegyzék!D4 ill. =Alkatrészjegyzék!F4 - két másik rubrikába. Tehát az 1500 megjelenik a C5, az 500 az E5 rubrikában a "Szabásjegyzék" munkalapon (köztük van az "x" a D5 rubrikában).Na mármost, ha én - dolgozva az "Alkatrészjegyzék" munkalapon - több olyan alkatrész méretet adok meg ami megegyezik az 1500×500-as formátummal (figyelem! fordítva már nem igaz; tehát 500×1500 nem u.a.) akkor az össze 1500×500-as méret pirossal jelenjen meg a "Szabásjegyzék" munkalapon (lehetőleg csak az 1500 és az 500).
Ezen adatok oszlopszerűen helyezkednek el egymás alatt, tehát a formázást valszeg a C és az E oszlopra kell ki írni.
Ez megoldható-e? Különben ha kell, elküldhetem privátba az egész munkafüzetet, ha akarod.
-
Macros
csendes tag
válasz
Delila_1
#4459
üzenetére
http://kepfeltoltes.hu/view/090204/excel.01_www.kepfeltoltes.hu_.jpg
Itt vagy egy kép a táblázat egy módosított változatáról.
Nem tehetem be a munkámmal kapcsolatos táblázatot, ezért csináltam egy ilyet hogy érthető legyen.
Tehát a sorban levő számokat kellene összeadogatni de csak az eddig leírtak szerint.
-
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!
-
#4427
mimi_bacsi
tag
Delila_1
#4424
-
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.) -
-
vakondka
őstag
válasz
Delila_1
#4375
üzenetére
Köszi.
Ez elsőre jónak tűnt, de ha jól látom akkor végülis annyit csinál, hogy minden cikkszám elé tesz 3db nullát.
Viszont nyílván van olyan cikkszám ami előtt eredetileg csak 1, 2, 3, 4 nulla van, vagy éppen egy sincs.Az a baj, hogy ezt a csv fájlt én generálom ki PHP-ből, de akárhogyan csinálom, akkor is eltűnnek a nullák, mikor excel-ből megnyitom....
-
netboy
senior tag
-
Gabcsika
tag
válasz
Delila_1
#4363
üzenetére
Köszönöm tökéletesen működik. Már csak kérdés. A példámban a C oszlopot kézzel készítettem. Nincs arra mód (fgv., bár inkább gyanítom macro), hogy a duplikátumok úgy legyenek kiszűrve (maradva a példámnál), hogy a C oszlopba a macro vagy fgv. mindent csak egyszer írjon be és emelett is működőképes maradjon ez az egész?
Köszi szépen!
-
Gabcsika
tag
válasz
Delila_1
#4360
üzenetére
Köszi, de szerintem félreértetted. Mutatom a dolgot:
Itt az A oszlopban vannak azok, amelyek között vannak duplikátumok, B oszlopban vannak a hozzárendelt adatok. C oszlopban már minden csak egyszer szerepel A oszlopból, D oszlopban pedig, ha duplikátum van, akkor azok összege, ha nincs, akkor a hozzátartozó szám.
Persze ez kézzel van készítve.
-
frankie!
őstag
válasz
Delila_1
#4328
üzenetére
Azt hiszem aza a baj, hogy én a digramot nem adattartománnyal adtam meg, hanem egyenként kattintgattam az "Y és X" értékeket, amik szét vannak sorba. Tehát minden kattintásom "címe" tartalmazza a lap nevét. Azt hiszem úgy lehetne csak megoldani, hogy képlettel egy egybefüggő oszlopba rendezem az adatokat és csak ezt a tömböt másolgatom lapról lapra, meg a diagramot.
-
frankie!
őstag
válasz
Delila_1
#4321
üzenetére
Köszönöm a segítséget!
Sajnos nem tudom használni erre a célre, mert fontosabb lett volna egy nagyobb táblázat minden eleméhez hozzárendelni valami, és másolás-beillesztéssel az egyértelmű hozzárendelést követve módosultak volna az értékek. AZ fkeres fv sem segít ahogy nézem. -
#4308
FragMaster
addikt
Delila_1
#4307
FragMaster
addikt
válasz
Delila_1
#4307
üzenetére
Kisebb módosításokkal meglett ennek a segítségével egy másik, hasonló feladat is.
Function KORA(Születési_dátum)
If VarType(Születési_dátum) = 0 Then
KORA = "Nincs adat": Exit Function
End If
If VarType(Születési_dátum) <> 7 Then
KORA = "Dátumot kérek": Exit Function
End If
KORA = Round((Date - Születési_dátum) / 365)
End Function
Sub Start_KORA()
Születési_dátum = ActiveCell.Value
KORA Születési_dátum
ActiveCell.Offset(, 1).Value = KORA(Születési_dátum)
End SubA " If VarType(Születési_dátum) <> 7 Then " sorban nem vagyok biztos a 7-es számban, de működik.
-
lúzer
veterán
válasz
Delila_1
#4304
üzenetére
nálam is vacakolt, új lapon ment, betudtam a sok próbálkozásnak
egyébként ha színezek egy cellát nem frissül, de ha lehúzom a cellát, másolom a színt, és utána írok be értéket akkor igen - persze tartományon belül!
érdekes....illetve frissül, ha bárhol beírok egy számot a tartományba
-
#4290
Fire/SOUL/CD
félisten
Delila_1
#4287
válasz
Delila_1
#4287
üzenetére
Hali!
Nem olvastam vissza, de ez az "értékes tartomány" alatt, arra gondolsz, hogy pl van A1-be valami, meg C10-be valami, és ezt a tartományt kellene kijelölni?
Csak nem Neked kell megkeresni az első meg az utolsó használt cellát? Ha erre gondolsz akkor egyszerűen így: UsedRange.Select
Fire.
UI: Bocsi, ha félreértettem, ja és a bizalmat meg köszönöm!
-
-
#4267
FragMaster
addikt
Delila_1
#4266
FragMaster
addikt
válasz
Delila_1
#4266
üzenetére
Megtörtént
Közben haladok, a csibés eddig kész van, már csak át kell erőszakolni függvénnyé és kell bele hibaellenőrzés
Sub HETES()
Dim hetek As Integer
Dim szüldátum As Date
Do
szüldátum = CDate(InputBox("Csirke kikelt?", "Csirkekor"))
Loop Until szüldátum < Date
hetek = (Date - szüldátum) / 7
MsgBox ("Csibekora: " & hetek & " hét")
End Sub
hanem a nagy X-re
Új hozzászólás Aktív témák
Fferi50- HIBÁTLAN iPhone 12 Pro 256GB Pacific Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3107, 100% Akkumulátor
- Apple iPhone 13 Pro Max 128GB, Kártyafüggetlen, 1 Év Garanciával
- HIBÁTLAN iPhone 13 256GB Red -1 ÉV GARANCIA - Kártyafüggetlen, MS3735, 91% Akkumulátor
- BESZÁMÍTÁS! ASUS H510M i5 10400F 32GB DDR4 512GB SSD RX 6600XT 8GB ZALMAN M4 Cooler Master 650W
- GYÖNYÖRŰ iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3427, 100% Akkumulátor
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Promenade Publishing House Kft.
Város: Budapest