- gban: Ingyen kellene, de tegnapra
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- btz: Internet fejlesztés országosan!
- bambano: Bambanő háza tája
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Magga: PLEX: multimédia az egész lakásban
- Carlytoo: Pánikszindróma #3
- sziku69: Szólánc.
-
LOGOUT
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
-
Delila_1
veterán
válasz
Salex1
#20386
üzenetére
Nem néztem kellő figyelemmel a haloványan bevitt makródat, amiből kiderül, hogy nem külön userformon, hanem a füzet egy lapján van a textbox. Ebben az esetben a textboxon jobb klikk, makró hozzárendelése. Megjelenik a makróidat tartalmazó párbeszéd ablak, ahonnan kiválasztod a megfelelőt.
-
Delila_1
veterán
válasz
Salex1
#20390
üzenetére
Duplaklikk a textboxon. Ad egy makrót Private Sub TextBox1_Change() címmel, és End Sub-bal. A lap tetején jobbra a legördülőben a Change esemény látszik, ahelyett kiválasztod az AfterUpdate eseményt. A Sub és End Sub sorok közé másolod át a kész makródat, a Change eseményhez adott két sort törölheted.
-
Delila_1
veterán
A lenti makróval megoldható.
A Const utvonal = "C:\Temp\" sort írd át a saját mentési útvonaladra.A makrót arról a lapról kell indítanod, ahol a másolandó sorok vannak. Az utvonal változóba beírt mappába menti a fájlokat, mindegyiket azon a néven, ahányadik sorban megtalálta az adatokat.
Gondolom, fejléc is van a lapodon, ezért minden új füzet első sora a fejléc lesz, második pedig a kiválasztott adatsor. Addig fut a makró, míg az A oszlopban talál adatot.Sub UjFuzetek()
Dim sor As Long, WB As Workbook, WSE As Worksheet, WSM As Worksheet
Const utvonal = "C:\Temp\"
Application.ScreenUpdating = False
Set WB = Workbooks(ActiveWorkbook.Name)
Set WSE = WB.Sheets("Munka1")
sor = 2
Do While Cells(sor, "A") <> ""
Workbooks.Add
Set WSM = ActiveWorkbook.Sheets("Munka1")
WSE.Rows(1).Copy WSM.Range("A1")
WSE.Rows(sor).Copy WSM.Range("A2")
ActiveWorkbook.SaveAs Filename:=utvonal & sor & ".xlsx"
ActiveWorkbook.Close
sor = sor + 1
Loop
Application.ScreenUpdating = True
MsgBox "Kész van a soronkénti mentés", vbOKOnly + vbInformation
End Sub -
Salex1
őstag
válasz
Delila_1
#20359
üzenetére
Köszi! kicsit átalakítva tudtam csak működésre bírni, biztos van egyszerűbb mód, de legalább működik.
Range("K1").Value = ActiveSheet.Shapes("Text Box 558").TextFrame.Characters.Text
Range("L1").Select
ActiveCell.FormulaR1C1 = "=CONCATENATE(""*"",RC[-1],""*"")"
Selection.AutoFilter Field:=2, Criteria1:=Range("L1").TextLehetséges valahogy a makrót hozzárendelni a textbox elhagyásához, vagy a textboxban az enter megnyomásához?
-
benito86
csendes tag
Sziasztok,
Excel 2010-ben a következő feladatot szeretném megoldani:
Ha egy üres oszlop tetszőlegesen kiválasztott cellájába 0-t írok az alatta lévő cellákba mindig 1-el nagyobb számot írjon be automatikusan. Pl: A oszlp: 10-es sorába 0-t írok töltse fel az A oszloop 11es sorát 1-el, 12es sorát 2-vel etc.Ezt a feladatot hogyan tudom megoldani a legegyszerűbben?
Köszönöm:
-
#20384
Delila_1
veterán
antikomcsi
#20382
Delila_1
veterán
válasz
antikomcsi
#20382
üzenetére
Itt válaszoltam, kitettem egy füzetet hozzá.
-
psg5
veterán
Sziasztok!
Létezik-e megoldás (akár képlet, akár makró, akár külső program) arra, hogy:
Adott egy munkafüzetben többszáz sor, melyeket egyesével kellene (minden sort külön) egy új, excel munkafüzetbe menteni,de ne kézzel keljen kimásolgatni és elnevezni az új létrehozott fájlt. -
#20382
antikomcsi
veterán
antikomcsi
veterán
-
konyi79
addikt
Hali,
ismét itt kötöttem ki, de túl jók vagytok, ne kérjek segítséget!
Egy munkafüzet "E" lapjának "AB" oszlopát szeretném kitölteni a következő adatokból:
"E" lap "B" oszlopának adott cellájának tartalmát vizsgálja meg az "M" lap "F" oszlopában megtalálható-e. Fontos, lehet nem csak egy találat van, lehet több is. Ha van találat (egy), akkor a találati sor "K" oszlopának tartalmát kellene ide bemásolni. Erre kaptam már megoldást innen, de közben kiderült lehet több találat is. Ha több találat van, ez esetben a találati sorok "A" cellájának értékeit kellene vizsgálni, és amiben a legmagasabb az érték, annak a sornak a "K" értéke kell. Ha nincs találat, egyszerűen "nincs" szöveg.
Nem tudom ebből érthető-e mit akarok szűrni, ha van ötlet köszönöm előre is a segítséget. -
#20380
the radish
senior tag
the radish
senior tag
Sziasztok!
Meg lehet azt oldani, hogy a helyette függvénnyel két, vagy több szót is kicseréljek egy menetben?
Például:
A1: 56 alma 64 banán
B2: =HELYETTE(A1;"alma";"magyar");HELYETTE(A1;"banán";"déli")
-
Delila_1
veterán
Ebben a másolt füzetben csakis a másolt lapok vannak?
Ha igen, az új lap beszúrása
Sheets.Add.Name = "KW" & Worksheets.Count +1Beteheted egy változóba is a nevet
nev = "KW" & Worksheets.Count +1
Sheets.Add.Name = nevEbben az esetben a nev változóval hivatkozhatsz másoláskor a lapra.
-
Delila_1
veterán
válasz
misa479
#20371
üzenetére
A makróban a csillagokkal megjelölt sorban írd át a Munka1-et a saját lapod nevére, ami az adatokat tartalmazza.
Sub KulonLapra()
Dim felso As Long, also As Long, nev As String
Dim WF As WorksheetFunction, WS As Worksheet
Set WF = Application.WorksheetFunction
Set WS = Sheets("Munka1") '**************
WS.Activate
'Rendezés a B oszlop szerint
Range("A1").Select
Selection.CurrentRegion.Select
Selection.Sort Key1:=Range("B2"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
felso = 2
Do While Cells(felso, 1) <> ""
nev = Range("B" & felso)
also = WF.Match(nev, Columns("B"), 1)
Sheets.Add.Name = nev
WS.Activate
Rows(1).Copy Sheets(nev).Range("A1")
Rows(also & ":" & felso).Copy Sheets(nev).Range("A2")
felso = also + 1
Loop
End Sub -
misa479
csendes tag
Sziasztok egy nagy segítséget szeretnék kérni.Van egy számomra nem megoldható feladat.
A lényege az lenne, hogy van egy adatbázis. A második oszlop alapján leszűrve szeretném az értékeket külön fájlokba,vagy külön munkafüzetekbe menteni. Tehát a példánál maradva lenne Alma Körte és Barack.
Az alma csak egy sort tartalmazna, a körte 23 sort , a barack pedig a maradékot.
Próbáltam megoldani makrófelvétellel, de nem sikerült átírnom a kódot.
Előre is köszönöm a segítségeteket! -
vigyori78
őstag
Sziasztok.
Tudna valaki segíteni abban,hogy van egy táblázatom ami egyszerre 13 PC-n fut kb óránként töltik és mentik viszont van egy pc amin előjön egy olyan "hiba" ,hogy beír egy cellába akkor meg kéne jelennie a többi cellában egy értéknek de ez nem jelenik meg és ha ráment az excel-re akkor a többi pc-n is rossz lesz
Office 2007
-
Attas
aktív tag
Üdv!
Az lenne a feladatom, hogy egy munkafüzet1 GEN nevü lapját szeretném átmásolni egy munkafüzet2-be. Ezt megoldottam, de olyasmi kellene, (merthogy ezt hetente kellene megcsinálnom, ugyanazzal a lappal csak persze más adatokkal), hogy mikor legközelebb is átmásolom a munkafüzet2 -be kapjon egy új nevet. Mondjuk KW2 . Majd legközelebb KW3 ...stb
Így kapnék egy munkafüzetet KW1, KW2, KW3..stb nevü munkalapokkal.
Köszönöm a segítséget.. -
#20366
xPraetoriaNx
senior tag
xPraetoriaNx
#20362
xPraetoriaNx
senior tag
válasz
xPraetoriaNx
#20362
üzenetére
Megoldottam
=SZÖVEG(<kívánt átkonvertálandó mező, vagy képlet>/24;"[ó]:pp")
És akkor így 24 óránál nagyobb időintervallumokkal is működik.
-
Tiboy86
tag
Sziasztok!
Kérdésem a következő:Van egy excel fájl, van X sor és az első pár oszlopba szöveget kell írni, 4 oszlopba pedig képeket beilleszteni. Meg lehet valahogy oldani, hogy a képeket ne egyenként cseréljem le, hanem ha kijelölöm pl. sorrendben a beillesztendő képeket, akkor berakja a régi képek helyére a megfelelő sorrendben?
Köszönöm!
-
#20362
xPraetoriaNx
senior tag
xPraetoriaNx
senior tag
Sziasztok!
Egy olyan táblázattal van dolgom, ahol bár egész számokkal dolgozok, végeredmények (pl átlag) nem egész szám lesz, hogy konkrét példát említsek, valamire átlagnak "2,17 óra" jött ki. Ha csak átváltom idő formátumba, akkor Excel azt mondja, 4:03, ami azért "kicsit off". Van valami módja annak, hogy Excel nekem ebből a "2,17 órából" magától 02:10 jellegű formátumot adjon ki? -
Delila_1
veterán
válasz
Salex1
#20355
üzenetére
Rögzíts egy makrót úgy, hogy "gyalog" beviszed a kritériumot a megfelelő oszlophoz, majd a makróban írd át a feltételt a szövegdoboz értékére. Criteria1:=TextBox1.Text
Ilyesmi lesz:
Dim tartomany As Range
Set tartomany = Range("A1:D12")
tartomany.AutoFilter Field:=1, Criteria1:=TextBox1.TextItt a megadott tartomány első oszlopát (Field:=1) szűrtem.
-
Geryson
addikt
Sziasztok!
Adott egy 4000 sor hosszú lista, ami A és B oszlopokból áll. A sok-sok adatbevitel miatt az A oszlopban nagyon sokszor 2-5-10 ismétlés is található, ezeket szeretném kitakarítani.
- Hogy oldható meg az, hogy ezeket jelölje nekem? Tehát, hogy ne nekem kelljen végiggörgetni és jojózó szemmel kiszűrni, ha ismétlés van?
- Hogyan oldanátok meg azt, hogy ha ilyen van, akkor a B oszlopban található értékeket átlagolja (merthogy ez néha eltér)?Köszönöm előre is!
-
Attas
aktív tag
Sziasztok.
Még egy kérdés felmerült bennem. (persze kitudja mennyi van még a víz alatt)
Van egy makró, ami igazából csak makrókat hív meg pl:
Sub Össz()
Első
Második
Harmadik
Negyedik
End subAhoz kellene segítség, hogy ha pl a "Második" makró lefutásakor valamilyen feltétel nem teljesül, hogy tudom befejeztetni a "Össz" makró lefutását. Az megvan, hogy ha a másodikban if feltételekbe írt valami nincs meg akkor end sub. De sajna ettől még a Harmadik és Negyedik lefut.
Köszönöm a helpet -
Delila_1
veterán
-
bteebi
veterán
válasz
Delila_1
#20343
üzenetére
Működik!
Hálás köszönet érte! 
Igazából úgy is megy, ahogy először leírtad, valamit én ronthattam el.
Már csak egy dolgot nem értek: csak úgy működik, ha a Target.Address abszolút hivatkozással van megadva, tehát "$A$1". Se úgy nem megy, hogy "A1", se úgy, hogy Me.Range("A1"), és úgy se, hogy Sheets("Lista").Range("A1"). Nem kellene egyébként mindig lefutnia a makrónak, ha bármelyik lapon változik az A1-es cella? Nem teszi (és nekem így jó), de valahol logikusnak tűnne, mert elvileg akkor le kellene futnia, ha az A1-es cella változik. Vagy a private sub-ban lévő abszolút hivatkozás csak az adott lapon érvényes? (Igen, jól gondolod, sajnos nem értek hozzá
.) -
Delila_1
veterán
válasz
bteebi
#20342
üzenetére
Nálam csont nélkül végrehajtotta.
Próbáld meg, hogy a Lista laphoz ennyit rendelsz:Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Cimsor
End SubEgy modulba pedig ezt:
Sub Cimsor()
Dim lap%
For lap% = 1 To Worksheets.Count
If Sheets(lap%).Name <> "Lista" Then
Sheets(lap%).PageSetup.CenterHeader = "Szín: " & Sheets("Lista").Range("A1").Value
End If
Next
End Sub -
bteebi
veterán
válasz
Delila_1
#20333
üzenetére
Szia!
Nagyon köszönöm a segítséget
, egyelőre azonban valamiért még nem működik a kód. Azt írja, hogy a Range osztály Select metódusa hibás.Valamennyit javult a makróm, de ha az
If Target.Address = "$A$1" Then
sor volt megadva, akkor nem működött. Csak akkor futott le magától, ha a lentebb látható módon próbáltam:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Me.Range("A1")) Is Nothing Then Exit Sub
Application.EnableEvents = False
Sheets("Suzuki").PageSetup.CenterHeader = "Szín: " & Sheets("Lista").Range("A1").Value
'és ez a sor ismételve az összes lapra, de az elég gagyi
Application.EnableEvents = True
End SubEzt viszont nem tudtam úgy átírni eddig, hogy működjön. Pedig az ötleted tök jó, de valamiért nem megy. Kipróbáltam egy M$ honlapon lévő makrót is, de nem tudtam úgy átírni, hogy jó legyen (mondjuk az az összes lapra működne elvben, úgyhogy a te megoldásod jobb lenne):
Sub WorksheetLoop2()
Dim Current As Worksheet
For Each Current In Worksheets' Insert your code here.
Next
End SubDe ezt se tudtam úgy átírni, hogy működjön
. Ilyet próbáltam:Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Me.Range("A1")) Is Nothing Then Exit Sub
Application.EnableEvents = False
Dim Current As Worksheet
For Each Current In Worksheets
.PageSetup.CenterHeader = "Szín: " & Sheets("Lista").Range("A1").Value
'ez így hibás, valahogy máshogy kellene megadni, de ActiveSheet-tel se megy
Next
Application.EnableEvents = True
End SubVan ötleted, hogy mi lehet a probléma?
-
Attas
aktív tag
válasz
Delila_1
#20339
üzenetére
Ez vajon miért nem működik újfent?
Option Explicit
Sub TípusVálasztás()
Dim WÜM As Worksheet
Set WÜM = Sheets("Ütemidő műveletenként")
WÜM.Select
If WÜM.Cells(13, "C") = "x" Then UserForm1.Controls("AF10") = True Else UserForm1.Controls("AF10") = False
If WÜM.Cells(13, "D") = "x" Then UserForm1.Controls("AF20") = True Else UserForm1.Controls("AF20") = False
If WÜM.Cells(13, "E") = "x" Then UserForm1.Controls("AF30") = True Else UserForm1.Controls("AF30") = False
If WÜM.Cells(13, "F") = "x" Then UserForm1.Controls("AF40") = True Else UserForm1.Controls("AF40") = False
If WÜM.Cells(13, "G") = "x" Then UserForm1.Controls("AF50") = True Else UserForm1.Controls("AF50") = False
If WÜM.Cells(13, "H") = "x" Then UserForm1.Controls("AF60") = True Else UserForm1.Controls("AF60") = False
If WÜM.Cells(13, "I") = "x" Then UserForm1.Controls("AF70") = True Else UserForm1.Controls("AF70") = False
If WÜM.Cells(13, "J") = "x" Then UserForm1.Controls("AF90") = True Else UserForm1.Controls("AF90") = False
If WÜM.Cells(13, "K") = "x" Then UserForm1.Controls("AF100") = True Else UserForm1.Controls("AF100") = False
If WÜM.Cells(13, "L") = "x" Then UserForm1.Controls("AF110") = True Else UserForm1.Controls("AF110") = False
If WÜM.Cells(13, "M") = "x" Then UserForm1.Controls("AF120") = True Else UserForm1.Controls("AF120") = False
If WÜM.Cells(13, "N") = "x" Then UserForm1.Controls("AF130") = True Else UserForm1.Controls("AF130") = False
If WÜM.Cells(13, "O") = "x" Then UserForm1.Controls("AF140") = True Else UserForm1.Controls("AF140") = False
If WÜM.Cells(13, "P") = "x" Then UserForm1.Controls("AF150") = True Else UserForm1.Controls("AF150") = False
If WÜM.Cells(13, "Q") = "x" Then UserForm1.Controls("AF160") = True Else UserForm1.Controls("AF160") = False
If WÜM.Cells(13, "R") = "x" Then UserForm1.Controls("AF180") = True Else UserForm1.Controls("AF180") = False
If WÜM.Cells(13, "S") = "x" Then UserForm1.Controls("AF210") = True Else UserForm1.Controls("AF210") = False
If WÜM.Cells(13, "T") = "x" Then UserForm1.Controls("AF215") = True Else UserForm1.Controls("AF215") = False
If WÜM.Cells(13, "U") = "x" Then UserForm1.Controls("AF216") = True Else UserForm1.Controls("AF216") = False
If WÜM.Cells(13, "V") = "x" Then UserForm1.Controls("AF220") = True Else UserForm1.Controls("AF220") = False
UserForm1.ListBox1.List = WÜM.Range("CellTípusok").Value
UserForm1.Show
End SubEddig működött amíg a rövidítést nem alkalmaztam
Hibaüzenet " Method of 'range' of object'_Worksheet' failed -
nimmy001
csendes tag
Sziasztok,
Hogy lehet az, hogy adott egy makrós megosztott excel fájl, aminek utolsó mentése egy olyan éjjeli időpont, amikor éppen biztos, hogy senki nem dolgozott benne, és nem volt bekapcsolva egy olyan gép se, ami ezt a fájlt eléri? Előző nap végén minden remekül működött benne, másnap reggel már a fájl zárolt lett, és a makrókhoz se lehetett hozzáférni.
-
Delila_1
veterán
válasz
bteebi
#20329
üzenetére
A Lista laphoz kell rendelned a makrót.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lap%
If Target.Address = "$A$1" Then
For lap% = 1 To Worksheets.Count
If Sheets(lap%).Name <> "Lista" Then
Sheets(lap%).PageSetup.CenterHeader = "Szín: " & Sheets("Lista").Range("A1").Value
End If
Next
End If
End Sub -
Cheesy
őstag
Sziasztok!
Megoldást keresek a következő problémára:
Adott egy folyamatosan bővülő város-távolság mátrix a "varosok" munkalapon, valamint a "KM_elszamolas" munkalap. Utóbbi nem csak ennyiből fog állni természetesen, de itt az egyik kulcsképletet szeretném működésre bírni, ami a mátrixban szereplő sorok és oszlopok metszéspontjánál lévő értéket helyettesíti be, attól függően, hogy a A4 és B4 cellában mit választok a dropdown listából.
Az INDEX() képletet vizsgáltam, de nem bírtam működésre bírni... rossz helyen keresgéltem?
-
bteebi
veterán
Sziasztok!
Egy olyan makróra lenne szükségem, ami egy adott lap élőfejébe (többek között) egy másik lapon lévő cella tartalmát beleírja. Annyit már el tudtam érni (más példák alapján), hogy működjön, de csak úgy, ha manuálisan lefuttattam a makrót, és ha meg volt adva az összes fülnek a neve egyesével.
A példában legyenek a fülek: "Lista", meg mondjuk különböző autótípusok nevei ("Suzuki", stb.). A "Lista" lap adott cellájában (itt A1) lévő értéket szeretném beleírni az élőfejbe az összes fülön, a "Lista"-t leszámítva.
Sub Varos()
Sheets("Suzuki").PageSetup.CenterHeader = "Szín: " & Sheets("Lista").Range("A1").Value
Sheets("...").PageSetup.CenterHeader = "Szín: " & Sheets("Lista").Range("A1").Value
.
.
.
End SubMeg lehet úgy csinálni, hogy automatikusan (például az A1 cella tartalmának változására, vagy fül váltására) lefusson a makró az összes fülre? Kivéve persze a "Lista"-t, de ha csak ezen múlik, akkor annak a fejlécében is benne lehet, vagy akár a kód végén az is lehetne, hogy
Sheets("Lista").PageSetup.CenterHeader = ""
Tudnátok tanácsot adni az automatikus futtatásra, és esetleg arra, hogy ne kelljen minden fülre külön megadni a parancsot? Előre is köszönöm a segítségeteket!
-
#20328
stranger28
addikt
stranger28
addikt
Üdv!
Azt hogyan lehet megoldani, hogyha keresek egy oszlopban értéket, ne csak az első előfordulást kapjam meg, hanem az összeset? Lehetőleg új táblában.
Illetve úgy másolni néhány sort, hogyha módosulnak, akkor azon a helyen is az látszódjon, ahova másolódtak. Egyesével menne, de több van.Biztos alap dolgok, de eddig csak max-min-szum volt, amire használtam.
Köszi. -
lappy
őstag
válasz
Slownz
#20326
üzenetére
Szia!
Ezt biztos hogy így gondoltad? :"HA viszont B1 cella tartalmaz értéket, akkor B1cella értékét adja vissza, HA B1 cella értéke nem üres, akkor nézi C1 cellát is"
mert ez szerintem nem megvalósítható, csak akkor ha vmi kikötés van még hozzá pl: szám, vagy szöveg esetén -
Slownz
senior tag
Sziasztok!
Sajnos Excel-ben annyira nem vagyok otthon. A kérdésem az lenne, ha ezt a scriptet végre lehet-e benne hajtani:
HA B1 cella üres, akkor A1 cella értékét adja eredményül, HA viszont B1 cella tartalmaz értéket, akkor B1cella értékét adja vissza, HA B1 cella értéke nem üres, akkor nézi C1 cellát is. HA C1 cella üres, akkor B2-t adja eredményül, ha meg tartalmaz értéket, akkor C1-et.
Nagyon szépen köszönöm, aki segít nekem!
-
ztoldy
senior tag
Sziasztok!
Segítséget szeretnék kérni a következőben:
Adott egy excel munkalap, aminek A és B oszlopában tetszőleges értékek vannak. A két oszlop értékeit kellene összehasonlítani, hogy vannak-e egyező értékek és ha igen, akkor ezt jelezni, akár másik oszlopban.(A gépen office 2003 van, ha ez számít)
-
Rihard83
tag
Sziasztok!
Valaki tudna segíteni miért nem tudok Macrot csinállni?Már megnéztem az összes youtubeos videót és enable all macros-ra tettem a macro settings-et és az Activx-et és még mindig ott van a sárga felkiáltó jel és nem birok macrot rendelni a gombokhoz.Csak form controlokat tudok kitenni azokhoz nem tudok macrot rendelni, activex-ek meg szürkék és nem lehet őket használni.2007-es Excel. Remélem csődbe megy a microsoft ezzel a sza*os ki be kapcsolósdi baromságaival.
még a neheze hátra van hogy összehozzam amit akarok, erre még csak else tudom kezdeni...köszi előre is a segítséget
-
Julot
aktív tag
válasz
pdw_ph
#20315
üzenetére
Az alábbi dőltbetűs idézet alapján sikerült megoldanom, az index excel fórumjában egy kedves olvtárs adta az ötletet, és igaza volt! A szóköz nem is szóköz, csak annak látszott, ezért nem ment...
"Próbáld így:
A cellában kijelölöd azt a karaktert, amit ki akarsz szedni, másol, utána kilépsz a cellából.
A keresés/csere panelbe a kereséshez ctrl+v behozza a kimásolt részt.
A csere részbe "" vagy üresen hagyod. (Mivel valószínűleg nem szóköz az, amit szóköznek látsz.)
..és voilá, sikerült!
Azért köszönöm a ti segítségeteket is!
Jó éjt!
-
Julot
aktív tag
Sziasztok!
A segítségeteket szeretném kérni! Egy oszlopban 650 soron keresztül számok vannak, amivel számolni szeretnék, de a számok ezres értékenként szőközökkel vannak elválasztva tehát így néz ki: 112 897 654 254. Hogyan, mivel tudom egyszerűen, gyorsan átalakítani a számokat úgy, hogy számolni tudjak velük, ergo eltüntetni a szóközöket?
Köszönöm!
Üdv.:
Julot -
#20306
Delila_1
veterán
the radish
#20305
Delila_1
veterán
válasz
the radish
#20305
üzenetére
=DÁTUM(ÉV(MA())-1;HÓNAP(MA());NAP(MA()))
-
#20305
the radish
senior tag
the radish
senior tag
Van olyan függvény, amely az előző év, azonos hetének, azonos napjára mutat?
Konkrétan:
Fenti esetben úgy oldottam meg, hogy a feltétel = a mai nap - 364 nap, ez ugye a tavalyi hét azonos napjára mutat. Azonban ez már problémát jelent pl. szökőév esetén, arról nem is beszélve, hogy nem túl elegáns.
-
akipapi
tag
Sziasztok!
Tudnátok segíteni ebben a feladatban?
A segédtáblázat harmadik sorába határozza meg – függvény segítségével –, hogy mely megyében termelték a legnagyobb mennyiséget az egyes gyümölcsfajtákból! A megyék neve kerüljön a mennyiségek alá!
Info tanárom szerint AB.MEZŐ függvényt kell használni, de nekem nem jön össze.
Válaszokat előre is köszönöm.
.)
. Ilyet próbáltam:
Új hozzászólás Aktív témák
Hirdetés
Fferi50- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Játékkulcsok a legjobb áron: Steam
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7800X3D 32/64GB RAM RX 7800 XT 16GB GAMER PC termékbeszámítással
- Lenovo Thinkcentre M920t Tower/ M720s SFF / i5-8-9. gen/ WIN10-11/számla, garancia
- Samsung Galaxy S23+ 512GB, Kártyafüggetlen, 1 Év Garanciával
- Bomba ár! Dell Latitude 5510 - i5-10G I 8GB I 256SSD I HDMI I 15,6" FHD I Cam I W11 I Gari!
- GYÖNYÖRŰ iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3210, 96% Akkumulátor
Állásajánlatok
Cég: FOTC
Város: Budapest