-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Fferi50
Topikgazda
válasz
attiati
#53625
üzenetére
Szia!
Próbáld ki a következőt importálás előtt:
Egy üres excelben - Beállítások - Speciális - Rendszerbeállítások szerinti elválasztók használata elől a pipát kiveszed. -Tizedesjel helyére beírod a . (pontot). Leokézod. Bezárod az Excelt majd újra megnyitod.
Beimportálod az adatokat. Ezután megcsinálod: Beállítások - Speciális - Rendszerbeállítások szereinti elválasztók használata elé pipa. Oké.
A beimportált számoknál a pontok vesszőre fognak változni.
Üdv. -
-
attiati
veterán
válasz
attiati
#39480
üzenetére
mégiscsak segít, de registry bejegyzésekkel:
windowsban adminisztrátorként futtatni kell a cmd parancsot és utána ezeket lefuttatni:
reg add hkey_current_user\software\classes\.xhtml /ve /d htmlfile /f
reg add hkey_current_user\software\classes\.xht /ve /d htmlfile /f
reg add hkey_current_user\software\classes\.html /ve /d htmlfile /f
reg add hkey_current_user\software\classes\.htm /ve /d htmlfile /f
reg add hkey_current_user\software\classes\.shtml /ve /d htmlfile /f -
Delila_1
veterán
válasz
attiati
#13036
üzenetére
Újra átolvasva a kérdésedet, valóban nem kell a +1.
Nem szükséges, hogy a képlet a mellette lévő oszlopra hivatkozzon, de a balra mellette lévő oszlopban legyenek bármilyen adatok ahhoz, hogy dupla kattintásra végig lemásolódjanak a képletek. Ameddig van adat, addig lesz másolat.
Most, hogy kiveszed a +1-et, működni fog a duplaklikk, mert a másik lehetőség, hogy az aktuális oszlopban legyenek folyamatosan valamilyen adatok, képletek.
-
Delila_1
veterán
válasz
attiati
#13024
üzenetére
Ilyesmi kell hozzá:
=MAX(INDIREKT("A"&SOR()+1&":A"&SOR()+$C$1))
ahol az összegek az A oszlopban vannak, és a C1-be írod be, hány szám maximumát akarod kiszámoltatni. Pl. C1=5. A B2-ben megadott képlet az A3:A7 max értékét adja, lehúzva a képletet a B10 az A11:A15-ét.
Egyébként nem kell végighúzni a képletet. Mikor beírtad az elsőt, a cellán állva a jobb alsó sarkában lévő kis fekete négyzetre klikkelsz duplán, és az végig másolja addig, ameddig a tőle balra lévő oszlopban valamilyen adatot talál, vagy addig, ameddig a saját oszlopában van adat.
-
#10443
Fire/SOUL/CD
félisten
attiati
#10440
-
perfag
aktív tag
-
Delila_1
veterán
válasz
attiati
#3895
üzenetére
Angol nyelvűnél is működik, de csak akkor, ha a gyümölcsök és a lapok neve megegyezik.
Másképp honnan tudná a program, hogy melyik lap adataihoz írja a következőt?Vegyél fel egy új lapot, ahol az A oszlopban a hosszú név, B-ben a hozzárendelt rövid lapnév szerepeljen. Kibővítettem a makrót. A Masolt_lap E oszlopába beírja az
=fkeres(a2;Uj_Sheet!a:b;2;hamis) függvényt, és ezután a lapnevet nem a B, hanem az E oszlopból olvassa ki.Sub Masol()
Sheets("Masolt_lap").Select
usorm = Range("A65536").End(xlUp).Row
Range("E2").Select
ActiveCell.Formula = "=VLOOKUP(B2,Uj_Sheet!A:B,2,FALSE)"
Selection.AutoFill Destination:=Range("E2:E" & usorm)
sor = 2
Do While Cells(sor, 1) <> ""
kelt = Cells(sor, 1)
lapnev = Cells(sor, 5)
ar = Cells(sor, 3)
Sheets(lapnev).Select
usor = Range("A65536").End(xlUp).Row + 1
Cells(usor, 1) = kelt
Cells(usor, 2) = ar
Sheets("Masolt_lap").Select
sor = sor + 1
Loop
End Sub -
Delila_1
veterán
válasz
attiati
#3893
üzenetére
A lapot, amit másolsz valahonnan, "Másolt_lap"-nak neveztem el (két helyen szerepel a makróban, írd át a saját lapod nevére). Ezen az A oszlopba írtam a dátumot, B-be a termék nevét, C-be az árat. Mindezt a második sortól, mert feltételezem, hogy az első sorban oszlopcímek vannak. A gyümölcsök lapjára már nem kell minden sorba az azonosítót beírni, azért nem tettem be az adatok közé.
Az gyümölcs lapokra csak két oszlopot vettem fel, a dátumot és a hozzá tartozó árat.Sub Másol()
Sheets("Másolt_lap").select
sor = 2
Do While Cells(sor, 1) <> ""
kelt = Cells(sor, 1)
lapnév = Cells(sor, 2)
ár = Cells(sor, 3)
Sheets(lapnév).Select
usor = Range("A65536").End(xlUp).Row + 1
Cells(usor, 1) = kelt
Cells(usor, 2) = ár
Sheets("Másolt_lap").Select
sor = sor + 1
Loop
End Sub
)
Új hozzászólás Aktív témák
Fferi50- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- The Elder Scrolls Online Imperial Collector s Edition
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- PC Game Pass előfizetés
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Honor 200 Lite / 8/256GB / Kártyafüggetlen / 12Hó Garancia
- Apple iPhone 15 Pro 1TB,Újszerű,Adatkabel,12 hónap garanciával
- BESZÁMÍTÁS! MSI Ventus 3X OC RTX 3090 24GB videokártya garanciával hibátlan működéssel
- iPhone 11 Pro 64GB 100% (3hónap Garancia) - AKCIÓ
- Apple iPhone SE 2022 64GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest