Akkor még egy javítás. Ha a :

holavege = Range("A:A").Find(What:="beillesztési pont", After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Row

változatot választod akkor a "beillesztési pont" részt írd át "XXX"-re. Én azt gondoltam, hogy a beillesztési pont maga a cellaérték. Nyilván ezt nem fogja megtalálni ha XXX-szel van megjelölve a vége.

Még egy dolog: ha aaz XXX minden esetben az utolsó sorban van akkor a

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

változat is működik.

Arra tudtok-e megoldást, hogy ha a makróm elején ki kell ürítenem a vágólapot, annak a tartamát hogyan tudnám visszaírni a vágólapra a makró végén?

[ Szerkesztve ]

Írd ki valahová a munkafüzetbe majd mikor kell olvasd vissza.

Sziasztok,

Fogos ravasz kerdes:

Van ket oszlop.

A oszlopban minden sorban vannak szamok. B oszlopban elkepzelheto hogy az adott sorban nincsen.

Ossze kene adni a szamokat A oszlopban ugy hogy azokat a szamokat ki kell hagyni amik mellett B oszlopban nincsen szam.

New level... Advertising has us chasing cars and clothes, working jobs we hate so we can buy shit we don’t need

És ha pl. éppen teljes sorok, vagy range van benne, esetleg kép?
egyáltalán hogyan érem el a clipboardot?

[ Szerkesztve ]

=SZUMHA(B:B;"<>"&"";A:A)

Nem is olyan ravasz.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Az XP-ig része volt a windowsnak egy clipboard viewer de ez úgy tudom a win7-től már nincs. Gondolom vannak ingyenes külső programok a neten erre a célra.

A képet nem tudom milyen formában akarod használni de a szokványos cellatartalmat a szokványos módon lehet hozni-vinni. A teljes sor is egy Range

Igen, találtam közben róla valamit.
RANGE-nel maradva a selection + cutcopymode lesz a megoldás.
Csak sajna ez más objecteket (diagram) lenyel...
persze most jobban belegondolva, lehet hogy a selection "visszaállítása" is elég lesz.

[ Szerkesztve ]

[ Szerkesztve ]

A lenti makró a lapon lévő diagramok címéből eltünteti a "0%" szövegrészt.

Sub NullaNyet()
Dim CV As Integer, szoveg As String

For CV = 1 To ActiveSheet.ChartObjects.Count
ActiveSheet.ChartObjects(CV).Activate
szoveg = ActiveChart.ChartTitle.Characters.Text
szoveg = Application.WorksheetFunction.Substitute(szoveg, "0%", "")

ActiveChart.ChartTitle.Characters.Text = szoveg
Next
End Sub

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Sziasztok!

Van egy makróm, amit arra használok, hogy egy mappában szereplő összes xls tartalmát behúzza egyetlen sheetre. Először egy másik makróval kilistáztatom az összes fájlt ami az adott mappában van, majd futtatom az alul találhatót.

Tudnátok segíteni abban, hogy hogyan tudnám módosítani olyan módon, hogy miután egy fájlból bemásolta az összes sort, törölje ki azokat a sorokat, amiknek bármelyik (vagy ha így nem lehet, akkor I és M oszlopban) cellájában q vagy r szerepel.

Azért lenne erre szükségem, mert 16-17 ezer sorosak a fájlok, amiket importál a makró, viszont mindegyiknek körülbelül harmadában szerepel q vagy r érték, amelyek számomra haszontalan adatok, így rengeteg helyet spórolhatnak (közel vagyok az 1 millió sorhoz, és ha azt túllépem, nem másolja tovább a makró dolgokat).

Az alábbi makrót használom az importálásra. Segítenétek módosítani?

Köszönöm szépen.

Sub pasteall()

Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
Application.DisplayAlerts = False

Dim PL, files As Variant
Dim i, j As Long
Dim k, l, m, n As Long
Dim wbname As String



' select this workbook and clear all the input sheets

wbname = ThisWorkbook.Name

Workbooks(wbname).Activate
Sheets("Data Sheet").Activate
Range("D4:U1000000").ClearContents


'copy data

For i = 1 To Range("WorkbookCount").Value

workbookpath = Range("Workbook_Name_Header").Offset(i, 0)
PL = Range("Desk_Name_Header").Offset(i, 0)
files = Range("File_Name").Offset(i, 0)




Workbooks.Open (workbookpath)

Sheets("Data").Activate
Range("A65000").Select
Selection.End(xlUp).Select

l = Selection.Row
Range("A2:W" & l).Select
Selection.Copy


Workbooks(wbname).Activate
Sheets("Data Sheet").Activate
Range("A1035000").Select
Selection.End(xlUp).Select

Selection.Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

Workbooks(files).Activate
ActiveWorkbook.Close


Next i

Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
Application.DisplayAlerts = True


End Sub

szia,
ha jól értettem:

Sub pasteall()

Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
Application.DisplayAlerts = False

Dim PL, files As Variant
Dim i, j As Long
Dim k, l, m, n As Long
Dim wbname As String
Dim rng As Range
Dim rw As Range
Dim cell As Range


' select this workbook and clear all the input sheets

wbname = ThisWorkbook.Name

Workbooks(wbname).Activate
Sheets("Data Sheet").Activate
Range("D4:U1000000").ClearContents


'copy data

For i = 1 To Range("WorkbookCount").Value

workbookpath = Range("Workbook_Name_Header").Offset(i, 0)
PL = Range("Desk_Name_Header").Offset(i, 0)
files = Range("File_Name").Offset(i, 0)




Workbooks.Open (workbookpath)

Sheets("Data").Activate
Range("A65000").Select
Selection.End(xlUp).Select

l = Selection.Row
Range("A2:W" & l).Select
Selection.Copy


Workbooks(wbname).Activate
Sheets("Data Sheet").Activate
Range("A1035000").Select
Selection.End(xlUp).Select

Selection.Offset(1, 0).Select

Selection.PasteSpecial Paste:=xlPasteValues

'Uj resz
Set rng = Selection
For Each rw In rng.Rows
rw.Select
Set cell = Selection.Find(What:="q", After:=Selection(1, 1), LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)

If Not cell Is Nothing Then
Selection.EntireRow.Delete
Else
Set cell = Selection.Find(What:="d", After:=Selection(1, 1), LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)
If Not cell Is Nothing Then Selection.EntireRow.Delete
End If
Next
' Uj resz vege


Application.CutCopyMode = False

Workbooks(files).Activate
ActiveWorkbook.Close


Next i

Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
Application.DisplayAlerts = True


End Sub

Nem teljesen dolgoztam fel, mit is csinál a makród, de ezek a címzések picit bonyolultnak tűnnek a range-k-hez...

[ Szerkesztve ]

[ Szerkesztve ]

Nem kell külön beolvastatni a fájlneveket, majd másolni, végül törölni a felesleges sorokat. Az alábbi makró mindegyik műveletet elvégzi.

Két dolgot kell átírnod benne, az útvonalat, ahonnan a fájlokat behívod, és a kiterjesztést, ha 2007-es verziónál régebbi Excelt használsz.

Sub Osszemasolas()
Dim FN As String, utvonal As String, WS As Worksheet
Dim hova As Long, tabla As Range, CV As Object

Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
Application.DisplayAlerts = False

Set WS = ActiveWorkbook.ActiveSheet
utvonal = "F:\Eadat\Tmp\" 'fájlok útvonala, írd át
FN = Dir(utvonal & "*.xlsx") '2007-es előtti verziónál xls-re írd át

Do While FN <> ""
hova = Application.WorksheetFunction.CountA(Columns(1)) + 1
Workbooks.Open utvonal & FN
Sheets("Data").Select

Range("A1").Select
Set tabla = Cells.CurrentRegion
tabla.Offset(1, 0).Resize(tabla.Rows.Count - 1, tabla.Columns.Count).Copy

WS.Cells(hova, "A").PasteSpecial Paste:=xlPasteAll

Windows(FN).Close False 'Zárja a megnyitott fájlt mentés nélkül

For Each CV In Selection
If CV = "q" Or CV = "r" Then Rows(CV.Row).Delete
Next
FN = Dir()
Loop

Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
Application.DisplayAlerts = True

MsgBox "Kész", vbInformation
End Sub

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Kicsit gyorsítva az előbbi (törli a sorokat, ahol bármelyik oszlopban szerepel a q vagy az r):

Sub Osszemasolas()
Dim FN As String, utvonal As String, WS As Worksheet
Dim hova As Long, WF As WorksheetFunction, vege As Long, sor As Long
Dim tabla As Range

Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
Application.DisplayAlerts = False

Set WS = ActiveWorkbook.ActiveSheet
Set WF = Application.WorksheetFunction
utvonal = "F:\Eadat\Tmp\" 'fájlok útvonala, írd át
FN = Dir(utvonal & "*.xlsx") '2007-es előtti verziónál xls-re írd át

Do While FN <> ""
hova = WF.CountA(Columns(1)) + 1
Workbooks.Open utvonal & FN
Sheets("Data").Select

Range("A1").Select
Set tabla = Cells.CurrentRegion
tabla.Offset(1, 0).Resize(tabla.Rows.Count - 1, tabla.Columns.Count).Copy

WS.Cells(hova, "A").PasteSpecial Paste:=xlPasteAll

Windows(FN).Close False 'Zárja a megnyitott fájlt mentés nélkül

vege = WF.CountA(Columns(1))
For sor = hova To vege
If WF.CountIf(Rows(sor), "q") > 0 Or WF.CountIf(Rows(sor), "r") > 0 Then
Rows(sor).Delete shift:=xlUp
End If
Next

FN = Dir()
Loop

Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
Application.DisplayAlerts = True

MsgBox "Kész", vbInformation
End Sub

[ Szerkesztve ]

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Köszönöm szépen!

A holavege = Range("A" & Rows.Count).End(xlUp).Row verzió működött egyedül. De nekem megfelel.
A többinél runtime error 13 type mismacska hibaüzi volt. Még 1x köszönöm

Nagyon köszönöm az eddigi segítséget. A következő lenne egy időre az utolsó kérdésem:

Mint a csatolt képen, a jobb oldali táblázatot szeretném feltölteni a megfelelő adatokkal a bal oldali listák segítségével. Pl. a 23-as szám oda kerüljön, ahol a nyíl mutatja.
Milyen függvénykombinációval tudok úgy keresni, hogy két értéket is keresek két külön oszlopban (kék és rózsaszín) és ahol egyezés van, ott a "metszetet" dobja ki eredményül.?

Persze bocsánat a kis rajzomon véletlenül egy cellába több érték is bekerülhet, az eredeti táblázatomban nincs ilyen hiba, de ez a megoldáson nem változtat. Köszi

[ Szerkesztve ]

Koszonom szepen

akkor hogy megis ravasz legyen:

Meg lehet ezt csinalni ugy hogy ha filtereznek akkor csak a megjelent sorokat szamolja? Termeszetesen most is ervenyes az hogy ha ures a mellette levo B oszlop akkor azt ne szamoljuk.

Filternel a subtotal tud ilyet ha jol emlekszem de azzal valahogy nem akar osszejonni az ures cellas kitetel

New level... Advertising has us chasing cars and clothes, working jobs we hate so we can buy shit we don’t need

Nincs mit.

Az F2 cella képlete

=SZUMHATÖBB($B:$B;$A:$A;$E2;$C:$C;F$1)

ezt másold az F2:I5 tartományba.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

üdv újra

utolsó sort hogyan lehet törölni makróval?
csak az egyik oszlop szummája van ott, de kimutatásnál csak galibát okoz.
A táblázat mérete változó.

Köszönöm!
De az sajnos pont nem előnyös, hogy összegzi, ha többet talál, nincs egy hasonló képlet, ahol összegzés helyett csak felsorolja az értékeket? Nagyon jó lenne

Erre esetleg valaki?

Osszeszedem akkor hogyan is nezne ki:

A oszlop szamait kellene osszegezni ugy hogy csak azokkal szamolunk ami mellett a B oszlop cellaja nem ures viszont ha filterezek akkor is a helyes osszeget mutassak ( A SUMIF/SZUMHA fuggveny mindig a teljeset (termeszetesen a B oszlop kriteriumot figyelembe veve ) mutatja akkor is ha filterezek )

[ Szerkesztve ]

New level... Advertising has us chasing cars and clothes, working jobs we hate so we can buy shit we don’t need

Sziasztok!

Van arra valami bejáratott módszer, hogy szövegfile-t (TXT) szeretnék Excelbe táblázatos formában átrakni úgy, hogy a szövegfileban egy rekord egy sor? Azaz 4 különböző mezőérték, rekord ismétlődik soronként....

Lásd:
név1
122.122.132.133
acd0
egy
név2
122.122.131.131
acdddd
egy
név3
122.122.134.135
acd34f
kettő
...

Sajnos a program, amiből át kellene rakni táblázatos formába az adatokat csak így exportálja... Valami ötlet...?

Transform -al meg lehet csinalni csak kell valami ami alapjan tudjuk hol vagjuk el az adatokat -----> tudni kell hogy mi kulonbozteti meg a nevekkel kezdodo sort.

A nevek ele nem tudsz vesszot vagy barmit rakni?

New level... Advertising has us chasing cars and clothes, working jobs we hate so we can buy shit we don’t need

Sziasztok!

A múltkori kapott segítséggel szépen haladok, most jutottam el a következő problémáig, ebben szeretnék megint segítséget kérni.

Visszakerestem a topikban és láttam, hogy már volt erről szó, de sajnos nem sikerül az alapján megoldani a dolgot.

FKERES függvénnyel szeretnék több munkalapon kerestetni.

A függvény a Munka1 lap E2 cellája alapján keres, és szépen működik is, de csak a képletben szereplő munkalapon nyilván. Azt szeretném, hogy ehhez még tudjak adni több munkalapot.

A munkalapok megegező struktúrájúak, a keresési tartomány megegyezik.

Ezt a képletet használom:
=FKERES(E2;Hidraulika_Tömlő!A1:L126;12;0)

A Hidraulika_Tömlő az egyik munkalap neve, és ezt szeretném még kibővíteni mondjuk, Mosó_Tömlő, Kompresszor_Tömlő, stb. nevű munkalapokkal!

Köszönöm!

"a kis rajzomon véletlenül egy cellába több érték is bekerülhet, az eredeti táblázatomban nincs ilyen hiba"

Ebben az esetben is jól működik a képlet.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

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

Az "A" helyett annak az oszlopnak a betűjelét írd, ahogy az összegző képleted van.

[ Szerkesztve ]

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Amennyiben számok vannak a 12. oszlopban, és ezeket összegezni akarod, akkor

=FKERES(E2;Hidraulika_Tömlő!A1:L126;12;0)+FKERES(E2;Mosó_Tömlő!A1:L126;12;0)+...

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Ezzel rendbe teheted

Sub Athelyez()
Dim sor As Long

sor = 1
Do While Cells(sor, "A") <> ""
Cells(sor, "B") = Cells(sor + 1, "A")
Cells(sor, "C") = Cells(sor + 2, "A")
Cells(sor, "D") = Cells(sor + 3, "A")
Rows(sor + 1 & ":" & sor + 3).Delete Shift:=xlUp
sor = sor + 1
Loop
End Sub

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

A D1 cellába beírja az összeget, szűrt állományban is.

Sub valami()
Dim ter As Range, CV As Range, osszeg

Set ter = Columns(1).SpecialCells(xlCellTypeVisible)
For Each CV In ter
If CV.Row > 1 And Cells(CV.Row, "B") > "" Then osszeg = osszeg + CV
Next
Range("D1") = osszeg
End Sub

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Szia!

Köszönöm!

Nem, nem összegezni szeretném. Azt szeretném, ha az E2 tartalmának megfelelően keresne a különböző munkalapokon.

Minden munkalapról az A oszlopból kerül be az érték a Munka1 E2 cellába, és a J oszlopból keresi a hozzá valót, amit Munka1 E5-be ír be.

Hidraulika_Tömlő lapon

A10 cella mondjuk 1sn és J10 cella mondjuk 1

míg Mosó_Tömlő lapon

A10 cella 2sn és J10 cella 2

Akkor ha a Munka1 E2-ben 1sn szerepel, akkor E5-be irja be, hogy 1
ha viszont E2-ben 2sn szerepel, akkor E5-be azt írja, hogy 2

A vége az lesz, hogy inkább csinálok pár ezer soros lapokat.

Lejárt a szerkesztés, elnézést.

A 12. oszlop az az L, nem a J, ezt elírtam az előzőben.

Akkor lesz egy nagyon vidám, hosszú képleted. Ha-Ha-Ha. Ha az első lapon hibára fut az fkeres (mert nincs találat), akkor fkeres(2.lapon), ha ez is hibás, fkeres(3.lapon), stb.

Közben összeállítottam a képletet. A lapjaim neve első, más, har, negy.

=HAHIBA(FKERES(E2;első!A1:L126;12;0);HAHIBA(FKERES(E2;más!A1:L126;12;0);HAHIBA(FKERES(E2;har!A1:L126;12;0);HAHIBA(FKERES(E2;negy!A1:L126;12;0);""))))

[ Szerkesztve ]

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Köszönöm!

Szívesen.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Előre is köszönöm!

Próbálkozok majd vele egy kicsit, mielőtt megint jövök!

Sziasztok az alábbi dologra szeretnék egy függvényt találni.

[A oszlop] [B oszlop] [C oszlop]
tomisakalakak@gmail.com tomis Függvény

Szeretném, ha a "tomis" alapján A oszlopban megtalálná a tomisakalakak@gmail.com-ot és kiírná a c oszlopba. A lényeg hogy az a oszlopban 1000 e-mail cím van teljesen összekeverve és a B oszlopban kb 20db 5 karakterre leszűkített e-mail. Tudni szeretném mely 20 e-mail címre van tehát szükségem.

Igen a képlet az működik, de közben észrevettem, hogy itt-ott tényleg kerülhet egy cellába több adat és nekem azokat manuálisan külön sorokba kell majd írnom, de ha összeadja, akkor nem tudom abból hogy mit adott össze és vissza kellene keresnem, de az sok idő, mert nagy a táblázat. Ezért jó lenne látnom ha egy cellába nem két adat összege kerül, hanem a két adat külön-külön. FKERES-t a VKERES-el nem lehet valahogy kombinálni?

Tegyél már fel egy képet, mert nem tudom elképzelni, hogyan kerülhet egy cellába több adat, és hogy mit kell kezdeni vele.
A cellánként több adat is szerepeljen a képen, meg az is, mit szeretnél elérni ilyen esetben.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Koszonom szepen!

Ezt funkciokent nem lehet valahogy elmenteni?

Eleg kenyelmetlen minden egyes filterezes utan macrozni illetve ezt meg kellene ismetelnem meg tobb oszlopra is.

New level... Advertising has us chasing cars and clothes, working jobs we hate so we can buy shit we don’t need

Tehát én a segítségetekkel a középső táblázatig szeretnék eljutni, az utolsót majd én készítem el fáradtságos munkával.

Szia!

Szerintem nem kell a közbenső táblázat és kézi munka sem nagyon...
Csinálj fejléceket a 3 oszlopnak (én hely, db és kód szöveget adtam meg).Ezután csináltam egy kimutatást az alábbiak szerint:
Menüszalag beszúrás, kimutatás
Oszlopcimkék a kód, sorcimkék a hely és db, értékek a db. Ekkor megkapod a 3. tábla szerinti állapotot - azzal a különbséggel, hogy a "db" mező értéke is látszani fog a "hely" mellett.
A "hely" mező értékére megadhatod, hogy ne összegezzen, így a zavaró összesítő sorok eltűnnek. Az op2 mezőt összecsukhatod és akkor egymás mellett lesz a két érték (és ezt minden olyan sorcimkével megteheted, amelyben egy oszlopcimkéhez egy adat tartozik.
Végül az egész kimutatás sor és oszlop összegzését letilthatod, ha zavarónak találod.
Ráadásul a db sorcimkét tartalmzó oszlopot el is rejtheted.
Úgy gondolom ez gyorsan megoldja a gondjaidat.

Üdv.

[ Szerkesztve ]

Köszke!

Köszönöm!

Hello,

Tud valaki segíteni olyanban, hogy miért nem működik az excelben a dátum beillesztés billentyű kombinációval? Az excel angol, a windows is, de a területi beállítások stb. már magyarra van állítva. A net szerint a ctrl+;-vel mennie kellene, de nem megy. Kipróbáltam otthon is, a magyar excelben, ott ctrl+0-ra beilleszti simán, de itt a cégnél ez se működik, helyette elrejti az adott oszlopot.
Az idő-beillesztés viszont megy ( ctrl+shift+: )-tal

https://www.pathofexile.com/account/view-profile/Haarkon/characters

Sziasztok,

Korábban volt már szó a mentés közbeni megosztás ütközésről, de nem találtam rá megoldást, vagy okot amin eltudnék indulni.
Eddig a 2007-es volt fent azt hittem annak a hülyesége, de most a 2010-zel is ezt csinálja.
A 2010 annyival intelligensebb, hogy küld egy hibaüzit amin már talán ellehet indulni, már aki érti, én nem.

<?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
- <recoveryLog xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main">
<logFileName>error057560_01.xml</logFileName>
<summary>Hiba a fájlban (D:\NAS\Proline\2015\2015.09.24_A15054\!_Szállítási_táblázat_09.24.xls)</summary>
- <additionalInfo>
<info>A fájl olyan súlyosan sérült, hogy a javítás nem lehetséges. Az Excel megkísérelte menteni a képleteket és az értékeket, de lehetséges, hogy az adatok egy része elveszett vagy megsérült.</info>
</additionalInfo>
</recoveryLog>

Elmentéskor egy betűkből és számokból álló fájlt hoz létre.
Nem értem miért sérül meg, vagy mi történik amikor ezt elkezdi csinálni.
A mentést, mint az látszik egy NAS szerver könyvtárába végzi ami szinkronizálja magát. Másoknál nincs megnyitva ez a fájl, hogy ez zavarja, meg ha meg is van nyitva akkor is elmenti egy külön fájlba amit a fájlnévben jelöl.
Más programok mentésekor sincs ilyen probléma.
Továbbá úgy vettem észre random módon csinálja, és a 2007-esben, van hogy többszöri mentés indítás után sikerült elmenteni. volt hogy másodszorra, de volt hogy hatodszorra.
Bármi kérdésetek van válaszolok, de nagyon zavaró ez így és kérném a segítségeteket.
Köszönöm

Sziasztok!
Miért nincs találatom a keresőn vajon?

Köszi előre is!

Ui: És mi ez a Minta*?

[ Szerkesztve ]

Win11 Pro/64, MI TV Stick, Kodi 20.2 (többi az adatlapomon)

A Formátum-nál a Formátumkeresés törlése választása után a Nincs formátum beállítva szöveg jelenik meg a Minta* helyén. Akkor majd rendbe jön, mert most a Nagy szó keresésén kívül egy valamilyen cella formátumát is figyelembe veszi a keresésnél. Olyant pedig nem talál.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Van egy táblázatom, melyben a J oszlopban termékkódok vannak.
Képlettel szeretném egy másik oszlopba kategorizálni őket, minden kiegészítő kódja A vagy N betűvel kezdődik, a ruhák kódja pedig számokból áll.

Milyen képletet lehet csinálni, hogy az A vagy N betűvel kezdődők mellé írja, hogy kiegészítő, míg a többi mellék, hogy ruha?

[ Szerkesztve ]

Köszönöm!

Win11 Pro/64, MI TV Stick, Kodi 20.2 (többi az adatlapomon)

Szia!

A képlet: =Ha(vagy(bal(j2;1)="A";bal(j2;1)="N");"Kiegészítő";"Ruha")

Ezt húzd végig a másik oszlopon.

Üdv.

[ Szerkesztve ]