Keresés

El kellett mennem otthonról, ha estig nem oldódik meg, akkor majd éjjel tudok vele foglalkozni.

Szia!

Az utolsó még szükséges sortól lefelé kijelölöd a végéig, majd törlöd.

Természetesen a sorok "újratermelődnek" mert mindig megmarad a munkafüzetben az eredeti sormennyiség.

Viszont ha után ismét megnézed, mi az utolsó cella, akkor már a ténylegesen használt sorra fog ugrani és nem a végére.

Viszont nem ártana megnézni, mi került abba az "utolsó" cellába, abból lehetne következtetni az előidéző okra.(Sajnos lehet "láthatatlan" karakter vagy formázás pl.)

Üdv.

Köszönöm. Lefuttattam, és valóban még rossz adatok jelennek meg a táblázatomba bemásolva, de szerintem nem a sorrend miatt, ugyanis a makró amely eddig feldolgozta, csak a nekem szükséges adatokat hagyja meg:

 'GYOMLÁLÁS
    'Oszloptörlés
    T = Array("LENX", "LENY", "LENZ", "MATERIAL", "NAME", "SUMMARY", "TIP", "A1", "A2", "B1", "B2", "HIV")
    uoszlop% = Sheets(Sheets.Count).UsedRange.Columns.Count
    For oszlop% = uoszlop% To 1 Step -1
        f = False
        For Tag% = 0 To 11
            If Sheets(Sheets.Count).Cells(1, oszlop%) = T(Tag%) Then
                f = True
                Exit For
            End If
        Next
        If f = False Then Columns(oszlop%).Delete Shift:=xlToLeft
    Next

A régebbi csv így nézett ki:

https://a.fajlkuldes.com/a5HGL5xHtYCs.csv

(A többi adatot jól másolja, ha minden igaz, és nem keveri össze, csak ez a három méret nem oké.)

Az "A" oszlopban vannak nálam az adatok a csv megnyitása után. A "B", "C" és "D" oszlopban pedig a makró által generáltak.

Én ha megnyitok az excelben egy CSV fájlt, akkor nálam az adatok soronként egy cellában lesznek. Nem szoktam szórakozni táblázattá alakítással, mert a nélkül is fel tudom dolgozni az adatokat.

Így én az általad küldött CSV fájlból indultam ki és az alapján dolgoztam fel az adatokat. Azaz megkerestem, hogy mely pozícióban vannak a lenx, leny és lenz adatok majd azokat átkonvertáltam mm-be a B, C és D oszlopokba.

Bár az a sejtésem, hogy neked ez így nem lesz jó. Ez után a hozzászólásod után. Lévén az adatok sem ott helyezkednek el, ahol nekem.

Köszönöm.

Ezt nem én hoztam létre, ezt így generálja egy szoftver.

Azért akartam makrót, mert átváltás után pont ugyanígy kell kinéznie a táblázatnak, mivel az átváltást követően egy régebben megírt nagyon bonyolult makró dolgozza fel.

Annyi történt, hogy ez a szoftver, most már nem mm-ben generálja az adatokat, hanem collban, és így nem tud a makró mit kezdeni vele.

Option Explicit

Public Sub atvalto()
Dim lenx, leny, lenz As Double
Dim lenxpoz, lenypoz, lenzpoz, templong, utolsosor As Long
Dim i, j As Long
Dim szoveg, cimsor As String
cimsor = Range("A1")
lenxpoz = InStr(1, cimsor, "LENX")
lenxpoz = CountChrInString(Left(cimsor, lenxpoz), ",")
lenypoz = InStr(1, cimsor, "LENY")
lenypoz = CountChrInString(Left(cimsor, lenypoz), ",")
lenzpoz = InStr(1, cimsor, "LENZ")
lenzpoz = CountChrInString(Left(cimsor, lenzpoz), ",")
utolsosor = ActiveSheet.Cells(ActiveSheet.Rows.Count, "A").End(xlUp).Row
Range("B1") = "LEN X in mm"
Range("C1") = "LEN Y in mm"
Range("D1") = "LEN Z in mm"
For j = 2 To utolsosor - 1
szoveg = Range("A" & j)

'X mérete
templong = 0
For i = 1 To lenxpoz
templong = InStr(templong + 1, szoveg, ",", vbTextCompare)
Next i
Range("B" & j) = Mid(szoveg, templong + 2, InStr(1, Mid(szoveg, templong + 2), ",") - 2)
Range("B" & j) = Range("B" & j) * 25.4

'Y mérete
templong = 0
For i = 1 To lenypoz
templong = InStr(templong + 1, szoveg, ",", vbTextCompare)
Next i
Range("C" & j) = Mid(szoveg, templong + 2, InStr(1, Mid(szoveg, templong + 2), ",") - 2)
Range("C" & j) = Range("C" & j) * 25.4

'Z mérete
templong = 0
For i = 1 To lenzpoz
templong = InStr(templong + 1, szoveg, ",", vbTextCompare)
Next i
Range("D" & j) = Mid(szoveg, templong + 2, InStr(1, Mid(szoveg, templong + 2), ",") - 2)
Range("D" & j) = Range("D" & j) * 25.4
Next j
End Sub

Public Function CountChrInString(Expression As String, Character As String) As Long
Dim iResult As Long
Dim sParts() As String

sParts = Split(Expression, Character)

iResult = UBound(sParts, 1)

If (iResult = -1) Then
iResult = 0
End If

CountChrInString = iResult

End Function

Minek ehhez makró? Az A2, B1, B2 (R,S és T) oszlopod úgyis üres, ezért oda írtam be a 25.4-el megszorzott adatokat, amit aztán lefelé húzhatsz. Neked is azt javaslom, hogy segédoszlopba tedd a mm adatokat.

Makrót írni is egyerú lenne, de felesleges, és zavarokhoz vezethetne. Ha egyszer lefuttattad, nem derűl ki a makró számára, hogy már a mm-ben megadott érték szerepel ott, ezért véletlen újrafuttatás esetén hibás értékek kerülnének a mm adatok helyére.

Más: A csv fájlban miért tettél idézőjelet az elejére, majd miért dupláztál meg minden idézőjelet? Ezeket ki kellett törölnöm, és csak ezután sikerült Excelbe beolvasni az adatokat. 

Köszönöm. Az utolsó cella az O1048553 -as. Valamiért bekerült több, mit 1 millió sor.

Hogyan tudom törölni? Kijelölés - Sorok törlése után sem tűnnek el a sorok. Ha csak a tartalmát törlöm DEL-lel, akkor is megmaradnak.

Talán ez jobb lesz: https://a.fajlkuldes.com/1EOiTveLkVfr.csv

Sziasztok!

Tudna írni nekem valaki egy makrót?

 A LENX, LENY, LENZ  -hez tartozó értékeket át kellene váltani egy makróval collról milliméterre, ilyen formátumra: "600 mm"

A táblázatban több tétel is szerepelhet mint három, de 300-tól nem szokott több lenni.

Minden más maradjon a régi formátumban.

link

Köszönöm.

Fferenc50 - köszönöm - próbálom.

Szia!

Több oka is lehet. Próbáld ellenőrizni a következőket:

1. A munkalapokon az utolsó cella hol található - F5 - irányított - utolsó cella. Ha ez nem a valós területen van, akkor a tényleges területtől lefelé és oldalra törölj ki minden sort majd oszlopot. Ez előforduhat pl. sorok/oszlopok beszúrása, majd törlése után. Hajlamos ottmaradni pl formázás, amit ráadásul egyébként nem is látsz.

2. A függvények nem hivatkoznak-e egész sorokra/oszlopokra (pl. A:A ). Mivel a munkalap sorainak és oszlopainak is nagy a száma, a képletek ottragadhatnak ahol nem is kellenének. Ráadásul a számolást is lassítja. Tudom, kényelmesebb(?) egész oszlopra hivatkozni, de célszerűbb egy olyan területet megadni, amely nagyjából megfelel a szökséges tartománynak.

3. A feltételes formázásokat is érdemes megnézni.

4. vagy 0 ha lehet, próbáljátok visszakövetni, hogy milyen művelet idézte elő a méretnövekedést, lefagyást. Akkor lehet pontosabb diagnózist adni.

Üdv. 

Sziasztok! Közös használatú hálózati mappában lévő Excel fájlokat több ember szerkeszti Office 2007 vagy Office 2010 verzióval windows 10 alatt. Időnként előfordul, hogy egy-egy fájl mérete közel 100-szorosára növekszik, ennek megfelelően a megnyitása, szerkesztése, mentése is lassú, esetleg le is fagy az Excel. Hogyan tudom kideríteni, hogy mi okozza a méretnövekedést, és hogy lehet "eltüntetni"? 

Az időnként készített biztonsági mentésből a közös munka miatt nem biztos, hogy az utolsó változat állítható vissza. 

Előre is köszönöm a segítséget.

Szia!

Az intervallumok határait feltöltöd egy oszlopban, mellette az ott érvényes árakat:

Ezután az FKERES függvény 4. paraméterét IGAZ (1) -ra állítod.

El kell döntened, hogy a felső határ esetén még az alatta levő vagy már az új sávban levő árat kell alkalmazni, azaz pl. pontosan 1 kilónál 500 Ft vagy már 1000 Ft az ár.

Ha így adod meg, akkor 1 kg-nál az 1000 forintos ár érvényesül. Ha viszont az 500 forintot szeretnéd érvényesíteni, akkor a határt emelni kell 101-re és így tovább.

Javaslom hozzá az FKERES súgójának az elolvasását.

Üdv.

Tisztelt Excel Guruk!

Az alábbi szeretem valahogy megoldani.

A oszlopban tömeg intervallum, 

0-100

100-200

200-300

stb

B oszlopban egy forintos érték

500 Ft

1000 Ft

2000 Ft

stb

 Másik táblázatban megrendelés tömegei szerepelnek (mondjuk C oszlop)

71,2 

105,8

256

stb

Hogy tudom azt függvénnyel megoldani, hogy az adott intervallumba eső tömeg érték esetén a függvény kiválassza hozzá a megfelelő forintos értéket?

Lehet, hogy a tömeg intervallumot két oszlopba kell írni kvázi: 

A          B

0          100

100       200

200       300

KÖszönet!

Szerintem megtaláltad a hiba okát. Én eddig nem használtam, ezért nem ismertem azt a lehetőséget, amire rámutattál, hogy a jobboldali nyilakkal lehet a jelmagyarázat sorrendjét a hozzátartozó adatoktól függetlenül beállítani. 
Azért meglepő, hogy egyáltalán miért merülhetett fel ez az igény.

Szia!

Valószínűleg a diagramon más a sorrendje az egyes évek adatainak. Próbáld meg a következőt:

Kiválasztod a 2023 évi "vonalat" adatot. Ezután a szerkesztőlécen megjelik az adatsor forrása:

pl. =ADATSOR(áram!$F$29;áram!$A$30:$A$186;áram!$F$30:$F$186;4) 

Ha 4 adatsorod van, akkor feltételezhetően a 4-es lesz a zárójel előtti szám. Ezt írd át itt a szerkesztőlécen 3 -ra és Enter. Ezáltal megváltozik a megjelenítési sorrend és jelmagyarázat sorrendje is.

Üdv.

valami ilyen? vagy félreértem?

Tudnál küldeni egy mintát, ahol látszanak a forrásadatok, valamint az adatfotrrás kiválasztásánál megjelenő lista?

Valahogy így, mivel a saját mintámon elképzelni sem tudom, hogyan oldhatnán meg, hogy két év felcserélődjön a jelmagyarázqatban. Hátha a te mintádból kiderül:

'reggelt! Van egy vonaldiagramom, ami 4 év havi forgalmi adatait jeleníti meg. Az "Adatforrás kiválasztása" ablakban jó a sorrend: 2021, 2022, 2023, 2024. A diagram jelmagyarázatában viszont 2021, 2022, 2024, 2023. Hogy rendezhetném át?

Azt próbáltad már, hogy beszúrod a lapra háttérként és a kívánt néhány cella kivételével az összes többit zárolod? Mondjuk lehet, hogy valami képszerkesztőben még ügyeskedni is kell a kép köré üres területek szerkesztésével a pontos pozícionáláshoz. A rácsvonalak ugye kikapcsolhatók, a cellaformázás pedig ad számos lehetőséget az aktív cellák megjelölésére.

Az én ötletem, hogy felrakod az antenna képét jobb oldalra, de úgy, hogy a változókat egy-egy betűvel helyettesíted. A képernyő bal részén ezeket szépen, egymás alatt bekéred a usertől. Kevésbé elegáns, mert plusz egy hivatkozás van értékenként, amit követnie kell a felhasználónak, de gyors eredményt ad.

Ha nem olyan a kép formátuma, hogy legyen rajta átlátszóság, akkor is meg lehet oldani.

Ha rákattintasz a képre, akkor a menü szalagon megjelenik a képformátum. Annak a legelső pontja a "Háttér eltávolítása". Ott ki lehet jelölni, hogy mi az a terület, amit átlátszóvá szeretnél tenni. Ha sok benne a vékony vonal, akkor kicsit nehézkes az Excelben megoldani.

Ilyenkor én GIMP-ben szoktam.
Ha megnyitod a képet szerkesztésre a GIMP-ben, akkor először hozzá kell adni a réteg átlátszóságot is. A varázs kijelölő eszközzel ki kell jelölni az eltávolítandó részeket. Én ennek olyan 20-as értéken szoktam állítani a "durvaságát", akkor elég jól kijelöli az elkülönülő hátteret. Majd ha jó a kijelölés, akkor delete gombbal törlöd a hátteret. Ilyenkor a GIMP-ben ez kockás háttérrel lesz jelölve. Utána simán kijelölheted az egészet és visszamásolhatod az Excelbe.

Ilyen képet "alakzatok" beszúrásával hoznál létre (minden részelt egy "alakzat"), majd ezeket csoportba foglalva, lehetne valamit kezdeni.

Néhány képformátum ismeri az áttetsző, transzparens színeket. Erre keress a google-ban: trasparent picture

Egérrel kattintani ugyan nem lehet a háttér cellákra, de kurzor billentyűkkel oda lehet mozogni és át lehet írni az értéket

Szia!

Én úgy látom, hogy kép mögötti cellába nem tudsz írni. Azon cella helyén, amelybe írni szeretnél, "lyukat" kell hagyni a képen, tehát azt a cellát nem fedheti le a kép! Ez nyilván könnyen megoldható, ha a kép szélei felé vannak az írni tervezett cellák, mert akkor szépen körül lehet vágni a képet, viszont a közbe - hátul levő cella esetében már szét kell vágni a képet és több darabban felrakni a cella kihagyásával.

Szerintem egyszerűbb lenne, ha a képet egy Userformra tennéd fel, arra lehet tenni Textboxokat és azok értékével lehet számolni, a textboxok értékét hozzá tudod kapcsolni egy cellához a ControlSource tulajdonsággal, ha változik a textbox értéke, változik a hozzá csatolt cella értéke is.

Üdv.

sziasztok. Lenne egy kérdésem. Hogyan lehetne egy képet úgy beszúrni az excelbe, hogy mögötte eg pár cella látszódjon, amelybe értéket beírva, akár képletre is bírható. 

Mire gondolok?

tehát a cellákba értéket írok be, s így a többi cellában a képlettel kiszámoltérték kerül

Már minden lehetőséget megnéztem, de nem jöttem rá, hogyan oldható meg.

Jajj ilyen nagy vigyor még az esküvőm napján sem volt a fejemen:)  

Megvan a hiba.

Sub Epit_Bont()

    Dim usor As Long

    Sheets("Summary").Columns("A:N").Delete Shift:=xlToLeft

    With Sheets("Sheet1")

        .Range("A1:M1").Copy Sheets("Summary").Range("A1")

        .Range("N1") = "Összefűzés"

        usor = .Range("A" & Rows.Count).End(xlUp).Row

        .Range("N2:N" & usor).FormulaR1C1 = "=RC[-1]&"" ""&RC[-8]"

        .Range("$A$1:$M$" & usor).AutoFilter Field:=13, Criteria1:="ÉPÍT"

        usor = .Range("A" & Rows.Count).End(xlUp).Row

        .Range("A2:M" & usor).Copy Sheets("Summary").Range("A2")

        .Range("$A$1:$N$" & usor).AutoFilter Field:=13

    End With

    Sheets("Summary").Select

    Range("N1") = "Bontási dátum"

    usor = Range("A" & Rows.Count).End(xlUp).Row

    Range("N2:N" & usor).FormulaR1C1 = _

        "=IFERROR(INDEX(Sheet1!R1C1:R5000C14,MATCH(""BONT "" &RC[-8],Sheet1!R1C14:R5000C14,0),7),""Nincs bontási dátum"")"

    Columns("N:N").NumberFormat = "m/d/yyyy"

    Range("N2:N" & usor) = Range("N2:N" & usor).Value

    Columns("A:N").EntireColumn.AutoFit

    Sheets("Sheet1").Columns("N").Delete Shift:=xlToLeft

End Sub

A félkövérrel írt sort írd át a makródban, akkor helyreáll a lelke. 

Szia!
Írtam neked a hozzászólásomban (38119), hogyan másold a tételeket. Akkor nem fordulhat elő ilyen probléma.

Üdv.

Itt egy példa 06830 betétlap esetében a Sheet 1 dátumformátumok átvitele után a Summary lapfülön Bontási dátumban 1900.01.00 értéket kapok vissza. Ez csak egy példa de több ilyen eset is előfordul:(  Mi miatt lehet ez?

Szívesen. :)

Hálásan köszönöm!

Bocs, nem voltam net-közelben, és most sem leszek. 

https://data.hu/get/14256121/Mpk.xlsm

Szia!

A makró azért nem találja meg az összeillő párokat, mert az átmásoláskor a betétlap cella típusa megváltozik, szöveg helyett double lesz.

Ezért a másolást másként kell megoldani. Itt egy javaslat:

For i = 2 To lastRow
If ws.Cells(i, 13).Value = "Épít" Then
ws.Range(ws.Cells(i, 1), ws.Cells(i, 7)).Copy newSheet.Cells(newRow, 1)
ws.Range(ws.Cells(i, 8), ws.Cells(i, 14)).Copy newSheet.Cells(newRow, 9)
'newSheet.Cells(newRow, 1).Value = ws.Cells(i, 1).Value
'newSheet.Cells(newRow, 2).Value = ws.Cells(i, 2).Value
'newSheet.Cells(newRow, 3).Value = ws.Cells(i, 3).Value
'newSheet.Cells(newRow, 4).Value = ws.Cells(i, 4).Value
'newSheet.Cells(newRow, 5).Value = ws.Cells(i, 5).Value
'newSheet.Cells(newRow, 6).Value = ws.Cells(i, 6).Value
'newSheet.Cells(newRow, 7).Value = ws.Cells(i, 7).Value
'newSheet.Cells(newRow, 9).Value = ws.Cells(i, 8).Value
'newSheet.Cells(newRow, 10).Value = ws.Cells(i, 9).Value
'newSheet.Cells(newRow, 11).Value = ws.Cells(i, 10).Value
'newSheet.Cells(newRow, 12).Value = ws.Cells(i, 11).Value
'newSheet.Cells(newRow, 13).Value = ws.Cells(i, 12).Value
'newSheet.Cells(newRow, 14).Value = ws.Cells(i, 13).Value
Application.CutCopyMode = False
newRow = newRow + 1
End If
Next i

A régi soraidat kikommentelve tettem ide.

Ezzel minden bontást meg fogsz találni, sőt, a végeredmény még több is lesz 1 db-bal... mivel a betétlap meint azonosító szerintem nem elegendő, kell még mást is figyelni.

Íme egy példa:

Az utolsó oszlop az előfordulások számát jelenti.

Üdv.

A makró letesztelése után esetleg megkaphatom az elkészült filet? Köszönöm előre is 

Range("N2:N" & usor).FormulaR1C1 = _

"=IFERROR(INDEX(Sheet1!R[-1]C1:R[1316]C,MATCH(""BONT "" &RC[-8],Sheet1!R1C14:R1318C14,0),7),""Nincs bontási dátum"")"

hibát hoz:(

Összeállítottam egy makrót a kimeneti fájlodhoz.

Sub Epit_Bont()

    Dim usor As Long

    Sheets("Summary").Columns("A:N").Delete Shift:=xlToLeft

    With Sheets("Sheet1")

        .Range("A1:M1").Copy Sheets("Summary").Range("A1")

        .Range("N1") = "Összefűzés"

        usor = .Range("A" & Rows.Count).End(xlUp).Row

        .Range("N2:N" & usor).FormulaR1C1 = "=RC[-1]&"" ""&RC[-8]"

        .Range("$A$1:$M$" & usor).AutoFilter Field:=13, Criteria1:="ÉPÍT"

        usor = .Range("A" & Rows.Count).End(xlUp).Row

        .Range("A2:M" & usor).Copy Sheets("Summary").Range("A2")

        .Range("$A$1:$N$" & usor).AutoFilter Field:=13

    End With

    Sheets("Summary").Select

    Range("N1") = "Bontási dátum"

    usor = Range("A" & Rows.Count).End(xlUp).Row

    Range("N2:N" & usor).FormulaR1C1 = _

        "=IFERROR(INDEX(Sheet1!R[-1]C1:R[1316]C,MATCH(""BONT "" &RC[-8],Sheet1!R1C14:R1318C14,0),7),""Nincs bontási dátum"")"

    Columns("N:N").NumberFormat = "m/d/yyyy"

    Range("N2:N" & usor) = Range("N2:N" & usor).Value

    Columns("A:N").EntireColumn.AutoFit

    Sheets("Sheet1").Columns("N").Delete Shift:=xlToLeft

End Sub

Bocsánat de a kimeneti filet töltöttem fel:) A helyes kiinduló file itt: https://files.fm/u/9ygzxyrhtz

Sziasztok! 

• Új munkalap létrehozása: Az Épít típusú rekordokat átmásolja az eredeti munkalapról egy új, "Summary" nevű munkalapra.
• Bontási dátumok hozzáadása: Megkeresi a bontási rekordokat és hozzáadja a bontási dátumot a "Summary" munkalaphoz. a megfelelő sorhoz:)  Betétlap alapján de ez valami miatt nem minden rekord esetén kerül be
• Összegzés és ellenőrzés: Összegzi a térfogatokat, majd összehasonlítja az eredeti és a summary adatok számait, és jelzi az eltéréseket, ha vannak.

Miért nem megy át a Bont sorokból a summary lapfülre az adat?

Nem fontos a makrós megoldás sem a lényeg az lenne hogy egy sorban legyen az építési dátum és a bontási dátum. 

A File amelyből kiindulok itt található https://files.fm/u/qxzzkxmeck

Köszönöm!

Sub FilterAndSummarizeData()
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Sheet1") ' Eredeti munkalap

Dim lastRow As Long
lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row

' Szűrjük az Épít sorokat és másoljuk a Summary lapra
Dim newSheet As Worksheet
On Error Resume Next
Set newSheet = ThisWorkbook.Sheets("Summary")
On Error GoTo 0
If Not newSheet Is Nothing Then
Application.DisplayAlerts = False
newSheet.Delete
Application.DisplayAlerts = True
End If
Set newSheet = ThisWorkbook.Sheets.Add
newSheet.Name = "Summary"

' Fejléc átmásolása és új oszlop hozzáadása
newSheet.Range("A1").Value = "SAP"
newSheet.Range("B1").Value = "Mappa"
newSheet.Range("C1").Value = "Üzem"
newSheet.Range("D1").Value = "Pozíció"
newSheet.Range("E1").Value = "Jkönyv"
newSheet.Range("F1").Value = "Betétlap"
newSheet.Range("G1").Value = "Építés dátuma"
newSheet.Range("H1").Value = "Bontási dátum"
newSheet.Range("I1").Value = "Hosszúság"
newSheet.Range("J1").Value = "Szélesség"
newSheet.Range("K1").Value = "Magasság"
newSheet.Range("L1").Value = "m3"
newSheet.Range("M1").Value = "Fsz_vagy 8m"
newSheet.Range("N1").Value = "Munkavégzés"

Dim newRow As Long
newRow = 2

' Másoljuk az Épít sorokat a Summary lapra
Dim i As Long
For i = 2 To lastRow
If ws.Cells(i, 13).Value = "Épít" Then
newSheet.Cells(newRow, 1).Value = ws.Cells(i, 1).Value
newSheet.Cells(newRow, 2).Value = ws.Cells(i, 2).Value
newSheet.Cells(newRow, 3).Value = ws.Cells(i, 3).Value
newSheet.Cells(newRow, 4).Value = ws.Cells(i, 4).Value
newSheet.Cells(newRow, 5).Value = ws.Cells(i, 5).Value
newSheet.Cells(newRow, 6).Value = ws.Cells(i, 6).Value
newSheet.Cells(newRow, 7).Value = ws.Cells(i, 7).Value
newSheet.Cells(newRow, 9).Value = ws.Cells(i, 8).Value
newSheet.Cells(newRow, 10).Value = ws.Cells(i, 9).Value
newSheet.Cells(newRow, 11).Value = ws.Cells(i, 10).Value
newSheet.Cells(newRow, 12).Value = ws.Cells(i, 11).Value
newSheet.Cells(newRow, 13).Value = ws.Cells(i, 12).Value
newSheet.Cells(newRow, 14).Value = ws.Cells(i, 13).Value
newRow = newRow + 1
End If
Next i

' Keresés és bontási dátumok hozzáadása
Dim betetlapId As Variant
Dim bontCount As Long
bontCount = 0
For i = 2 To newRow - 1
betetlapId = newSheet.Cells(i, 6).Value
Dim foundRow As Long
foundRow = 0
For j = 2 To lastRow
If ws.Cells(j, 6).Value = betetlapId And ws.Cells(j, 13).Value = "Bont" Then
foundRow = j
Exit For
End If
Next j
If foundRow > 0 Then
newSheet.Cells(i, 8).Value = ws.Cells(foundRow, 7).Value
bontCount = bontCount + 1
End If
Next i

' Szűrő hozzáadása a fejlécekhez
newSheet.Range("A1:N1").AutoFilter

' Oszlopok szélességének igazítása
newSheet.Columns("A:N").AutoFit

' Adatok kijelölése
newSheet.Range("A2:N" & newRow - 1).Select

' Teljes m3 összegzése és formázása
Dim totalSum As Double
totalSum = Application.WorksheetFunction.Sum(newSheet.Range("L2:L" & newRow - 1))
newSheet.Range("O1").Value = totalSum
With newSheet.Range("O1")
.Font.Bold = True
.Font.Italic = True
.Font.Color = RGB(255, 0, 0)
.Font.Size = 14
.Font.Name = "Calibri"
End With

' Eredeti bontás rekordok száma
Dim originalBontCount As Long
originalBontCount = Application.WorksheetFunction.CountIf(ws.Range("M2:M" & lastRow), "Bont")

' Eredmények ellenőrzése és megjelenítése
Dim checkSheet As Worksheet
On Error Resume Next
Set checkSheet = ThisWorkbook.Sheets("Check")
On Error GoTo 0
If Not checkSheet Is Nothing Then
Application.DisplayAlerts = False
checkSheet.Delete
Application.DisplayAlerts = True
End If
Set checkSheet = ThisWorkbook.Sheets.Add
checkSheet.Name = "Check"

checkSheet.Range("A1").Value = "Eredeti Épít összes Lm"
checkSheet.Range("A2").Value = Application.WorksheetFunction.SumIf(ws.Range("M2:M" & lastRow), "Épít", ws.Range("L2:L" & lastRow))
checkSheet.Range("B1").Value = "Summary Épít összes Lm"
checkSheet.Range("B2").Value = totalSum
checkSheet.Range("A3").Value = "Eredeti Bont rekordok száma"
checkSheet.Range("A4").Value = originalBontCount
checkSheet.Range("B3").Value = "Summary Bont rekordok száma"
checkSheet.Range("B4").Value = bontCount

' Az értékek megjelenítése és formázása
With checkSheet.Range("A1:B4")
.Font.Bold = True
.Font.Size = 12
.Font.Name = "Calibri"
End With
checkSheet.Columns("A:B").AutoFit

' Hibaüzenet, ha a bontási rekordok száma nem egyezik
If originalBontCount <> bontCount Then
MsgBox "A bontási rekordok száma nem egyezik meg! Eredeti bontási rekordok: " & originalBontCount & ", Átmásolt bontási rekordok: " & bontCount, vbExclamation
End If
End Sub

Azt nem tudod megoldani, hogy bemásolás/törlés helyett kvázi "görgeted" a listát? Ha jól látom, alul van a legfrissebb adat, és a lista elején a legrégebbi. A görgetés ebben az esetben azt jelentené, hogy a Körte, szőlő, barack sorokkal felülírod az Alma, körte, szőlőt, amivel a barack sor megduplázódik. És a legalsó sorban lévő Barack adatokat írod felül az új adatsorral.

Én például egy évente frissülő jelentésben szereplő 5 éves grafikonsorokat szoktam ezzel a technikával frissíteni, így nem kell grafikonokat mindig újra rajzoltatni, hanem azzok autoatikusan aktualizálódnak.

Ebben igazad van, viszont ez a táblázat az éppen folyamatban lévő munkákat "monitorozza". Amikor valami elkészül kikerül a rendszerből, ha valami új jön akkor pedig értelemszerűen be. Ha nem törlődne, nem lenne már átlátható, túl nagy lenne.

Az én célom pedig, hogy 1 vagy 2 hetes bontásban mindig rátudjak szűrni az éppen aktuális megrendelésekre és csak azt lássam, hogy milyen készültségben van. A tőbbi jövőben gyártandó termék ne keverjen be, csak a heti-két heti aktuális.

Szia!

Azért a folyamatos törlés/bővítés nem nagyon tesz jót a képleteknek... inkább bővüljön folyamatosan és ne törölj belőle. A második munkalapra akkor is ki tudod szedni az adatokat, ha a "régiek" benne maradnak az elsőben.

A munkalapok stílusát te határozod meg, olyan lesz mindegyik, amilyenre beállítod.

Üdv.

Mivel a Munkalap1 folyamatosan bővül/törlődik így mindenképpen muszáj egy második munkalapon dolgozni az adatokkal.

Mit gondoltok, az is megoldható, hogy amilyen stílusban néz ki az egyik munkalap, ugyanolyanra csinálja a másikat is?

A célom az lenne egyébként, hogy az Munkalap1 adatokból mindig előre szűrjem határidő szerint 1 v. 2 héttel előre a munkákat. És ezekkel az adatokkal dolgozni, diagramok stb.

A Hol.Van függvénynek pedig a Match felel meg, itt is rá kell nézned a paraméterezésre.

Szia!

Úgy tudom, igen. Vlookup és Column függvény van a Google táblázatban is. A Vlookup paraméterezését azért nézd meg légy szíves.

Üdv.

Köszönöm!

Mit gondoltok, ha Excelben működik, akkor elvileg Google táblázatban is működni kell, igaz? Csak a képletek neve más lesz.

Egy másik módszer:

Szia!

Az Fkeres függvény kiváló erre a célra:

B15 cella képlete: =FKERES($A$15;$A$20:$E$24;OSZLOP();0)

A képlet húzható jobbra. Figyelj a $-os címzésre.

Ha nem a második oszlopban van ahova írni szeretnél. akkor az OSZLOP függvény értékét módosíts a Név oszlop utánira + vagy - érték hozzáadásával. Ha pl. a 3. oszlopban szeretnéd kezdeni, akkor OSZLOP()-1 lesz a Határidőnek megfelelő eredmény.

Üdv.

Sziasztok!

Érdeklődnék tudtok-e a problémámra függvényt vagy javaslatot.

Adott egy munkalap amin egy sorokból és oszlopokból álló adatsor van (bizonyos folyamatok nyomonkövetésére szolgál, mely az idő múlásával folyamatosan bővül vagy törlődik).

Létezik-e olyan függvény az excelben, ami egy bizonyos feltétel teljesülése esetén az egész sor értékeit kiírja vagy átmásolja a másik munkalapra?

Tehát:

Munkalap1 tartalmazza az adatokat

Munkalap2-ben pedig szeretném látni az adott feltételhez tartozó egész sort.

Például:

Munkalap1:

Név                   Határidő               Munkaszám         stb.           stb.

Alma                2024.07.05              24-001              ....             ....

Körte               2024.07.08               24-002            ....             ....

Szőlő               2024.07.10               24-003            ....             ....

Barack             2024.08.16               24-004            ....             ....

Munkalap2-n pedig szeretném látni a Barackhoz tartozó összes adatot.

Köszönettel:

Roland

Szerintem te ebbe futottál bele: http://forum.index.hu/Article/viewArticle?a=167183191&t=9009340
A hónap elején kellett újratelepíteni a gépemet, mert meghalt az SSD benne. Egy jópár évvel ezelőtti telepítővel telepítettem újra az Officet. Nem tudom, hogy telepítés után frissült-e vagy sem. Gyakorlatilag 1-2 napig biztosan úgy használtam, hogy a menügombos funkció nem működött jól, mert alapértelmezetten a keresésnél villogott a kurzor és oda történt az adatbevitel, nem a menüpontok között tudtam lépkedni a betűkkel.
Nekem megoldotta egy office frissítés és azóta ismét jól működik.
Arra sem emlékszem, hogy anno frissítette-e magát az office vagy ki voltak kapcsolva a frissítések rajta. Most hagytam őket bekapcsolva.

Amúgy kibaszott frusztráló volt a dolog. Mondjuk az is frusztráló, hogy ha IP címmel adok hozzá hálózati meghajtót, akkor nem lehet biztonságos helynek beállítani azt az office adatvédelmi beállításaiban. Távolról szoktam dolgozni VPN-en keresztül, volt egy szerver csere és megváltozott az IP cím és a szerver neve is... Mondanom se kell, hogy sok bosszúságot okozott volna, ha nem tudom mire jó a hosts fájl. Így az én munkaállomásomról olyan, mintha nem is lett volna csere.

Kösz! Csak a menügombig működik, de már ez is segítség, utána 2 le és enter, így már nem kell egerészni. :)

Nem tudom, mióta van menü gomb, nem tűnt fel eddig. :) 

Menü gomb-->É-->É-->Enter

Egy nagyon amatőr kérdés:

Mi az "irányított beillesztés, érték" billentyűparancsa? Ms szerint Ctrl+Alt+V hozná a lehetőségeket (ami nekem amúgy sem lenne az igazi, rögtön az érték-et szeretném beszúrni), de nekem erre ír egy @-ot és villog utána a kurzor. A másik, amit ír (Alt+E+valami, ha jól rémlik), még ennyit sem csinál.

Ezen a modik nem tudnak segíteni.

Bocs, ha nem válaszoltam, de oda akkor tudtam belépni, mikor az értesítést kaptam. Nem tudom, hol érem el a modisat.

Nincs.

De most megint kérte a címet és a jelszót.

A modi nem csinált semmit, csak várta, hogy beszámolsz sikerült-e.

De ez a modi baja.

Balra fent a nick neved alatt nincs olyan, hogy Válts nicknevet!?

Mégis csinált valamit a modi, bár azt mondta, minden rendben van. Kikapcsolás után nem kellett újra belépnem.

Most látom, már biciklis vagyok, hurrá!

A modi szerint sem vagyok kitiltva.

Továbbra is kéri a címet és jelszót. Beléptet, de ezt az üzenetet kapom:

Ezután újra rá kell kattintanom a könyvjelzősávon a kitett Exceles, Indexes  ikonra, de már nem kell megadnom az adataimat. Egyszerű...

Az automatikus közlemények között nem szerepelsz. 

https://forum.index.hu/Article/showArticle?t=9111584

Most azt írta, hogy talán kitiltottak, vagy olyan helyre próbáltam belépni, ahova nem szól az engedélyem.

Ez már a harmadik nevem. Először Delila1 voltam, de megváltozott az email címem, amit nem engedett módosítani az újra. Akkor Delila10 néven léptem be az új címemmel (veteránból babakocsis lettem).

Most nem változott semmi, de újra regisztrálni kellett, hogy beléphessek, így lettem Delila_10, és ismét kezdő.

Írtam a modinak, hátha... 

Én ezt nem tapasztalom. Egyik eszközömön sem.

Kukázd le a cookie-kat, hátha megoldja...

Sziasztok,

Köszönöm a segítséget, sikerült megoldani :-)

Köszönöm. Egyébként ugyanezt csináltam, és azt hittem az a baj, hogy a két hasonlítandó munkalap neve azonos. De alaposabban megnézve rájöttem, hogy egy ponton egy ciklusváltozót elrontottam, és így a program egyszerűen átugrotta az adatok egy részét, és nem listázta a meglévő eltéréseket. Ezért hittem azt, hogy az azonos munkalapneveket nem jól kezelem. 

Szia!
Miért ne tudnád?

Vezess be változókat, amikhez hozzárendeled az adott munkalapokat. Pl.

Set ws1=Workbooks(1).Sheets("Munka1")

Set ws2=Workbooks(2).Sheets("Munka1")

Ezután pedig használd a változókat a makróban a műveletekhez.

Üdv.

Sziasztok, régóta használok egy makrót két munkafüzet azonos szerkezetű munkalapjainak összehasonlítására. Most felmerül az a helyzet, hogy az összehasonlításhoz mindkét munkafüzet munkalapjainak azonos a neve. Azt hiszem, ezt nem tudom megoldani átnevezgetés nélkül. De megkérdezem, nincs-e mégis valami trükk az átnevezgetés megkerülésére? 

Megnyugtattál. :)

Engem is szivat... De már évek óta.
Szerintem rosszul vannak megírva a cookiekhoz tartozó kódok. Mert van, hogy kiléptet és van amikor pedig nem... Nem függ az eszköztől és a böngészőtől sem.

Mindenkit kiléptet minden alkalommal az Indapass, vagy csak rám haragszik? Bejelöltem a benn maradást.

Ha nem kapsz jobb ötletet, nézd meg a feltételes formázással színezett cellákat, a sorukban lévő hossz kell neked.

Hogy íratom ki ezeket az értékeket a Közös antennahossz mezőbe? :-O

Sajnos nem értem milyen számok azok a jobbra eső második oszlopban

Vigyázat! A D oszlop celláiban eltérők a képletek.

Meg igy is meg lehet csinalni, nekem sajnos nincs idom mostanaban segiteni:(

Nem biztos, hogy az egymással szembeni számokat kell összehasonlítani. A példában a 144 MHz antenna 1/4-es értéke és a 430 MHz 3/4-es értéke van egymáshoz a legközelebb.   Ez szemmel is megállapítható. de azt hittem, hogy "automatizálva" egyszerűbb.

Szia,

az antennatípusokkal még ki kellene egészítened a jobb oldali összehasonlítást, amik írásod szerint egymással szemben vannak. Mondjuk az AH oszlopba a kettő közé.

Utána csinálj egy különbségszámítást az AF oszlopba a két számból. Abszolút értékben tedd ezt meg, mert csak a különbség kell, az előjel mindegy lesz.

Ebből az oszlopból kell megkeresned azt, ami kisebb mint 1.

Tegyél be még 1 segédoszlopt első oszlopnak mondjuk az AE oszlopba, a képlete legyen pl. AF<1. Így ebben az oszlopban kapsz egy igaz / hamis  cellaértéket

Ha fentiek szerint jársz el, akkor a sárga celládba kell egy FKERES, amiben megkeresed az első IGAZ találatot és visszaadod az antennatípus oszlopából a találatot.

valami ilyesmi, ha fentiek szerint járrtál el:

FKERES(IGAZ; AE:AH; 4; 0)

ha nem erre gondoltál pontosan, szerintem rá tudod már szabni a saját tábládra. 

sziasztok

Lenne egy problémám, de lehet, hogy nem lehet megoldani. 

Készítettem egy Antenna méretező segédprogramocskát magamnak.

Vannak olyan antennák, amelyek két frekvenciákra méreteznek, ilyenkor megnézik, hogy melyik két hossz áll legközelebb egymáshoz.  Ahogy a képen is látszik, az értékeket jobb oldalra csoportosítottam egymással szemben.

Sajnos nem találtam olyan függvényt, amely a két 7-es csoportot összehasonlítja és kiválasztja azt az értéket, amelyek között pl. max 1 cm különbség van. Ezt az értéket beírja a "Közös antennahossz...cm helyre.

Ki tudna ebben segíteni?  Igen tidom szemrevételezéssel is ki lehetne választani, de jó lenne ha ez "automatizálva" történne. 

Megoldódott. Kézzel rányomtam a frissítések keresésére és telepített egyet. Így most már a kivágás menüpont az aktív alapértelmezetten, nem a keresés, és rendesen működnek a gyorsbillentyűk is ezáltal.

Sziasztok!

Régen jártam már erre felé, de most én kérdeznék:

Elszállt az SSD a gépemben, így kénytelen voltam újratelepíteni....

Elvileg ugyan azt az Excel verziót telepítettem, mint ami korábban a gépemen volt, azaz a Microsoft Office Professional Plus 2021 verzióját. Ehhez vettem meg anno a termékkulcsot, így adta magát, hogy ez is kerüljön vissza. Mégis másképpen működik, mint ez előtt.

Ami az őrületbe kerget az a következő: Ha nyomok egy menü gombot a klaviatúrán, akkor most felhoz egy kereső sávot is és abban villog a kurzor. Lásd a mellékelt fotót, így hiába püfölöm az "É" gombot kétszer, hogy csak értékeket illesszen be, le se tolja a fejemet, mert elkezdi beírni a keresendő kifejezéshez... Ettől az idióta funkciótól hogyan lehet megszabadulni?

félOFF

Ohh, nem is értettem a babakocsit, de ez mindent megmagyaráz.

:)

Megint újonc lettem. Másodjára dobott ki az Indapass.

Először évekkel ezelőtt, mikor megváltozott az email címem. Most valahogy a rongyos régire emlékezett, a több évest elfelejtette. Oda meg hiába küldött az "elfelejtett jelszó" helyett újat, a cím megszűnése miatt nem kaptam meg.

Ahogy pimre javasolta, egyenként behívod a fájlokat a másoláshoz.

Az elsőnél fejléccel együtt – Range("A1").CurrentRegion.Copy

a többinél anélkül – Range("A1").CurrentRegion.Offset(1).Copy

Még annyit, hogy a fájlnevek beolvasásához használd a DIR függvényt. Ciklusban végégmész a fájlokat tartalmazó könyvtáron - amíg nem lesz üres az eredmény -, és a beolvasott fájlnevekben ellenőrzöd, hogy azok-e, amik neked kellenek (feltéve, hogy nás fájlok is vannak az adott könyvtárban). Aztán sorba rakod őket, és onnan már egyszerű megnyitni, bemásolni.

Ezt nem nehéz makróval összehozni egyetlen munkafüzet egyetlen munkalapjára.

Az adatfájlokhoz rendelj hozzá egy nevet, pl. Adatok 2024, az egyes letöltött fájlok neve legyen ugyanez egy sorszámot tartalmazó toldalékkal. Pl Adatok 2024_1, Adatok 2024_2 stb. Azt meg tudod adni a makróban, hogy az Adatok 2024 kezdetű fájlokat nyissa meg, majd a legelsőt másolja be fejlécestől, a továbbiakat pedig fűzze hozzá a meglévőhöz fejléc nélkül. 

Sziasztok,

A következőkben szeretném a segítségeteket kérni:

Rendszerből kérünk le különböző időintervallumokra adatsorokat.
Ezeket a rendszer exel-be hozza, táblázatos formátumban.
A rendszerből 3 hónapnál hosszabb intervallumra nem lehet lekérdezni.

Így van amikor ha mondjuk 1 évre visszamenőleg kellenek adatok, az 4 lekérdezés.

Azt, hogyan lehet megcsinálni, hogy lekérdezem az adatsorokat 1 mappába és azt VBA-val egy excellé =  egy táblázattá alakítani őket.

Változó, hogy a mappában mennyi táblázat lenne (1-5 -10 db, bármennyi)
Mindegyiknek azonos a fejléce, de értelem szerűen a fejléc csak egyszer szerepeljen és aztán az adatsorok betöltve a lekérdezés sorrendjében.

Köszönettel,
András 

Szia!

Kitűnő ötlet a tömb!

Egyébként is ez egy kód része, ezért nagyon egyszerűen bedobáltam az értékeket egy kétdimenziós tömbbe, és már teszi is a dolgát a VLookup...

Tökéletesen működik egyszerű mint a faszög! Hogy nem jutott ez eszembe egy hét alatt?

Köszi a segítséget

Szia!

Nem mind arany ami fénylik a VBA-ban sem. 

1.

Ha alaposabban megvizsgálod a mintában levő függvényt, akkor kiderül, hogy az egy tömbfüggvény, csak O365-ben ez már nem jelölődik kapcsos zárójellel. 

Ezért én egyszerűen simán beírnám a függvényt FormulaArray-ként a VBA-val a C10 cellába, majd kitölteném lefelé:

Range("C10").FormulaArray="=VLOOKUP(CONCATENATE(A10,B10),CHOOSE({1,2},CONCATENATE(INDEX($K$2:$M$32,0,1),INDEX($K$2:$M$32,0,2)),INDEX($K$2:$M$32,0,3)),2,TRUE)"

Range("C10:C17").FillDown

Ezzel kész az egész.

Azért kell először egy cellába beírni a képletet és utána kitölteni lefelé, mert ha egyből az egész tartományba írnánk be, akkor csak az első sor érvénysülne az egész tömbben. (Ne kérdezd miért, ez van....)

2.

(Részben) VBA-val azért bonyolultabb, mert VBA-ban nem tudod a két oszlopot egyszerű módon összefűzni. Én azt választottam, hogy beolvastam a táblázatot egy tömbváltozóba, a változó első két oszlopát összefűztem - a második változatlan maradt -  és a harmadik oszlopban keresek, mivel az FKERES tömbben is képes keresni, nemcsak tartományban.

Igy nézne ki:

Sub Minta()
Range("C10").Value = Keres_Func(Range("C10").Row)
End Sub
Public Function Keres_Func(sora As Integer) As Variant
Dim ws As Worksheet
Dim r As Range
Dim keres As String
Dim keresotomb, xx As Integer
Set ws = Workbooks("Fkeres_tobb_feltetellel.xlsm").Worksheets("Proba2")
keres = ws.Range("A" & sora) & ws.Range("B" & sora)
keresotomb = ws.Range("K2:M32").Value
For xx = 1 To UBound(keresotomb, 1)
keresotomb(xx, 1) = keresotomb(xx, 1) & keresotomb(xx, 2)
Next
Keres_Func = Application.VLookup(keres, keresotomb, 3, 0)
End Function

Ne feledd, hogy ebben az esetben a cella értéket kap és nem képletet, így nem húzható lefelé!!! Minden cellára egyenként kell az értéket előállítani a függvény meghívásával. 

Szerintem ez a bonyolultabb út.

Köszi!

Ha nem lesz más megoldás akkor ez marad.

Itt a fórumon néhány hete ügyeztünk erről a függvényről:

A minta C10 cellába beírva: =FKERES(ÖSSZEFŰZ(A10;B10);VÁLASZT({12};ÖSSZEFŰZ(INDEX($K$2:$M$32;0;1);INDEX($K$2:$M$32;0;2));INDEX($K$2:$M$32;0;3));2;IGAZ)

működik...

Ezt szerettem volna VBA ban megírni, de nem jártam sikerrel.

Most alaposabban megnéztem.

Én nem tudok olyan Excel függvényről, amely 2 oszlop összefűzésének eredményét keresné egy másik tartomány 2 össze nem fűzött oszlopában.

Ehhez a célterületen létre kell hoznod egy segédoszlopot, és abban keresni. Nálam ez az N oszlop lett. A 2-32 cellák tartalma pedig az N2-ben K2 & L2,és ez lefelé kitölve.

És mivel képtelen voltam rájönni, hogy a vlookup függvény miért ad Variant/error hibát, ezért – amíg valaki meg nem találja a megoldást – javaslom, hogy a find függvénnyel keress. Ez egy Range típusú változóban adja vissza az eredményt (nálam találat a neve), és ennek a sor értékét lekérdezve tudsz értéket adni az A3-nak:

Sub Minta()

Dim eredm As Variant

Range("A3") = Keres_Func

End Sub

 Public Function Keres_Func() As Variant

   Dim ws As Worksheet

   Dim r As Range

   Dim keres As String, talalat As Range

   Set ws = Workbooks("Fkeres_tobb_feltetellel.xlsm").Worksheets("Proba2")

   keres = ws.Range("A12") & ws.Range("B12")

   Set talalat = ws.Columns("N:N").Find(what:=keres, LookIn:=xlValues, lookat:=xlWhole, searchorder:=xlByColumns, MatchCase:=True)

   If talalat Is Nothing Then ' Ha nincs meg, bár ez elég valószínűtlen

    Keres_Func = "Nem találom"

   Else

    Keres_Func = ws.Cells(talalat.Row, "L")

   End If

   'Set r = WorksheetFunction.Choose(Array(1, 2), ws.Range("K2:K32") & ws.Range("L2:L32"), ws.Range("M2:M32"))

End Function

Igen, a kíséletezéseim során ilyen verzió is volt.

Próbáltam a MACH funkciót is, de az sem jött össze:

Public Function Keres_Func() As Variant
   Dim ws As Worksheet
   Dim r As Range
   Dim keres As String
   
   Set ws = Workbooks("Fkeres_tobb_feltetellel.xlsm").Worksheets("Proba2")
   keres = ws.Range("A10") & ws.Range("B10")

  Keres_Func = Application.Match(keres, Choose(2, ws.Range("K3") & ws.Range("L3"), ws.Range("M3")), 0)

End Function

Bízom benne, hogy több szem többet lát...

