-
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
-
félisten
-
mr.nagy
tag
válasz Fire/SOUL/CD #9301 üzenetére
Igen a te kódodat be tettem egy üres munkafüzetbe kipróbálni. Bemásoltam amit megadtál a VB szerkesztőbe az adott laphoz. Innen indítva hozza ezt a hibát amit írtam. A hiba üzenet a kép kiválasztása után jön elő.
HMNote10Pro
-
mr.nagy
tag
válasz mr.nagy #9302 üzenetére
Közben találtam egy megfelelő kódot, közzé teszem hátha másnak is jó lesz:
Sub Insert_Pic()
Dim URL As String
URL = Worksheets("Munka2").Range("A1").Value
Range("A5").Select
ActiveSheet.Pictures.Insert(URL).Select
Selection.ShapeRange.LockAspectRatio = msoFalse
Selection.ShapeRange.Height = 140
Selection.ShapeRange.Width = 200
Selection.ShapeRange.Rotation = 0#
End SubMinden esetre köszönöm Fire a segítséged!
HMNote10Pro
-
scott_free
senior tag
excel-guruk segítségét kérném:
- adott egy tartomány A1:A4-ig, ill. egy másik A5:A8-ig. hogyan lehet azt megoldani, hogy automatikusan bővítse az első tartományt, ha beszúrok egy sort az A4 alá? (tehát hogy megváltozzon a két tartomány A1:A5-re és A6:A9-re? /amúgy csak össze kell adni a bennük lévő számokat/)
úgy meg tudom csinálni, hogy SZUM(A1:A5)-A5, mert ilyenkor az A4 alá beszúrt cellát is beveszi, de biztosan van ennél egyszerűbb megoldás is.- azt hogyan lehet megcsinálni, hogy egy összeadásnál csak pl. minden második oszlopot adjon össze?
-
Cuci3
tag
válasz scott_free #9304 üzenetére
Elsőre van megoldás, de nem javaslom:
=+SZUM(INDIREKT("A1:A"&SOR(A5)-1))
Ezzel az indirekttel rakom össze a belős képletet (A1:A4). Ha ezután beszúrsz egy sort, akkor arrébb ugrik a szum képlet. Viszont ezzel azt sem lehet látni, hogy mit akarunk összeadni.Másodikra pedig egy még csúnyább képlet (az A1:A5 tartományból azokat adom össze, melyek a páros sorban vannak):
=+SZUM(HA(MARADÉK(SOR(A1:A5);2)=0;A1:A5;0))
Miután a cellába beraktad, utána nyomd meg egyszerre a Ctrl + Alt + Enter billentyűkombót.Ez utóbbi szumha függvénnyel nem akart menni, de egyszerűbb feltétel esetén azt javaslom.
-
scott_free
senior tag
hm, köszi.
bonyolítanám egy picit még a helyzetet:
lehet, hogy egy ez már programozás, de megoldható egy ehhez hasonló struktúra-rendszer kezelése és bővítése az excellel?
értelemszerűen az egymás alatti szintek összetartoznának, egy-egy tartományt képeznének.
(a bennük lévő adatok összeadódnának - tehát az 1-be beletartozna minden 1-gyel kezdődő sor, az 1.2-be az 1.2-vel kezdőd sorok, stb.)manuálisan mindezt meg tudom csinálni, de automatizálható-e egy ilyen táblázat? bővíthetővé tehető-e úgy, hogy pl. egy új sor felvitelénél egy legördülő menüből ki lehetne választani, hogy hova, melyik sor alá tartozna és akkor oda is tenné be? (pl. föl szeretnék vinni egy új sort 1.3-ként, akkor elég lenne kijelölnöm azt, hogy az 1-hez tartozzon, és automatikusan beteszi oda)
nem tudom, mennyire érthető ez így?
-
perfag
aktív tag
válasz scott_free #9306 üzenetére
Nem programozás kell ide, hanem csoportosítás. Ha tudsz angolul, itt pont arról van szó amit kérsz. 2007-es Excel: Adatok menü, Tagolás csoportban nézz utána (csoportosítás, tagolás)
-
Heno1974
csendes tag
syasztok.tudna nekem segítteni valaki??
sub szürés ()For k = 1 To 2000
Let x = ActiveCellActiveCell.Offset(1, 0).Range("A1").Select
Let y = ActiveCell
If y = "" Then
GoTo TestforBlank
End If
If x = y Then
Selection.EntireRow.Delete
ActiveCell.Offset(-1, 0).Range("A1").SelectEnd If
Next k
TestforBlank:
End suba K val áll i hibával,
szürni szeretnék 2003 excelbe, hogy az ismétlődéseket távolítsa el .
azt is meg kéne adni, hogy ha nincs adat akkor fejezze be a szürést.
valahogy igy kellene asszem:
For k <> "null"
ha jól tudom.
számokat kéne szürnöm, de K nál kiáll hibával[ Szerkesztve ]
-
Cuci3
tag
Aki esetleg Excel 2010-et használ + PowerPivot kiegészítővel próbálkozik Oracle adatbázist elérni, azt légyszi szóljon már! Valahogy nem megy a konfigurálás.
-
Heno1974
csendes tag
mailcím ahova küldjem??
a V1F es a makró -
Salvador20
őstag
Sziasztok, egy olyan problémám van, hogy a ripeten töltettem ki egy kérdőívet, és ezt a kódtáblát bevittem excelbe, majd a hosszú kódokat lecseréltem 1,2,3,4 stbre, hogy spss nyelni tudja. De itt van a nagy gond. A kimásolt kód elé és mögé a program rakott egy szóközt, emiatt az spss nem ismeri föl. Hogy tudnám excelben kollektíven kiszedni az összes szóközt a számok közül? Van majdnem 9 személy, mindegyikhez 19 kérdés, nincs energiám bepötyögni vagy kitörölgetni excelből a szóközöket. van valami egyszerűbb megoldás?
Remélem érthető volt, hogy mi a problémám. Válaszotokat előre is köszönöm 2010-es excelBe Faster, be Smarter, or Cheat!
-
Delila_1
Topikgazda
válasz Salvador20 #9320 üzenetére
Az =trim(a1) kiszedi az A1 cella elejéről és végéről a szóközöket, a közbülsőket meghagyja.
A trimes adatokat utána irányítottan, értékként beilleszted az eredeti helyükre.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 Salvador20 #9322 üzenetére
Bocsi.
Ha a szóközös adatod pl. az A1 cellában van, akkor egy üres cellába beírod a függvényt -> =TRIM(A1)
Ebben a cellában már a 'szóköztelenített' név látszik.
Ha egymás alatt, vagy mellett vannak a nevek, másolod a trimes függvényt (azt biztosan tudod, hogy kell).Kijelölöd, és másolod a függvényeket tartalmazó cellákat, ráállsz az első, szóközös cellára, jobb klikk, irányított beillesztés, 'Értéket' opció. A függvényeket tartalmazó cellákat törölheted.
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 Salvador20 #9324 üzenetére
Szivi.
Tetszik a jelmondatod.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Geryson
addikt
Mesterek! Igazából inkább egy banki kérdésem van, de tuti Excellel ki lehet számolni és szerintem ez nektek nem túl hosszú idő. Egy teljesen rendhagyó (azaz egyenletes, nem türelmi idős) 25 éves annuitásos törlesztésnél a 12 évben mennyi hozzávetőlegesen a fennmaradó tőkerész? Szerintem olyan 80% körüli, de nem tudom hogyan lehetne kiszámolni.
Megvettem 2 Excel könyvet, ma nekiesem és majdnem olyan ügyes leszek egyszer, mint Ti!
Delila_1: nem válaszoltál...
Rinderkennzeichnungsfleischetikettierungsüberwachungsaufgabenübertragungsgesetz
-
Vizes Tomi
tag
Üdv
Egy láma kérdés. Van egy tankolásokról szóló listám. A részösszeg képzéssel összesítettem kártyaszám szerint. Na most ezt az összesített táblázatot szeretném átmásolni egy másik munkalapra úgy, hogy ne nyissa szét ezeket az összegzéseket.
Tudom, hogy egyszerűen meg lehet csinálni, de most nem jut eszembe, és minden ötletemet végigpróbáltam.köszönöm
V Tomi
-
Delila_1
Topikgazda
válasz Vizes Tomi #9329 üzenetére
A tagolásra gondolsz?
Ha igen, a teljes sorokat jelöld ki, Ctrl+c, másik lapon Ctrl+v.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Cuci3
tag
válasz Geryson #9326 üzenetére
A keresett függvény a PRÉSZLET és RÉSZLET. Előbbi az annuitásos törlesztés tőkéjét adja vissza adott időpontban, utóbbi az annuitás konkrét törlesztőjét.
Ha havi törlesztést akarsz, akkor az éveket meg kell szorozni 12-vel, a kamatot meg osztani 12-vel.
Ez szerintem csak valami speckós, "Az Excel függvényei" könyvben lesz benne. -
Delila_1
Topikgazda
válasz Vizes Tomi #9332 üzenetére
Szívesen.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
félisten
"Ez szerintem csak valami speckós, "Az Excel függvényei" könyvben lesz benne."
Ezt mire érted, mármint a PRÉSZLET és RÉSZLET-re?
Ahhoz nem kell speckó könyv elég a Súgó-t használni (Pénzügyi függvények)Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
pirit28
csendes tag
Sziasztok !
Egy kis segítségre lenne szükségem.
Adott egy Excel file ezen belül egy lap minek neve "LOC" tele van adatokkal, nevekkel és számokkal.
A c-2 től sorba a cx-2-ig helyezkednek el a nevek.Szeretnék egy makrót adni ehhez a laphoz, ami rá tudna keresni az egyes nevekre ill. névrészletekre ,hogy megtaláljam az általam keresendő nevet,és mindezt az adott lapon belül levő parancsgomb segítségével szeretném végrehajtani.Egy a probléma, hogy ezen nevek alatt hivatkozások vannak amelyeket a CTRL+F gombnyomás és keresést követően nem találok meg. Ehhez szeretném egy hozzá értő segítségét kérni.Mivel a nevek nem ÁBC sorrendben helyezkednek el így a dolgom kicsit nehézkes és a keresés sok időt vesz igénybe.A válaszokat és a segítséget előre is köszönöm. -
m.zmrzlina
senior tag
válasz pirit28 #9335 üzenetére
Valami ilyesmire gondolsz?
Private Sub CommandButton1_Click()
Cells(2, 3).Activate
Do Until ActiveCell.Value = ""
amitkeres = InputBox("Add meg a keresni kívánt nevet, vagy név részletet!", "Keresés", amitkeres)
Cells.find(What:=amitkeres, After:=ActiveCell, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Activate
Loop
End SubInputboxban bekéri a keresendő karaktersorozatot és végigkeresi a C sort az utolsó névig úgy, hogy minden találatnál megáll. <Enter>-rel tudsz a következő találatra ugrani.
Szerintem a munkalapra elhelyezett parancsgombos indítás nem a legcélszerűbb (ennél a megoldásnál biztosan nem). 2007-ben a Gyorsindítás eszköztárba tennék egy parancsgombot, korábbiaknál új menüpontot tennék a menübe.
Melyik Excel verziót használod?
[ Szerkesztve ]
-
félisten
válasz pirit28 #9335 üzenetére
Nem teljesen értem a problémát, mivel a sima keresés,a hiperhivatkozás szövegében is keres, illetve a Listába mind gomb segítségével meg azt jelölhetsz ki, amit csak szeretnél. [link]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
pirit28
csendes tag
válasz m.zmrzlina #9336 üzenetére
Szia m.zmrzlina !
Köszönöm a gyors választ, és a megoldást a kérésemre.
Sajnos a cégnél csak 2002 és 2003-as Office-ok vannak ezek frissítésére nincs mód.
A kód amit írtál tökéletesen megfelel , nem is kellene ennél több de ha tudnád még ezt egy kicsit cifrázni azzal, hogy csak a 2-es sorban keresse a neveket, és minden egyes újabb név keresésekor a 2-es sor legelejéről kezdje a keresést.Még annyi lenne hogyha pl:; elgépelem a nevet ami az adott lapon nem szerepel akkor megáll run-time 91-es hibával.De egyébként így is használható.Köszönöm !! :-) -
pirit28
csendes tag
válasz Fire/SOUL/CD #9337 üzenetére
Szia !
Egyébként én sem értem, hogy miért nem tudok sima keresést használni a nevek megtalálásához. Az egyes cellák ill. nevek alatti függvény INDEX függvénnyel van megoldva. Normál keresést követően az üzenetem "A Microsoft Office Excel nem találja a keresett adatot"
-
m.zmrzlina
senior tag
válasz pirit28 #9338 üzenetére
Ha egy név csak egyszer szerepel a listában akkor lehet ez egy megoldás:
Sub find()
eleje:
Cells(2, 3).Activate
amitkeres = InputBox("Add meg a keresni kívánt nevet, vagy név részletet!", "Keresés", amitkeres)
On Error GoTo uzenet
Cells.find(What:=amitkeres, After:=ActiveCell, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Activate
If ActiveCell.Row <> 2 Then
Cells(2, 3).Activate
GoTo uzenet
End If
Exit Sub
uzenet:
MsgBox ("A keresett név nincs a listában.")
GoTo eleje
End SubNincs bolondbiztossá téve még, csak próbálkozom.
-
Cuci3
tag
válasz Fire/SOUL/CD #9334 üzenetére
A két függvényre értettem. És értem én, hogy a súgóban benne van, de oda csak akkor jut el az ember, ha hallott már ezekről a függvényekről, vagy elkezdi végigpörgetni a pénzügyi függvényeket. Extra esetben meg megvett, vagy valahogy talált a neten egy ilyen könyvet és végiglapozgatta.
Én meg persze elvégeztem egy közgáz egyetemet, hogy ismerjem ez a két függvényt. -
pirit28
csendes tag
válasz m.zmrzlina #9341 üzenetére
Szia !
Gratula !
Kérdésedre válaszolva, igen egy név csak egyszer szerepel a listában.
Köszönöm szépen a fáradozásaidat. Az utóbbi kód amit írtál ,tökéletesen megfelel arra amire én szeretném használni. Sok fáradságtól mentettél meg.A további szép napot kívánok !
-
m.zmrzlina
senior tag
válasz m.zmrzlina #9341 üzenetére
Nekem is volna egy kérdésem a #9341-ben lévő kóddal kapcsolatban a nálam okosabbakhoz.
Miért van az, hogy ha olyan karaktersorozat kerül az inputboxba ami nincs a munkalapon, de még csak nem is része egyik létezőnek sem akkor az első próbálkozást rendben lekezeli a hibaüzenettel, a másodiknál viszont kiakad a 91-es hibával?
-
m.zmrzlina
senior tag
válasz m.zmrzlina #9345 üzenetére
Még az előzőhöz...
Ha viszont a 2.soron kívül lévő cella tartalomra keresek akkor rendben működik (adja a hibaüzenetet) akárhányszor ismétlem meg a keresést.
[ Szerkesztve ]
-
Delila_1
Topikgazda
válasz m.zmrzlina #9346 üzenetére
A feltételhez ezt írd annak lekérdezéséhez, hogy az aktív sor páros-e?
If ActiveCell.Row Mod 2 <> 0 Then
A sorszám 2-vel történő osztásának a maradékát vizsgálja. Páros sorszámnál ez 0.
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 #9348 üzenetére
Szokásomhoz híven félreértettem a dolgot, azt hittem, csak a páros sorokban kell keresni.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
Új hozzászólás Aktív témák
- EAFC 24
- Autós topik
- Kerékpárosok, bringások ide!
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- Xbox Series X|S
- Androidos tablet topic
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- World of Tanks - MMO
- PlayStation 5
- Háztartási gépek
- További aktív témák...
- Eladó Steam kulcsok kedvező áron!
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- Bitdefender Total Security 3év/3eszköz! - "Tökéletes védelem most kedvező áron..."
- Eredeti Windows, telepítéssel! Digital Doctor Számítógép Szerviz
- Vírusirtó, Antivirus VPN kulcsok