Hirdetés
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- eBay-es kütyük kis pénzért
- gban: Ingyen kellene, de tegnapra
- GoodSpeed: A RAM-válság és annak lehetséges hatásai
- Gurulunk, WAZE?!
- Magga: PLEX: multimédia az egész lakásban
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sziku69: Szólánc.
-
LOGOUT
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
föccer
nagyúr
Ahogy Fferi50 is írja. a címsorok és cím oszlopok "technikai" dolgok, a cella hivatkozási címét mutatják. Egyébként semmi köze a cellák adat tartalmához.
A cella az excel elemi adategysége. Van neki értéke, formátuma és címe. Egy három teljesen különböző dolog, kis túlzással tök függetlenek egymástól. A cella értékét és formátumát szabadon tudod változtatni, a címét nem.
-
Fferi50
Topikgazda
Szia!
No ez az amit nem lehet!
Ez az Excel automatikus cella cím pozicionáló mutatója, az Excelben való tájékozódásra, hely meghatározásra szolgál.
Hiszen így tudod meghatározni, hogy most az A1 cellán van a cursor. A képletekben is így tudsz hivatkozni a cellákra.
A saját sorszámozásodat külön oszlopban kell megoldanod, függvényekkel vagy pl. automatikus kitöltéssel.
Üdv. -
1. A1-be beírod a kezdő szöveget
2. A2-be ezt a képletet és lemásolod=BAL(A1;7)&SZÖVEG(2+SOR(A1)-SOR($A$1);"00")&JOBB(A1;12)Értelem szerűen, ha nem az A1-ben van a kezdő szöveg, akkor módosítod a cellaképletet (fenti képen B10-től kezdtem)
Azt nem tudom milyen típusú vonalkód kell (sajnos a MS Barcode Controll Add.in-t már kiszedték az Excelből), de ez talán a legegyszerűbb megoldás. Ez egy sima betűkészlet, amit letöltesz, kicsomagolsz, TTF fájlon jobb egér, telepíteted, Excel restart és ott lesz a betűkészlet(font) lenyílóban.
-
spe88
senior tag
D2: =HA(A2=A$18;SOR();"")
E2: =DARAB(D2:D12)
F2: =HAHIBA(KICSI($D$2:$D$12;$E$2-(SOR(A1)-1));"")
G2: =HAHIBA(INDEX($B$1:$B$12;F2)-INDEX($B$1:$B$12;F3);"")
H2: =MAX(G2:G17)Természetesen ágyazhatod egymásba a képleteket és akkor nem kell ennyi segédoszlop, csak így egyszerűbb megérteni.
Szerintem erre gondoltál
-
CTRL+lefele gombbal tudsz a kitöltött oszlop utolsó elemére lépni, ha folytonos a kitöltés.
Ha nem folytonos, akkor az üres mező előtti utolsó adatot tartalmazó mezőre lép (illetve utána a következő első adatot tartalmazóra és így tovább).
Valamint meg tudod tenni, hogy elrejted az összes nem használt sort és akkor nem görget tovább. -
Capella
senior tag
Magát a sort nem törölted, csak a cellából a képletet, ott van üresen a 3, 6 és 9 sor. Azokat el kellett volna eltávoltani. Akkor tökéletes.
Nem igazán értem, hogy mit szeretnél. A képen a 4. sornak szándékod szerint át kellett volna változnia 3-ra? Mert így nem sok értelmét látom, de az én vagyok.
A 4. sor az a 4. sor, de rakhatsz olyan feltételt a képletbe, hogy ha az előző sor cellája üres, akkor sor()-1 legyen, és akkor 3 lesz az értéke. De mi van, ha 2 vagy 3 egymás alatti cella lesz üres? -
Mutt
senior tag
Szia,
Excelben és nagyon sokszor kell a szavak és/vagy a karakterek (leütés) száma.
Nem igazán szöveg szerkesztő az Excel, de meg lehet oldani ezt is.
1. Szavak száma: szóközöket kell megszámolni igazából. Erre a régi megoldás az, hogy a szövegből a töröljük HELYETTE függvénnyel a szóközöket és megnézzük mennyivel csökkent a szöveg hossza:
=HOSSZ(A2)-HOSSZ(HELYETTE(A2;" ";""))+12. Karakterek száma: itt ha élünk azzal hogy csak a SZÓKÖZT nem vesszük leütésnek, de a kódtábla többi karakterét - még a nem nyomtathatókat is - igen, akkor ez a képlet segít:
=SZORZATÖSSZEG((KÓD(KÖZÉP(A2;SOR(INDIREKT("A1:A"&HOSSZ(A2)));1))<>32)+0)Ha csak adott karakterek érdekelnek, akkor kell egy kicsit játszani. pl. csak számokat ez adja vissza:
=SZORZATÖSSZEG((((KÓD(KÖZÉP(A2;SOR(INDIREKT("A1:A"&HOSSZ(A2)));1))>=48)+(KÓD(KÖZÉP(A2;SOR(INDIREKT("A1:A"&HOSSZ(A2)));1))<=57))=2)+0)3. Ha szöközökkel együtti karakterek száma kell, akkor pedig a HOSSZ képlet tud segíteni:
=HOSSZ(A2)üdv
-
Fferi50
Topikgazda
Szia!
Ha jól értettem a feladatot, akkor nézd meg ezt a képletet a B1 cellába:
=INDIREKT("A" & SOR()+50*(OSZLOP()-1))
Ezt aztán húzhatod oldalra és lefelé is, amíg el nem érsz a végére az információidnak.
Az 50 helyére azt a számot írd, ahány cellát szeretnél kitölteni egy-egy oszlopban.
Amikor végeztél, jelöld ki az egész képletes részt - majd másolás - irányított beillesztés értéket.
Ezután az 50 alatti cellákat törölheted. (De csak miután a képleteket átalakítottad értékké!)Üdv.
-
VBA megoldást találtam hirtelen:
Sub SplitColumn()
'Updateby20141106
Dim rng As Range
Dim InputRng As Range
Dim OutRng As Range
Dim xRow As Integer
Dim xCol As Integer
Dim xArr As Variant
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type: = 8)
xRow = Application.InputBox("Rows :", xTitleId)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
Set InputRng = InputRng.Columns(1)
xCol = InputRng.Cells.Count / xRow
ReDim xArr(1 To xRow, 1 To xCol + 1)
For i = 0 To InputRng.Cells.Count - 1
xValue = InputRng.Cells(i + 1)
iRow = i Mod xRow
iCol = VBA.Int(i / xRow)
xArr(iRow + 1, iCol + 1) = xValue
Next
OutRng.Resize(UBound(xArr, 1), UBound(xArr, 2)).Value = xArr
End Sub
Új hozzászólás Aktív témák
- Bittorrent topik
- Windows 11
- Pánik a memóriapiacon
- Proxmox VE
- Mesterséges intelligencia topik
- Pécs és környéke adok-veszek-beszélgetek
- Rezsicsökkentés, spórolás (fűtés, szigetelés, stb.)
- HiFi műszaki szemmel - sztereó hangrendszerek
- 8000 mAh-s aksi a Kínában most bemutatott Honor 500-akban
- Vivo X300 Pro – messzebbre lát, mint ameddig bírja
- További aktív témák...
- HP ZBook Firefly 14 i7-1165G7 16GB 1000GB Nvidia Quadro T500 4GB 14" FHD 1 év garancia
- GYÖNYÖRŰ iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3427, 100% Akkumulátor
- Apple iPhone 13 / 128GB / Kártyafüggetlen / 12Hó Garancia / Akku: 100%
- Konzol felvásárlás!! Xbox Series S, Xbox Serries X
- ÁRGARANCIA! Épített KomPhone i5 12400F 16/32/64GB RAM RTX 5050 8GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: ATW Internet Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


Fferi50