Szia, szerintem azért áll le a program, és ad típuseltérés hibát, mert a Choose függvényben tartományokat adtál meg: 

Keres_Func = Application.VLookup(keres, Choose(2, ws.Range("K2:K32") & ws.Range("L2:L32"), ws.Range("M2:M32")), 2, 0)

A teszt kedvéért átjavítottam a tartományokat egyedi cellákra: Choose(2, ws.Range("K2") & ws.Range("L2"), ws.Range("M2")), 2, 0), akkor nem állt le hibaüzenettel a program, de még így is hibás, mert a Keres_Func értéke Error 2042 lesz: Variant/Error. (Ezt a Locals ablakban láthatod). Majd az A3-ban pedig #HIÁNYZIK üzenet jelenik meg. Ennek az okát nem tudom. 

Sziasztok!
Próbáltam a múltkori multi-keresést VBA kódba megírni, de nem sikerült, mindig tipuseltérés hibát ad. Van valami ötletetek?
Minta: https://data.hu/get/14205151/Fkeres_tobb_feltetellel.xlsm
Köszi!

Az adatsort havonta igazítod. Ha nincs adatsorod, amelyik az év végén lenne, akkor az időskálát meg kell adni fixen.

Szia!

Legyen üres az a cella, amiben még nincs adat - képlet se legyen benne! Ezután az adatforrás kiválasztása párbeszéd panelen rákattintasz a rejtett és üres cellák gombra, majd bejelölöd az adatpontok összekötése vonallal opciót.

Amikor adat kerül - akár képlettel - a még üres cellába, ez az opció nem hat már tovább.

Üdv.

Üdv, segítség kéne. Van egy vonaldiagramom, ami éves adatokat jelenít meg. Az a gond, hogy ahol még nulla van (értsd: a jövőbeni adatok helye, pl. most a június), ott a mostani tudásommal két rossz közül választhatok:

1: a cellákban elrejthetem a nullákat (Beállítások -> Speciális...), de a vonaldiagram beleáll a földbe, ami nem néz ki jól;

2: a cellákban a nullák helyén =HIÁNYZIK()-ot jelenítek meg, amit elrejthetek (Feltételes formázás), és a vonal nem áll a földbe, hanem megszakad (ez a cél), de a cella értéke a többi munkalapra is átmegy, mindenhol hibával, amit q kényelmetlen lekezelni.

Van valami jobb megoldás?

Az Excel-ben található hiperhivatkozások működése és a kattintási viselkedés beállítása több tényezőtől függ, beleértve a felhasználói beállításokat és a program verzióját is. Az alábbi lépések segíthetnek a probléma megoldásában:

1. Frissítések Telepítése

Győződjön meg róla, hogy minden felhasználó a legújabb Office frissítéseket telepítette. Ez sok esetben megoldhatja a problémákat.

2. Alapértelmezett Böngésző Beállítása

Győződjön meg róla, hogy minden felhasználónál ugyanaz a böngésző van beállítva alapértelmezettként. Az Excel hiperhivatkozások megnyitásához általában az alapértelmezett böngészőt használja.

3. Excel Beállítások Ellenőrzése

Ellenőrizze az Excel beállításait minden felhasználónál:

1. Nyissa meg az Excel-t.
2. Kattintson a Fájl menüre.
3. Válassza a Beállítások lehetőséget.
4. Menjen a Speciális fülre.
5. Görgessen le a Szerkesztési beállítások szakaszhoz.
6. Győződjön meg róla, hogy a "Hiperhivatkozások kattintásra aktiválása" beállítás be van kapcsolva.

4. Böngésző Biztonsági Beállítások

Néha a böngésző biztonsági beállításai megakadályozhatják a hiperhivatkozások közvetlen megnyitását. Ellenőrizze és szükség esetén állítsa vissza a böngésző biztonsági beállításait.

5. SharePoint Beállítások

Ha a fájl egy SharePoint alkalmazásban van tárolva, győződjön meg róla, hogy a SharePoint beállításai egységesek minden felhasználó számára. Az engedélyek és a hozzáférési beállítások eltérései is okozhatják a problémát.

6. Makró Biztonsági Beállítások

Néha a makró biztonsági beállítások is befolyásolhatják a hiperhivatkozások működését. Győződjön meg róla, hogy minden felhasználónál a makró biztonsági szint megfelelően van beállítva.

Összefoglalás

A probléma megoldása érdekében ellenőrizze a következőket:

1. Office frissítések telepítése.
2. Alapértelmezett böngésző beállítása.
3. Excel beállítások ellenőrzése (különösen a "Hiperhivatkozások kattintásra aktiválása" opció).
4. Böngésző biztonsági beállításai.
5. SharePoint beállításai.
6. Makró biztonsági beállításai.

Ezek a lépések segíthetnek abban, hogy a hiperhivatkozások minden felhasználó számára megfelelően működjenek.

=HIPERHIVATKOZÁS(ÖSSZEFŰZ(G$1;B303);B303) adott ez a hivatkozás amely megfelelően működik . A file egy sharepoint alkalmazásban felhőben van elhelyezve. Több felhasználó is használja. Vannao olyan felhasználók akinél a hivatkozás a bal egérgombbal való kattintással megnyílik. Ez a jó. Vannak olyan felhasználók akiknél a hivatkozást csak két billentyű lenyomásával tudja elindítani. Mit kell beállítani, hogy a hivatkozás a bal egérmutató kattintásával elinduljon?

Szia!
Elképzelhető, hogy a szövegből oszlopokkal lenne érdemes kezdeni. Ott a 3. lépésben ki lehet választani az oszlop formátumát.

Ráadásul rá lehet ereszteni ugyanarra az oszlopra, nem kell hozzá segédoszlop.

Üdv.

Mi a dátumot tartalmazó cella szövegformátuma? (Ctrl+1 billentyűvel [is] megnézhető a szövegformátum)

Ha ez a szövegformátum nem dátum típusú (valószínűleg így van), akkor használd a 

https://support.microsoft.com/hu-hu/office/d%C3%A1tum-f%C3%BCggv%C3%A9ny-e36c0c8c-4104-49da-ab83-82328b832349

függvényt.

A hónap, nap szétválasztásához, pedig a BAL, JOBB, KÖZÉP függvények használhatóak a DÁTUM függvény belsejében.

Ez csak 1 lehetőség a sokból.

Ha nem dátum formátumúak az ilyen dátumot tartalmazó cellák, akkor lehet, hogy érdemes megpróbálni a szövegformátumot dátumra állítani, hátha dátummá alakul és onnantól a dátumfüggvények működnek rajta.

De ez még kevés lesz, végig kell az átalakított szövegformátumú cellákon "gyalogolni" egy F2, ENTER művelettel. Ha nagy tömegvben an van oszlopban , akkor ezt megteszi helyetted a szövegből oszlopok opció.

Sziasztok! Segítséget szeretnék kérni.Van egy táblázatom amiben dátumok vannak

(sok dátum).Beirva úgy van,hogy 11,03, tehát forditva 3.hó 11 lenne.

Képlettel hogy lehetne megoldani hogy tudjam melyik hét a képletbe irjam be hogy melyik év.

Ha az idei év 2024-03-11 ez lenne az eredmény és ebböl már a HÉT.SZÁMA képlet megadná az eredményt.

Gondoltam összefüzésre. Az évet összefüzném a napok meg a hónapokkal de nem lett úgy jó.

Erre szeretnék megoldást.Köszönöm előre is.

Nagyon köszönöm, tökéletes!!!

"az egyes értékek végén van még egy plusz vessző. (Valamint egy szóköz.) ".  Próbáld meg, akár jegyzettömbbel, akár Excellel megnyitni - utóbbinál egyelőre nem kérni a szövegből oszlopok transzformációt -, majd a cserénél a Vesző + szóközt valami másra (például pontosvessző) cserélni. ezzel megmaradnak tizedsvesszők, de a határolójel a pontosvessző lesz. Ezzel már fog működni a transzformáció.

Sziasztok!

A problémám az alábbi. Egy térinfós szoftver .csv-ben dobja ki az eredménytáblát, amellyel tovább kellene dolgoznom.

A több oszlopban lévő numerikus értékek tizedesjegy elválasztója vessző, emellett az egyes értékek végén van még egy plusz vessző. (Valamint egy szóköz.) 

Próbáltam az Adatok/Szövegből oszlopok-kal (szóközt beállítva. mint határoló jelet), ami szépen külön oszlopokba rendezi az értékeket, ugyanakkor a gond továbbra is az egyes értékek végén található vessző. Ez nyilvánvalóan nem szükséges.

Hogyan lehetne eltávolítani az értékek utáni vesszőt? Köszönöm a segítségeteket!

Köszönöm! 

Ezzel el leszek egy darabig. 

Szia!

Attól függ, milyen címzéssel használod a képletet, de a lehúzásnál is ugyanaz a helyzet. Ha abszolút ($-os) címzést használsz sorra és oszlopra is, akkor igen.

Ha lehúzással jó volt a képlet, akkor a másolással is jónak kell lennie.

De örülök, hogy Imre javaslatával megoldottad.

Üdv.

nagyszerű megoldás,köszönöm 

Járművön írtam telefonon, remélem az elutesek ellenére is érthető.

Írd be a képletet egy segéd oszlopba (persze a B elé tegyél dollarjelet), aztán húzd le.

Utána másod kia teljes oszlopot, és irányított beillesztessel másold helyére csak a képletet.

de így a képlet változatlan marad.

tehát a képletem mondjuk B7 ,és az alatta lévő helyen már B8 kell hogy legyen,majd B9 és így tovább. Ha lehúzom váltja a képletet is ugye,de a formátumot. én úgy szeretném hogy a formátum is megmaradjon minden helyen ahogy volt,és a képlet is változzon úgy mint lehúzásnál és ne keljen egyenként bemásolnom 800 helyre. Ezt így nem lehet megoldani sehogy sem?

Szia!
Lehúzással megy a formázás is. Helyette: kijelölöd a másoladó képletet tartalmazó cellát, majd Ctrl +C  (vagy jobb egérgomb másolás), 

utána kijelölöd azt a tartományt, ahová a képletet szeretnéd másolni. Ezen állva jobb egérgomb - irányított beillesztés - képletet. Ezután ESC és megszűnik a kijelölés.

Ha egymás mellett vannak a képletet tartalmazó cellák, akkor együtt is megy a fentiek szerint.

Üdv.

Üdv.

Egy olyan problémába ütköztem,hogy van nekem egy majdnem teljesen készen lévő táblám.

A cellák formázása kész teljesen (cella kitöltő szín,betűszín,betűtípús,betűméret), a rácsok készen vannak az egész táblához. 

Egyetlen egy dolog hiányzik a táblából,4darab képlet, amit 1-1x kéne beírnom a sor legtettejére és lehúznom a végtelenségig.

És itt jön a problémás rész,a képlet lehúzásával az összes cellában változik a formátum olyanra mint amelyik cellából lehúztam,ezeket visszaállítani órákig tartana.

Tudok valahogyan "Fill handle"-t (lehúzásos módszert) használni úgy hogy semmi mást ne alkalmazon a többi cellára csak a képletet és a formátumot és mindenmást hagyjon figyelmen kívül?

Jelenleg ezt google drive táblában csinálom,nem excelben.

Szia!
Természetesen.

Feltételes formázás - új szabály - a formázandó cellák kijelölése képlettel - a képletbe pedig beírod a megfelelő relációt.

De a dátummal-idővel kicsit kacifántosabb a dolog.

FONTOS! Mindegy, hogy milyen formátumban látod a cellában az időt, mivel az Excel számként kezeli a dátumot és az időt a következőképpen:

Az egész rész az 1900 jan. 0! óta eltelt napok számát jelenti (tehát 1 = 1900.01.01!), a törtrész jelenti a napon belüli időt, pl. 0,5 =12:00:00.

Vagyis ha egy napon belüli időt írsz be, azt törtként fogja értelmezni az Excel. Ha arra vagy kíváncsi, hogy ez a mostani időhöz hogyan viszonyul, akkor a MOST() - MA() értéket kell hasonlítanod az adott időhöz. Ha időt közvetlenül szeretnél képletbe bevinni, akkor az IDŐ vagy az IDŐÉRTÉK függvényeket kell használnod.

MÁS A HELYZET, ha szövegként vannak a cellában az értékek, ebben az esetben a hasonlítást is szövegként (vagy idővé-azaz számmá - alakítás után) tudod megtenni, de a szövegek hasonlítása más eredménnyel járhat, mint a számok összehasonlítása!!!

Azt pedig, hogy az adott cellában szöveg vagy "szövegnek látszó" szám van, a cella formátum megváltoztatásával tudod tesztelni. Ha számformátumra állítod a cellát és marad a benne levő érték változatlan, akkor szövegként van tárolva az érték és csak látszik pl. időnek. Ellenkező esetben számmá - tizedes törtté kell változnia a megjelenésnek.

Remélem tudtam segíteni.

Üdv.

Sziasztok!

Létezik olyan, hogy a 00:00:00 formátumban elmentett időt hasonlítom össze egy másikkal és azt feltételes formázásba teszem? Pl ha később van a formázottban, az legyen pirossal kiemelve.

Köszönöm mindenkinek a segítséget!

Amit akartam, megtudtam, a többi a jövő titka...

Kis érdekességként még elmondom, hogy a program nem csak szótanuláshoz, de bármilyen memorizálandó anyaghoz is használható.

Így, mikor kis unokám az iskolában a szorzótáblát tanulta, feltöltöttem egyet szorzó és osztótáblával 100-ig, sőt, előtte már az összeadás-kivonásokat is 100-ig, neki is sokat segített, hiszen a géphez szívesebben ült oda, minthogy a szülők lekérdezéskor állandóan leszúrják, ha valamit elrontott, és semmi idő alatt kiszűrtük, melyek a kritikus műveletek, amiket gyakrabban kell ismételni. Utána már jöhettek a szülők... :-)

Hamar megtanulta...

Örülök, mert ez azt jelenti, hogy működnie kell nálam is az Office 365-ön, ha megveszem.

Sajnos már nehéz rekonstruálni, mi is történt annak idején a nejem gépén, mert neki a gép felajánlott egy ingyenes Office 365-öt próbaidőszakra, és erre átküldve nem tudtuk a fájlt megnyitni.

Aztán sokáig nem foglalkoztam vele, használtam a saját gépemen, közben a nejemnek letelt a próbaidőszak, úgy hogy már nem tudom újra megnézni, hogy a próbaidőszakos Office valóban teljesen egyenértékű volt a hivatalossal, vagy valami butított változat volt.

De ha nálad működött az Office 365-ön, akkor itt is működnie kell...

Elnézést, valóban nem fésültem össze a kezelési utasítást az Excel fájllal.

Ugyanis a fájl az angol tanuláskor feltöltött szókészleteket tartalmazza, de aztán később ezt a lekérdező programot, illetve másolatait használtam a német, az orosz nyelvekhez is, és most a spanyol nyelv tanulásához is ezt használom.

Így a segédlap az angol szócsoportok címeit tartalmazza, míg a kezelési utasításban éppen a spanyol szócsoportokat tartalmazó másik fájl képei vannak megjelenítve, mert ezt már spanyolul tanuló ismerőseimnek készítettem.

Az angolul tanulóknak szánt anyaghoz ugyanez a kezelési utasítás van, ugyanolyan logikával működik.

Nálam a fájl megnyitásakor a lap felső részén megjelenő mezők: kezdőlap, beszúrás, lap elrendezése, képletek, adatok, korrektúra, nézet, és utolsó helyen megjelenik a bővítmények.

Ez utóbbi csak a makróval rendelkező fájloknál jelenik meg, nem tudom, nálad miért nem jelent meg.

Szia!

Ahogyan Imrének írtam a 3833-ban, nálam Office365-ön működik. Tudom, ez téged nem vígasztal, csak annyit jelent, hogy kompatibilitási problémák nincsenek. Bár úgy tudom, a 2016 és 2019-es Excel néhány dologban hiányos, bizonyos függvényeket nem tartalmaz, ami korábban és később is megvan.

Nálad milyen hibák jelentkeznek a másik gépen, milyen Excel verziónál?

Üdv.

Szia!
Nálam Office365-ön szépen működik. :)

A linked megnyitottam, majd fájl letöltés xls fájlként.

Ezután a fájlkezelőben a letöltött fájl nevén jobb egérgomb - tulajdonságok - alul a tiltás feloldása kockát kipipáltam.

Ezután a fájlnévre kattintva szépen megnyitotta az excel - nem problémázott (a tiltás feloldása miatt) a makrók miatt, mert nálam engedélyezve vannak.

Nem kellett lapvédelmet sem feloldani.

Megjelent a menüben a bővítmények is.

Üdv.

Szia, csak megnéztem, amit küldtél.De nem ugyanazt látom az Excel fájlban, mint amit a használati utasításban leírtál. Engem ez e kép fogad a segéd munkalapra kattintva:

Aztán a kiválasztott cím után a Ctrl + A-ra - első alkalommal egy lapvédelem feloldásra vonatkozó hibaüzenet után - valóban megjelenik a kért munkalap. De Bővítmények mezőt nem találok. Innentől kezdve az 5-7. pontok elérése szóba sem jön.

Ugyanez volt a gondod a Windows 10-es gépeden?

Mindenesetre holnap megnézem ugyanezeket az anyagokat egy Windows 7-es gépen, bár office 2007 azon sincs nekem.  Igaz, végső soron rá tudom telepíteni. Hátha tényleg ezen múlik a helyes működés. Bár a leírásodban szereplő kép, és az elküldött Excel munkafüzet képe közti különbség gyanús, hogy nem ezen múlik. 

Illetve korábban megérkeztek, de SPAM-be, és ott eddig nem kerestem őket. Most küldöm a linkeket: https://docs.google.com/document/d/1cUmfRC8XxXJIouEDnfzkTaCshMJ2d1f6/edit?usp=sharing&ouid=113951927802309105103&rtpof=true&sd=true és https://docs.google.com/spreadsheets/d/1iJ1_uBdSXUWQTRCoNRCnowdk8_GI0v4y/edit?usp=sharing&ouid=113951927802309105103&rtpof=true&sd=true

Az Excel tábla a drájvról letöltve nekem nálam google táblázatban nyílik meg (a levélbő Excelben), ezért megnyitás után le kell tölteni onna, hogy Excelben lehessen nézni. És persze a makró miatt külön engedélyeni kell a használatot.

Sajnos ma már nincs időm alaposabban megnézni, majd csak holnap jutok hozzá-  

Természetesen. Amint megérkezik. És akkor nem küldöm, hanem itt elérhetővé teszem.

Szia!

Esetleg átküldöd nekem is?

Üdv.

Köszönöm, indítom a gmail-en!

Szia!
Szerintem a Data.hu nem kér ilyet. Simán felteheted, megadja a letöltő linket, azt kell másolni és betenni ide a fórumba.

Üdv.

Add meg az én címemet: palotas.imre@gmail.com 

Majd én körbe küldöm 

A címzett nevét és e-mail címét kérdezi a program, itt elakadtam a fájlok feltöltésével. Nem világos, itt mi a teendő...

Önmagában az Excellel nincs semmi gondom, sokat használtam a munkahelyemen számításokhoz, táblázatokhoz, diagramokhoz.

Inkább az operációs rendszeren történő különböző műveletekkel van gondom, és a Neten található szolgáltatásokat nemigen ismerem. ott csak annyi a tudományom, hogy a keresőprogramokat jól tudom kezelni...

Fileküldéshez itt regisztrálni sem kell:

https://www.wesendit.com/

Szia!

A Data.hu normál használata ingyenes, csak regisztrálni kell. Feltöltés után megadja a letöltő linket , ezt kell lemásolni és bemásolni ide. Vírusvizsgálatot is végez, ezért egy kis időbe beletelik, mire letölthető a fájl.

Én ezt szoktam használni, ha nagynéha közzé kell tennem valamit.

Üdv.

Ps. Én is elég régi nyugdíjas vagyok, viszont C64-el kezdtem, aztán pedig néhány egyéb után jött az Excel. Nem ördöngősség, meg lehet ezt is tanulni. :)

Nem sértődtem meg, tisztában vagyok vele, hogy számítógépes dolgokban igen alulművelt, vagy inkább egyoldalú vagyok. :-)

Pedig annak idején tanultam is Algol programnyelvet, és a cégnél a Windows bejövetele előtt írtam is saját használatra programokat a belső rutinfeladatokra.

De aztán mindez okafogyottá vált az Excel bejövetelével.

A nagy robbanások az Internet használatban meg éppen azután jöttek, mikor már nyugdíjba mentem, itt elszakadt a fonál, hisz nem volt rá szükségem...

Szia!

Az Excelem is 2007-verzió.

Ismeretlen területen járok, de megpróbálom feltenni az egyik fájlomat a tárolóba, ha sikerül, majd jelzem.

Milyen feltételekkel lehet a tárolót használni? Regisztráció, használati díj, stb...

És persze felteszem a hozzátartozó kezelési utasítást is, amit én írtam, a használata során összegyűlt tapasztalatok alapján.

Azt is jelzem, hogy a gép védelme általában letiltja a fájlt, mindig le kellett venni a védelmét közepesre, akkor már működött.

Az új gépedre mi gátol abban, hogy a 2007-es Office-t telepítsed? Nem kell venni semmit. Ha nem tudod a telepítési kódot, a ProduKey nevű programot felteszed a régi gépedre, és megmondja. 

Már, ha a makróid a lényegek, és nem kell az újabb Office tudomisén milyen szolgáltatása.

A tizenéves gyereket nem bántásként írtam. Ez a korosztály ösztönösen nyitottabb az informatikára, mint a előző korosztályok. Hátha tudnak segíteni.

Bocs,de nincs a baráti körben egy tizenéves gyerek, akit megkérhetnél , hogy küldje el a fájlt?

Sajnos ilyen alapismeretek nélkül nincs esély segíteni. 

Szia!

Nem a Windows verziók kellenek, hanem az Excel verziói.

"Ilyenkor fel kell tölteni valami online elérhető tárolóra, ahonnan letöltheti más is?"

Igen, például a DATA.HU erre alkalmas.

Ha a fájlban nincsenek kényes adatok, akkor az egészet felteheted ide. A linket pedig bemásolod ide.

Üdv.

Hű, nagyon laikus vagyok a szoftverek kezelésében, még azt sem értem, amit kérdezel... :-)

Az eredeti makrók még XP-n készültek, viszont jól működnek a Windows 2007-en is, amin használom.

Egyáltalán mit kellene bemásolnom ide a fórumra?

Talán valahogy elő kell csalni a makrót, és ennek a kilistázott alakját kellene idemásolni?

Én a makrókhoz sem értek, ezt az egyik kollégám csinálta a csapatnak, akik nekiláttak az angol tanulásnak.

Azt sem tudom, hogyan lehet megjeleníteni a makrót, én csak a működő excel fáljt látom és működtetem.

És melyik Excel verzióra gondolsz, a jelen gépemen lévőre, vagy arra, amelyikre tenni szeretném?

Arról már nem is szólva, hogy fogalmam sincs mi az a VBA immediate ablak, hol találom azt az én W. 2007-emen.

Az nem is elég, hogy Windows 2007, ennek is vannak különböző verziói, és ez kellene?

És ráadásul a fájl megosztását sem ismerem.

Ilyenkor fel kell tölteni valami online elérhető tárolóra, ahonnan letöltheti más is?

Más problémám nincs, illetve még nem tudok róla... :-)

Szia!
Elvileg az office 2007-ben írt makrók tudnak futni az újabb verziókon. Ezért azt gondolom, valóban jó lenne, ha egyet-kettőt elérhetővé tennél akár csak úgy, hogy bemásolod ide a fórumra, még munkafüzet sem kell belőle egyenlőre. Kellene viszonta a konkrét Excel verzió, amit a VBA immediate ablakban úgy kapsz meg, ha beírod ezt ? Application.Version majd Enter.

A makrókat így is meg tudnánk vizsgálni. 

De ha imre kérésnek megfelelően megosztasz egy fájlt, az is működhet természetesen.

Üdv.

Köszönöm a tájékoztatást!

Az a helyzet, hogy már nem is tudom pontosan regisztrálni az előéletet.

Ugyanis a nejem gépén vásárláskor rajta lévő office szerűség is jelezte egyszer, hogy lejárt, és felajánlotta az office 365 próbaidejű használatát, amit elfogadott. Így már nem is tudom megnézni, hogy milyen néven futott az első valami, mert le lett váltva.

Viszont ezek szerint a 365 sem tudta kezelni a fájljaimat. Gondolom, a próba használatra ugyanaz a verzió futott, mint a végleges fizetős.

De nem foglalkozom tovább vele, bízom benne, hogy az öreg gépemet életben tudom tartani, és használni, még ha veszünk is mellette egy korszerű laptopot, a nejem meg megveszi az office 365-öt, mert most nincs működő office-ja.

Tudom, most már meg kell szokni, hogy minden Windows alkalmazás szolgáltatás üzemmódban működik, és bizony évente pénzbe kerül, csak nekem szokatlan, mert annak idején, mikor a gépemet vettem, az eladó sima kérésre rátette az office 2007-et, gondolom kalóz módon, ki tudja hány kuncsaftnak, és ráadásul ez soha nem jár le, ősidők óta használom gond nélkül.

A régebbi verziók eleve nem lejárónak készültek, egyszeri beszerzés után életfogytig használhatók voltak?

"A múltkor kiderült, hogy a nejem gépén, amelyen 2010-es verzió van, nem is működnek ezek a fájlok."

Tudnál küldeni egy olyan fájlt, ami nem működik a nejed gépén, és nem tartalmaz bizalmas infrmormációkat? Mert akkor ki lehetne próbálni, hogy Windows 10/Office 2021.Office 2019, vagy office 2010 verziók alatt működik-e, esetleg Office 365 alatt, ami előfizetéses.  (Javaslom, hogy ha van ilyen fájlod, akkor töltsd fel a Google drive-ra, vagy a Microsoft Onedrive-ra, és csak a linket küldd el. Olyan beállítással, hogy a "link birtokában bárki letölthesse ")

Mellesleg nem tartom valószínűnek, hogy a Windows 7/Windows 10 az oka annak, hogy nem működnek a makrók.

Nekem is az a gyanúm, amit írsz: "Állítólag a nejem gépén már nem is a hagyományos office van, hanem a géppel adtak egy helyettesítő valamit, ami nem azonos és egyenértékű a megvásárolható office verzióval, ezért nem is működnek rajta ezek a régi fájlok."

Jó lenne megtudni, mi ez: Free office, OpenOffice, LibreOffice, Google Sheets? Úgy tudom, hogy az utóbbinál a makrók nem mindig kompatibilisek, bár magam nem is próbálkoztam. De a többinél is adódhatnak problémák.

Ahhoz, hogy eldöntsd milyen office verziót veszel, jó lenne látni, mi várható. Egyébként nem igazán javasolnék a 2021-nél régebbi verziót. Apropó, a most működő gépeden milyen Office verzió van? 2003, 2010, vagy újabb?

Elnézést ha nagyon laikusak a kérdéseim, de igazi júzer vagyok, nem ismerem a mai Office állapotokat hozzáférhetőség és jogszerűség szempontjából.

Az én gépemen még Windows 2007 van, és van egy rakás excel fájlom, amire annak idején jó kis makrókkal profi lekérdező programok készültek még XP-n, amelyeket a mai napig használok nyelvtanuláshoz a 2007-en.

A múltkor kiderült, hogy a nejem gépén, amelyen 2010-es verzió van, nem is működnek ezek a fájlok.

Azóta úgy vigyázok öreg Windowsomra, mint a szemem fényére, óriási adatmennyiség van ezeken a fájljaimon, szükségem van rájuk, futtathatóságukra.

Állítólag a nejem gépén már nem is a hagyományos office van, hanem a géppel adtak egy helyettesítő valamit, ami nem azonos és egyenértékű a megvásárolható office verzióval, ezért nem is működnek rajta ezek a régi fájlok.

Szerintetek ha megveszem az új gépre az office-t, az fogja tudni kezelni a régebbi makrós fájlokat?

Megköszönném, ha valaki kicsit körbefutná a témát, hogy állnak most ezek a dolgok, mert mióta nyugdíjas vagyok kissé lemaradtam az infókkal, amit annak idején kollégáktól meg tudtam szerezni...

Itt mutatja az excel fájl felépítését hozzá.

https://blogcdn.gmass.co/wp-content/uploads/2022/03/sheets-datareporting-tinified.png

Rájuk néztem, de nem mélyedtem el bennük. Így elsőre nem látom azt, amit egyáltalán alapvetően szerettél volna megoldani, az egyes levelekhez más és más csatolmány hozzáfűzését. Ezt tudja a kettő közül valamelyik?

Egyébként látatlanban  feltételezem, hogy valószínűleg egyszerűbben kezelhetők, mint a Word körlevél kezelő.

Közben kiderült, gmailre kellene a kör-email szolgáltatás.

Találtam fizetős add-on verziót. https://www.gmass.co/features/google-sheets-integration

És van talán ingyenes is. https://developers.google.com/apps-script/samples/automations/mail-merge

Köszönöm a segítségedet.

Aulac

Szia, én azt hittem, hogy a megoldásod megvan valahol a fórumon. De ha nincs, akkor sokat segítenél a kérdezőnek, ha egy mintaoldallal együtt közzétennéd.

Bocs, akkor félreértettem a dolgot. Azt hittem, hogy ez már korábban felkerült a fórumba. És akkor ezért nem találtam, mikor keresgéltem.

Gondolom, egy "légy szíves mintaoldallal közzétenni" megoldaná ezt a gondot.

"Eredő Vektor  37990-es megoldása adott, kész, tesztelt. Kizárt, hogy jobbat tudnék." Hát még ha lenne hozzá egy link is:-)

off

igazolt hiányzás, a jobb szememet jóra cserélték ;-)

on

Eredő Vektor  37990-es megoldása adott, kész, tesztelt. Kizárt, hogy jobbat tudnék.

Ahogy olvasom egy makrós, nem olyan bonyolult mint az enyém volt.

Látatlanban max. annyit, hogy biztosan van lehetőség a körlevél azonnali elküldése helyett nyomtatni, és ott lehet ellenőrizni.

A 37993-es https://learn.microsoft.com/hu-hu/dynamics365/outlook-addin/user-guide/dynamics-365-outlook-user-s-guide helyen azt írják, hogy a régit nem támogatják, van újabb. Azzal mi a gond?

Szia!

=HAHIBA(KICSI(HA(A1:A10<>0;A1:A10);1);0)

Üdv.

Próbáltam ezt is  =KICSI(HA(A1:A10<>0;A1:A10);1) Ez meg csak akkor működik, ha bármilyen 0-nál nagyobb érték már van valamelyik cellában. Ha csak 0-k, akkor ÉRTÉK hibát ír ki.

Köszönöm.

És esetleg a második kérdésemre is van ötleted?

Aulac

Szia.

Az O8-as cellában ez van: =MIN(HA(@J7:J11<>0;J7:J11))

A cellaformázás legyen # ##0" m3"

Vagy az addig beírt legkisebb érték jelenjen meg a m3 előtt, és a nulla értéket ne vegye figyelembe.

Sziasztok.

Megint kérdésem van.

A képen látható, hogy ha a bal oldalon "0" érték van akkor a jobb oldali körnél üres cella jelenik meg. Azt szereném, hogy a "m3" előtt addig míg nem írok a bal oldalra minden cellába értéket addig a következő jelenjen meg: "0m3" = nulla köbméter/KWh.

Van valamilyen megoldás?

Köszönöm a fáradozásaitokat.

Aulac 

Azért várj még egy kicsit, hátha m54-b idetéved. Szerintem ő meg tudja oldani. Csak mostanában ritkábban néz ide. De azért vasárnap írt egy másik topikba. Sajnos nem nyilvános az email címe.

Még ezt ajánlották mint fizetős kiegészítő, de úgy látom kinyírták vmiért 2020-ban.

https://learn.microsoft.com/hu-hu/dynamics365/outlook-addin/user-guide/dynamics-365-outlook-user-s-guide

Hát, erre nincs sajnos beépített funkció. Még PowerAutomate-el szoktunk hasonló munkát munkát végeztetni, de itt is elérési úttal kap csatolmányt az e-mail. (mivel mással...) Ez ingyenesen windowsba épített eszköz, korlátozásokkal. (A fizetős korlátlan)

Köszi, de ha ez makrós ügy és többszörösen is, abban teljesen inkompetens vagyok. Ráadásul nem lehet hogy ellenőrizni és ha tényleg kimegy tucat email rossz helyre az nagyon gáz volna. Inkább nem kísérleteznék vele. De köszönöm a válaszokat! 👍

Ezt VBA-val úgy készítettem el, hogy egy táblázaton végigmegy egy ciklus és a táblázatban szerepel a csatolmány elérési útja is. (és minden egyéb ami kell a levélküldéshez a VBA számára - mint levéltörzs, tárgy, cc, stb...)

Emlékeim szerint M54-b olvtárs csinált valami hasonlót másfél éve: http://forum.index.hu/Article/viewArticle?a=162536543&t=9009340. Hátha erre is lesz megoldása.

Sziasztok!

Csak még egy kérdés a körlevélhez...
Lehet hogy inkább Outlook funkcióra vonatkozik, de egy olyan kérdés merült fel, hogy ha van excelben egy email címlista és mellette még egyedi doksi mellékletek, lehetne-e csoportosan emailt küldeni ez alapján úgy, hogy adott címzettnek szólóan a rá vonatkozó egyéni doksi melléklettel automatikusan küldözgesse ki a rendszer az excel lista alapján amit kell?
Magyarul, ne kelljen a titkárnőnek 150 emailt külön megszerkeszteni és egyenként elküldözgetni.

Köszi!

Szia!

Szívesen. Mindig tanul az ember. Az összfűzött keresésről például most tőled.

Üdv.

Szia!

Köszönöm a segítséget! Bár kicsit szégyellem magam, hogy 25 év alatt erre nem jöttem rá. Volt már máskor is problémám ebből, akkor is a csillag karakter kavarta fel az életem. Nem gondoltam volna, hogy a keresésnél mint helyettesítő karakter éli az életét, nem pedig mint csillag. Nagyon hasznos volt a tájékoztatód!

Köszi!

Kiegészítés: Az érdemjegyes táblázat:

A rendezetlen táblázat:                                                                  A rendezett táblázat X-t használva

Üdv.

Szia!

Először az FKERES függvényről: 

A 4. paraméter szabályozza, hogy pontos egyezőséget keresünk vagy "közelítőt". 

A 0 vagy HAMIS pontos egyezőséget keres, az 1 vagy IGAZ közelítőt. Mit jelent a közelítő érték:

Ahhoz, hogy a közelítő keresés (avagy tartományban keresés) működjön, a keresőtábla keresési oszlopának emelkedő sorrendben kell lennie, pontos egyezés keresése esetén ez nem szükséges. Közelítő egyezés keresése esetén azt az értéket kapjuk vissza, amely még nem nagyobb a keresési táblában szereplő értéknél. Ezt ellenőrizhetjük úgy, hogy a harmadik paramétert 1-re -azaz magára a keresési oszlopra állítjuk.

Pl. van egy ilyen táblánk:

Az FKERES(56;B2:C7;2;1) képlet eredménye 3, mivel 56 nem nagyobb 75-nél, vagyis az 55 és 75 közötti tartományba esik, ezért az 55-höz tartozó értéket kapjuk vissza a C oszlopból. A B oszlopban az adott érdemjegyhez tartozó alsó pontérték határát kell megadni.

Ez így kiválóan működik, ha számokat kell keresnünk.

Esetedben viszont a keresést szövegben kell végrehajtani. Itt már előjönnek a szöveges keresés speciális szabályai:

1. A legfontosabb a csillag (*) ugynevezett helyettesítő/joker karakter. Mit jelent ez? A csillag helyettesíthet akárhány és akármilyen karaktert!!!

Pl. a.) *ház keresés a ház-ra végződő szavakat találja meg, legyen az áruház vagy nyilvánosház vagy beruház!

    b.) ház* keresés a ház-zal kezdődő szavakat találja meg, pl. házfal, háztető, házaló!

    c.) *ház* minden szót megtalál, ami tartalmazza a ház betűcsoportot, pl. beruházás, áruházi, átruházás!

Az FKERES pedig mindig a legelső találatot adja vissza.

Esetedben tehát a legelső olyan találatot, amely a szövegedben az első * előtti szöveggel kezdődik. Ez a "furcsa" viselkedés magyarázatának egyik része. TEHÁT A * helyett használj más karaktert (pl. x ) a méretek jelzésénél.

2. A probléma másik része a szövegek sorbarendezésének szabályából adódik. Amint a 4. paraméternél láttuk, a közelítő egyezéshez sorba kell rendezni a keresési táblát.

Mivel a méret tábla is szöveg, a benne levő számok szövegesnek minősülnek, ráadásul a rövidebb szöveg van előrébb:

Eredeti                                                                                            Sorba rendezett (már X-t használva)  

Pontos egyezésnél egyértelmű amit keresünk -> vagy van, vagy nincs.

Közelítő egyezésnél viszont amint látod, pl a Durvalemez|1250X2500X11 méretnél a Durvalemez|1250X2500X10-et fogja megtalálni és az ahhoz kapcsolódó értéket adja vissza.

Ha a fentieket figyelembe veszed, akkor nem lesz "furcsa" a függvény viselkedése. Így alkották meg, alkalmazkodni kell hozzá a használat során. (fene essen a redmondi logikába....)

Üdv.

Nagyon köszi, @Fferenc50, szuperül működik!!!

Sziasztok!

Az alábbi függvényhez kellene egy kis segítség:

FKERES függvény szintaktikába bonyolódtam bele egy kicsit. Ugyanis, ha pontos egyezést szeretnék, akkor HAMIS értéket kell adjak „Tartományi keresés” értékének. De van olyan eset a példában, mikor ez nem működik:

1 példasor: HAMIS érték esetén jó eredményt kapunk (így kellene működni)

2 példasor: IGAZ érték esetén hibás eredményt kapunk (így kellene működni)

3 példasor: HAMIS érték esetén hibás eredményt kapunk (nem így kellene működni)

4,5,6 példasor: IGAZ és HAMIS érték esetén is jó eredményt kapunk (nem így kellene működni?)

Van valakinek ötlete, hogy ez miét van így?

Azt szeretném, hogy HAMIS esetén mindig a helyes eredményt adja, tehát ha van adat, akkor azt, ha nincs akkor a #HIÁNYZIK hibaüzenetet.

Példa: https://data.hu/get/14169070/Minta_fkeres.xlsx

Szia!

A feltételes formázás képlete, ha a C1 cellában van a beszínezendő cellák száma:

=OSZLOP()<=(OSZLOP($C1)+$C1)

Ezután kijelölöd a tartományt - addig az oszlopig ameddig szeretnéd a színezést.

A tartomány sorait húzhatod lefelé! Minden sorban annyi cellát fog beszínezni a 4. oszloptól kezdve, amennyi értéket a C oszlop adott sori cellájába írtál. - ha a C5 érteke 2  akkor D:E, ha 5 akkor D:E:F:G:H oszlopok 5. sora színeződik.

A képlet mindig a megadott cella sorában érvényesül.

Üdv.

A D4:K4 tartományra a feltétel =$C$4=8, a D4:G4 tartományra pedig =$C$5=4.

(Bocsánat, elszállt, nem fogom tudni úgy újra megírni.)

Megoldható, csak két felé kell venned a tartományt (D-G, H-K). Nekem mindig nagy küzdés, de megéri.

Saját példa az I16 cellára:

Értékek formázása, ha ez a képlet igaz:

=C16=H16

Érvényesség:

=$I$16

Az I16-ot pedig formázod, ahogy szeretnéd.

Sziasztok!

Van olyan feltételes formázási trükk, amivel adott számú cellát tudok kijelölni (kiszínezni) egy sorban egy másik cella értéke alapján? Értsd, ha a C4 cellában 8 szerepel, akkor a D-E-F-G-H-H-I-J-K oszlopok 4. sorában található cellákat színezze, mondjuk, szürkére, ha C5 cellában pedig 4 szerepel, akkor a D-E-F-G oszlopok 4. sorában található cellákat színezze. 

Előre is nagyon-nagyon köszi a segítséget :)

Szia. Ez a tökéletes megoldás. Köszönöm.

Off: Nem érthetően írtam sajnos. A C12-C15 cellákba a minden hétfőn leolvasott értéket kell beírni. Az I12-I15 cellákban kiszámítja az aktuális leolvasás és az előző hétfői állapot különbségét. (heti fogyás)

Az N oszlopban a havi minimum, maximum; és átlag számítás van.

Mindig tanulok tőletek.

aulac

Szia!

Benne maradt egy felesleges idézőjel és félreérthető is volt, nem akartam az átlagha függvényt megismételni...

A képlet helyesen:

=HAHIBA(Átlaghafüggvény);0)

Az Átlaghafüggvény helyére az eredeti képleted írd be.

A HAHIBA függvény szerepe: ha a benne szereplő képlet eredménye valamilyen hiba, akkor a megadott értéket - itt 0-t - ad vissza a Hibajelzés helyett. 

Üdv.

Ez lehet az Office 365 dynamic array funkció vagy egy spill is.

https://support.microsoft.com/en-us/office/dynamic-array-formulas-and-spilled-array-behavior-205c6b06-03ba-4151-89a1-87a7eb36e531

Ja és persze akkor már felesleges lesz az átlagha. Elég lesz az átlag.

Miért nem úgy számolod ki N15-öt,hogy =HA(SZUM(I12:I15)=0;0;ÁTLAGHA(I12:I15; "<>0")) (Persze a Szum függvénybe írhatod a C12:C15-öt is.)

Off: Az első sorban írtakat egyébként nem értem. "C12:C15 cellákba heti (minden hétfőn leolvasott) fogyasztási adatokat írok. I12:I15 cellákban a heti fogyasztási összesítést számol ki." Hogy csinálsz 4 cellából másik 4 cellába fogyasztási összesítést? Persze a dolog érdeme szempontjából ezt nem szükséges tudnom.

Sajnos ez semmit sem csinál.

Szia!

Idézet a súgóból:

"A függvény figyelmen kívül hagyja a tartomány IGAZ vagy HAMIS értéket tartalmazó celláit.

• Az ÁTLAGHA függvény figyelmen kívül hagyja az átlagtartományban található üres cellákat.

• Ha a tartomány üres, vagy értéke szöveg, az ÁTLAGHA függvény a #ZÉRÓOSZTÓ! hibaértéket adja eredményül.

• Az ÁTLAGHA függvény 0-nak tekinti a feltétel üres celláit.

• Ha a tartomány egyetlen cellája sem tesz eleget a feltételnek, akkor az ÁTLAGHA eredménye a #ZÉRÓOSZTÓ! hibaérték lesz."

Használd a HAHIBA függvényt.

=HAHIBA(Átlagha;feltétel);"0)

Üdv.

Szia!
Lehet benne egy eseménykezelő makró...

Üdv.

Olyan excelt tábláról hallottatok már, amiben a ki törlünk egy cella tartalmat utána automatikusan vissza íródik? Milyen trükk lehet ez? Egyszerűen így javítani sem lehet benne.

Sziasztok.

Segítség kérése:

C12:C15 cellákba heti (minden hétfőn leolvasott) fogyasztási adatokat írok. I12:I15 cellákban a heti fogyasztási összesítést számol ki.

Az N15 cellába kéne a havi átlagot kiszámolnia az Excelnek az I12:I15 szerint.

Ezt írtam be: =ÁTLAGHA(I12:I15; "<>0").

Ha a C12,C13,C14,C15 cella üresen marad, Mert semmi adat nincs beírva, akkor az N15cellában =ZÉROOSZTÁS! hiba jelenik meg.

Az kéne, hogy az üresen maradó C12-C15 cellékat ne vegye figyelembe és addig az N15 cellában "0" jelenjen meg.

Köszönettel: aulac

Köszi.

Igaz nem úgy ahogy te írtad de hasonlóan sikerült.

Köszönöm szépen.

Szia!

Bocsánat, a függvény nevét elírtam, a VKERES függvényről van szó.

Itt láthatod a képleteket:

Üdv.

Szia!

Ha már módosítani akarsz, elsőként a felépítést érdemes megfordítani.

Napból sok lesz, míg az egyes értékekből naponta egyforma mennyiség (fogyasztott és betáplált óra állás, a kettő különbségei, és az elszámolás).

Az első oszlopban legyen a dátum, mellette az 5 adat, amikből hármat képlet számít ki.

Sokkal könnyebb lefelé gördíteni, mint oldalra.

Ebben az esetben az utolsó rögzített adatnál mented a füzetedet, másnap nem kell keresgélni az új sort. A címsort rögzítheted, hogy az mindig látható legyen.

Jó reggelt.

Le tudnád írni nekem egy pelda függvényben. Nem jön össze az, hogy a dátumot  hozzárendeljem.

Köszi.

Szia!

Én úgy látom, hogy a Dátumos oszlopokhoz is két adatot kellene a 3-4. sorba beírnod.  Ha megfordítjuk a dolgot - mert a tárgynapot szeretnéd külön látni - akkor  a B15 cellába bekerülhet a mai dátum a ma() függvénnyel.

A B17-18 cellákba pedig a Hkeres függvénnyel  megkeresed a 3-4. sorba beírd adatokat.

Így minden nap frissül a B17-18 amikor beírod a napi adatokat.

Üdv. 

Adj még hozzá az eredményhez egy nullát. =BAL(A1;HOSSZ(A1)-1)+0 ez működik.

Nekem is a régebbiben, és cellát se kellett formázni.

Nem tudom milyen verziót használ, de az ingyenes LibreOffice-ba is be lehet húzni az XLS-t és meglehet ezt csinálni; ha másképp nem megy.

Igazából csak lustaság miatt gondoltam. így ahogy megcsináltam működik tökéletesen de a lustaság nagy úr. Így csak egy helyre kellene írni az adatokat.

Direkt kipróbáltam, a 2007-ben működöt (igaz colt egy cellaformázás --> szám).

Ugyan az a hiba lép fel ilyenkor is,végeredménynek 0át ír

Lecseréled az "M"-t semmire?

Sziasztok.

Van egy sor adatom ahol az értékek mellé manuálisan mellé van írva hogy "M"

nagyjából így néz ki:

A1=12M

A2=7,5M

A3=4,3M

és így tovább.

nekem ezeket a számokat összekéne adnom,viszont az "M" betű miatt ezt nem tudom SUM függvénnyel összeadni,és túl nagy a mennyiség ahhoz hogy az "M" betűket egyenként elkezdjem kitörölni.

=LEFT(A1;FIND("M";A1)-1)

ezzel a képlettel viszont eltudom tüntetni egy új sorban az M betűket az összesből,viszont a sum ezeket sem tudja összeadni,végeredménynek 0át ír.

Megpróbáltam így is: =Value(LEFT(A1;FIND("M";A1)-1)) , erre viszont azt írja hogy "A 12 nem értelmezhető számként"

így teljesen tanácstalan vagyok. Valaki tud megoldást a problémámra? 

Előre is köszönöm a válaszokat.

Szia!

Szia!

Mi oka van annak, hogy nem direktben a dátum alá írod be az adatokat?

Amit szeretnél az makróval oldható meg vagy Vkeres (esetleg Index - Hol.Van) függvényekkel és utána érték másolással, hogy ne változzon a napok változásával az érték.

Üdv.

Lemaradt a kép.

Sziasztok.

Elakadtam az Excelben. Mily meglepő.

A napelem termelésemet szeretném rögzíteni naponta de úgy, hogy csak egy cellába kelljen beírni az értéket és töltse ki egymás mellé dátum szerint az oszlopokba. megoldható ez? Csináltam egy screen shotot, hogy jobban érthető legyen.

Köszi ha van valamilyen ötletetek!

Szia!

Amennyiben csak a számformátum van pénznemre állítva, akkor sajnos nem műxik a képletes számolás. Ebben az esetben kell hozzá egy segédoszlop, amiben a pénznemek kiírva szerepelnek! Ehhez az oszlophoz kell beállítani a feltételt.

Üdv.

Ps. Nem is értem, hogy egy oszlopban miért állítgatjátok a pénznemek formátumát. Sokkal egyszerűbb és használhatóbb ha külön oszlopban van a pénznem.

Szia!

Szerintem próbáld meg a feltételes formázás - új szabály - a formázandó cellák kijelölése képlettel. A képlet pedig a következő:

=Darabha(Első munkalap tartománya;második munkalap cellája)=1

ezután kiválasztod a színt.

pl. =Darabha(Munka1!$A$1:$C$10;Munka2!A1)=1

Korábbi Excelnél Darabteli a függvény neve.

A képletben figyelj rá, hogy az alap tartományt rögzítsd dollár jelekkel, a keresendő értéket nem, így a képletet húzhatod lefelé és oldalra is.

Az =1 azt jelenti, hogy akkor színezi a cellát, ha pontosan 1 alkalommal fordul elő a másik tartományban. Ha mindegy hányszor fordul elő, akkor >0 legyen a feltételben.

Üdv.

Üdv.

Feltételes formázást megtudok valósítani valósidőben? Konkrétan azt szeretném,hogy van 2 adathalmazom,a 2 halmazban vannak 100%osan megegyező adatok. 

egy egyszerű példával szemléltetném mire gondolok

Munkalap1 adatai:
A1: Alma
A2: Körte
A3: Citrom

Munkalap2 adatai:
A1: Narancs
A2: Alma

A3: Barack

Munkalap2ben,szeretném ha azok a cellák amiben az adat megegyezik a munkalap1 adataival azok kapnának egy színt amit előre beállítok.
A példa alapján az A2es cella kapna egy színezést.

Előre is köszönöm a válaszokat